Форум: "Основная";
Текущий архив: 2003.02.13;
Скачать: [xml.tar.bz2];

Вниз

Кнопки...   Найти похожие ветки 

← →
Gerda   (2003-02-04 19:06) [0]

Дарова Мастерам.
Как создавать любое количество к нопок во время выполнения программы ??
Заранее благодарен.

---

← →
gsu   (2003-02-04 19:11) [1]

bs: array [1..N] of TButton

...

bs[1]:=TButton.Create(Form1);
bs[1].Parent:=Form1;
bs[1]. ...

---

← →
Gerda   (2003-02-04 20:04) [2]

Почему при:
//------------------------------------------
type TForm1 = ...
procedure ButtonsClick(Sender: TObject);
.....
bs[1].OnClick:=ButtonsClick;
......
procedure TForm1.ButtonsClick(Sender: TObject);
begin
// сюда проц не доходит ??
end;
//------------------------------------------

---

← →
Shadow   (2003-02-04 20:08) [3]

бывает ...

---

← →
Gerda   (2003-02-04 20:09) [4]

:)

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2003.02.13;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.009 c