Событие для кнопки в консоли
Здравствуйте, подскажите пожалуйста:
Делаю программу которая будет запускаться из консоли, поэтому все Win элементы будут создаваться за счёт кода. Не знаю как задать событие для кнопки, или вообще для любого элемента.
Делал так, не работает!
procedure Clicked();
begin
Win.Close;
end;
//
// Остальной код
//
ButtonOpt:=TButton.Create(Win);
ButtonOpt.Parent:=Win;
ButtonOpt.Left:=1;
ButtonOpt.Top:=1;
ButtonOpt.Width:=52;
ButtonOpt.Height:=20;
ButtonOpt.Caption:='Выход';
ButtonOpt.Click:=Clicked();
|