Нажал кнопку - открыл форму - Компоненты Delphi

LancerOk · 20.03.2012, 19:01

Добрый день !

На данный момент работаю над дипломной работой, но немного затормозил - не знаю как сделать так, чтобы при нажатии на button открывалась форма.
Помогите пожалуйста, спасите студента

Пример:
Имеется форма Form1, Form2 и кнопка button1, как сделать так, чтобы при нажатии на button1 открывалась форма 2 ?

Проблема решена.

Noor · 20.03.2012, 21:51

в button1 onClick

Код:

Form2.Show

lux16 · 21.03.2012, 12:07

ыыы, вот дипломники пошли =)

[MoNAMur] · 27.03.2012, 13:03

а если форма еще не создана?...
лучше так я думаю

Код:

if (not(assigned(Form2))) then Form2 := TForm2.Create(Application);
if (Form2.showing = false) the Form2.Show;

__123 · 12.04.2012, 02:23

Код:

Application.CreateForm(TForm2,Form2);
Form2.ShowModal;
Form2.Free;

Но в uses надо добавить название формы2, т.е. ее файла, без ".pas".

20.03.2012, 19:01	#1
LancerOk Новичок Джуниор Регистрация: 20.03.2012 Сообщений: 1	Нажал кнопку - открыл форму Добрый день ! На данный момент работаю над дипломной работой, но немного затормозил - не знаю как сделать так, чтобы при нажатии на button открывалась форма. Помогите пожалуйста, спасите студента Пример: Имеется форма Form1, Form2 и кнопка button1, как сделать так, чтобы при нажатии на button1 открывалась форма 2 ? Проблема решена. Последний раз редактировалось LancerOk; 20.03.2012 в 19:22. Причина: Проблема решена.

20.03.2012, 21:51	#2
Noor Участник клуба Регистрация: 01.11.2006 Сообщений: 1,051	в button1 onClick Код: `Form2.Show`

21.03.2012, 12:07	#3
lux16 Форумчанин Регистрация: 11.02.2009 Сообщений: 305	ыыы, вот дипломники пошли =) Хочу быть лучшим, но пока что я только обычный =(

27.03.2012, 13:03	#4
[MoNAMur] читер Форумчанин Регистрация: 05.10.2009 Сообщений: 150	а если форма еще не создана?... лучше так я думаю Код: `if (not(assigned(Form2))) then Form2 := TForm2.Create(Application); if (Form2.showing = false) the Form2.Show;` $me = $me == $me ? $me : $me;

12.04.2012, 02:23	#5
__123 Пользователь Регистрация: 15.09.2011 Сообщений: 36	Код: `Application.CreateForm(TForm2,Form2); Form2.ShowModal; Form2.Free;` Но в uses надо добавить название формы2, т.е. ее файла, без ".pas".

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Поместить кнопку на форму	Егор41	Microsoft Office Excel	7	19.05.2012 22:56
как при нажатии на кнопку перезагрузить форму?	Nazario	Общие вопросы Delphi	10	13.03.2012 11:16
Написать к программе форму, кнопку и окно результатов	M.Kelevra	Microsoft Office Excel	6	26.12.2010 19:28
Как закрыть MDIChild форму по нажатию на кнопку	AndreyF	Общие вопросы Delphi	4	11.07.2009 16:26