Нашёл.
Код:
procedure FormCanResize(Sender: TObject; var NewWidth, NewHeight: Integer; var Resize: Boolean);
procedure TForm1.FormCanResize(Sender: TObject; var NewWidth,
NewHeight: Integer; var Resize: Boolean);
begin
NewWidth:=1024;
NewHeight:=768;
end;
Спрошу ещё тут.
Как проще всего сделать, чтобы некая переменная сохраняла состояние Х секунд. Например, я вывожу команду внаружу, там блок включает реле. Через 5 сек мне надо это реле выключить, то есть отправить команду на отключение.
В делфи я нуб, я сишник и под ПЛК. Там для этого таймеры есть...