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;

Популярно: Информатика

• 

  tjumentseva20031

  12.04.2022 05:46
  На якій вкладці знаходяться засоби форматування шрифту?​...
• 

  Сангали

  22.09.2020 10:00
  решить кб=?байт 15 байт=? Бит 1024 мб=? Гб 7мб=? Кб 5кб=?байт 12288бит=?байт​...
• 

  syav1979

  04.06.2022 11:35
  Напишите программу паскаль: с клавиатуры вводится число от 0 до 1000 включительно....
• 

  lnstagramDeviza

  16.06.2021 09:24
  Каковы особенности мультимедийных продуктов? опишите известный вам мультимедийный...
• 

  ktjy123

  31.03.2020 14:04
  Сделайте кроссворд по теме компьютер как универсальное устройство буду то первый...
• 

  berry91819

  08.11.2021 13:55
  Найдите наибольший по модулю элемент заданного массива из 9 действительных чисел...
• 

  Zenkinadasha

  07.12.2022 06:05
  Подскажите, , как рассчитать информационный объём словаря?...
• 

  Fewfie

  01.10.2022 17:16
  Как изменится число, записанное в шестнадцатеричной системе, при переносе запятой,...
• 

  AcidSmile

  03.02.2020 12:48
  0,5у+7=5(0,2+1,5 у) решите уравнение...
• 

  aynurqulieva

  16.11.2022 19:03
  Вставьте артикль где необходимо: 1)there is thick red carpet in my room. carpet...