Как через ComboxBox открыть 2-ю форму уже созданную ? - Общие вопросы Delphi

santafer · 13.03.2016, 15:30

Как через ComboxBox открыть 2-ю форму уже созданную ?

newerow1989 · 13.03.2016, 15:36

Код:

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
   If ComboBox1.ItemIndex=1 {любое число} then
      Form2.ShowModal;
end;

santafer · 13.03.2016, 15:42

Цитата:

Сообщение от newerow1989

Код:

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
   If ComboBox1.ItemIndex=1 {любое число} then
      Form2.ShowModal;
end;

Спасибо ) , а почему когда возвращаешься обратно на первую форму и больше нельзя выбирать из combobox нечего ,Программа зависает ?

newerow1989 · 13.03.2016, 15:49

Цитата:

Программа зависает ?

Как зависает?

Надо закрыть текущее окно (либо крестиком в углу, либо

Код:

Form2.Close

)

santafer · 13.03.2016, 15:50

Цитата:

Сообщение от newerow1989

Как зависает?

Надо закрыть текущее окно (либо крестиком в углу, либо

Код:

Form2.Close

)

Да все получилось, Спасибо )

newerow1989 · 13.03.2016, 15:53

Пожалуйста!

vlad1389 · 13.03.2016, 15:54

Если закрытие не требовалось, то ShowModal сменить на Show. Разница ясна?

santafer · 13.03.2016, 16:06

Цитата:

Сообщение от vlad1389

Если закрытие не требовалось, то ShowModal сменить на Show. Разница ясна?

Ну да , Спасибо)

13.03.2016, 15:30	#1
santafer Пользователь Регистрация: 28.11.2015 Сообщений: 23	Как через ComboxBox открыть 2-ю форму уже созданную ? Как через ComboxBox открыть 2-ю форму уже созданную ? Последний раз редактировалось Вадим Мошев; 13.03.2016 в 16:44.

13.03.2016, 15:36	#2
newerow1989 Я самый любопытный Участник клуба Регистрация: 24.07.2012 Сообщений: 1,981	Код: `procedure TForm1.ComboBox1Change(Sender: TObject); begin If ComboBox1.ItemIndex=1 {любое число} then Form2.ShowModal; end;` С запрограммированным приветом, Неверов Евгений! Сайт: http://newerow1989.ru [Паскаль] [Delphi]

13.03.2016, 15:53	#6
newerow1989 Я самый любопытный Участник клуба Регистрация: 24.07.2012 Сообщений: 1,981	Пожалуйста! С запрограммированным приветом, Неверов Евгений! Сайт: http://newerow1989.ru [Паскаль] [Delphi]

13.03.2016, 15:54	#7
vlad1389 Форумчанин Регистрация: 02.02.2016 Сообщений: 290	Если закрытие не требовалось, то ShowModal сменить на Show. Разница ясна?