Lazarus
Виправити помилки.
procedure TForm1.Button1Click(Sender: TObject);
begin
if CheckBox1.Checked Then Form1:='Заголовок изменен';
if CheckBox2.Checked
Then Form1.Color:=clRed; if CheckBox.Checked
Then Form1.width:=500; Form1.height:=200;
end;

kulanforever    2   07.04.2020 21:06    0