| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Создание кнопки программно

Страницы:   < 1 2 3 4 >

Mariya ©   (2007-10-02 15:27:00) 

Подскажите мне, пожалуйста, как создать динамически визуальный компонент (кнопку) на форме в Delphi.

---

evvcom   (2007-10-02 16:01:00) [61]

> а то после Ctrl+S процедура исчезнет :)

Это если декларация в published. Я обычно даже обработчики, если не в design-time назначаю, помещаю в private, опять же если другие надобности не возникают. Тогда ничего не исчезает. :)

---

Mariya   (2007-10-02 15:45:00) [62]

Спасибо огромное! Получилось!

---

Германн   (2007-10-02 15:35:00) [63]

> clickmaker ©   (02.10.07 15:31) [2]
>
> ах да... еще
>
> Btn.OnClick := ButtonClick;
>
> procedure TForm1.ButtonClick(Sender: TObject);
> begin
>
> end;
>

Тогда уж лучше
procedure TForm1.ButtonClick(Sender: TObject);
begin
 //
end;

а то после Ctrl+S процедура исчезнет :)

---

clickmaker   (2007-10-02 15:31:00) [64]

ах да... еще

Btn.OnClick := ButtonClick;

procedure TForm1.ButtonClick(Sender: TObject);
begin

end;

---

clickmaker   (2007-10-02 15:30:00) [65]

Btn := TButton.Create(Self);
Btn.Parent := Self;
Btn.Left :=
Btn.Top :=
Btn.Caption := 'Click me';
Btn.Visible := true;

---

Страницы:   < 1 2 3 4 >

Наверх