Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.12.09;
Скачать: CL | DM;

Вниз

Как связать две формы?   Найти похожие ветки 

 
Uno ©   (2007-11-12 13:53) [0]

Если даны две формы, в одной из них имеется Кнопка, как при клике на эту кнопку вызвать вторую форму?


 
Palladin ©   (2007-11-12 13:56) [1]

Книжки почитать нужно, тогда отпадет масса подобных вопросов.


 
Ega23 ©   (2007-11-12 14:12) [2]


> Если даны две формы, в одной из них имеется Кнопка, как
> при клике на эту кнопку вызвать вторую форму?

uses Unit2

procedure TForm1.Button1Click(Sender : TObject)
var
 frm : TForm2;
begin
 Application.CreateForm(TForm2, frm);
 try
   frm.ShowModal;
 finally
   frm.Free;
 end;
end;


 
KSergey ©   (2007-11-12 14:13) [3]

procedure TForm1.Button1Click(Sender: TObject);
begin
  with TForm2.Create(nil) do
  try
     ShowModal;
  finally
     Free;
  end;
end;



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

Текущий архив: 2007.12.09;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.018 c
2-1194416101
ser_tr
2007-11-07 09:15
2007.12.09
при пустой ячейке выскакивает "is not a valid floating point valu


15-1194438356
werb
2007-11-07 15:25
2007.12.09
dll список функций


4-1179818967
Klopan
2007-05-22 11:29
2007.12.09
Службы


6-1175711153
Kalyakin
2007-04-04 22:25
2007.12.09
Перехватить Modified у TWebBrowser


2-1194703331
addi
2007-11-10 17:02
2007.12.09
Общение с "чужим" приложением.