![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Помогите ламеру
Alf_ © (2002-09-26 07:37:00)procedure TForm1.Button1Click(Sender: TObject);
begin
Form2.ShowModal();
end;
procedure TForm1.Button2Click(Sender: TObject);
begin
Form2.ShowModal();
end;
procedure TForm2.FormShow(Sender: TObject);
begin
// как мне узнать какая кнопка была нажата на первой форме?
end;
alf_ (2002-09-26 07:56:00) [1]А почему лучше в Form2 ?
Alf_ (2002-09-26 07:55:00) [2]А без обьявления переменной можно ?
Там случайно в форму не передаеться каким она обьектом была вызвана?
Anatoly Podgoretsky (2002-09-26 07:54:00) [3]Только эту переменнцю лучше организовать в Form2
MBo (2002-09-26 07:44:00) [4]procedure TForm1.Button1Click(Sender: TObject);
begin
ButtonPressed:=1; //(или Button1)
Form2.ShowModal();
end
а в form2 смотри эту переменную