Программирование Delphi Добработайте программу Работа с кнопками - 1, добавив в неё кнопки:

1) Caption – изменяет надпись на себе на любую другую;

2) Font.Size – меняет размер шрфита на кнопке.

3) Visible – выключает видимость всех кнопок, и включает обратно.

Таким образом, прогрмма будет выглядеть слеующим образом:

procedure TForm1.btn4Click(Sender: TObject);varList:TStringList;MyStr:String;beginRandomize;List :=TStringList.Create;List.LoadFromFile('word.txt');MyStr :=List[Random(List.Count)];btn4.caption:=MyStr;List.Free;end;procedure TForm1.btn5Click(Sender: TObject);beginif btn1.Visible = True then beginbtn1.Visible:=False;btn2.Visible:=False;btn3.Visible:=False;btn4.Visible:=False;btn6.Visible:=False;endelse beginbtn1.Visible:=True;btn2.Visible:=True;btn3.Visible:=True;btn4.Visible:=True;btn6.Visible:=True;end;end;procedure TForm1.btn6Click(Sender: TObject);var  a:integer;beginRandomize;a:=Random(25);btn6.Font.Size:=a;end;end.