Платные хостинги     Раскрутка сайта     Книги по программированию

Buttons, (о кнопках)

- Подскажите пожалуйста,как в Delphi6 можно создать кнопку не используя соответствующий компонент?(т.е есть что-нибудь типа CreateButtons)(т.е из программы)

- Код varMyButton:TButton;beginMyButton:= TButton.Create(Self);try  MyButton.Parent:=Self;  MyButton.Left:=10;  MyButton.Top:=10;finally  FreeAndNil(MyButton);end;highlightSyntax('delphic5N2Mz','delphi');

- А как можно отследить что кнопка нажата и при на- жатие на нее что-то сделать, если кнопка реализованакак выше описано?

- Код TForm1 = class(Form1)...procedure MyButtonClick(Sender: TObject);...end;procedure TForm1.MyButtonClick(Sender:TObject);begin  ShowMessage('Hello World');end;... MyButton.Top:=10; MyButton.OnClick:= MyButtonClick;finally...end;highlightSyntax('delphixMGNjM','delphi');

- thanks!!!!!!!!

Интернет казино     Онлайн игры     Увеличение члена     Купить DVD