Работа с окнами

← →
Poroshm (2007-08-17 12:10) [0]

Здравствуйте! Подскажите как сделать чтобы одна форма(главная) скрылась а другая открылась и стала активной.
После form2.show; открывается форма, но активной не становится, а главную закрыть не как не могу. после form1.visible=false; идут ошибки.

← →
Elen © (2007-08-17 13:20) [1]

form2.show;
form2.BringToFront;
form1.visible:=false;

P.S. Ошибки нужно не прятать.

← →
Poroshm (2007-08-17 16:12) [2]

В принципе это работает, но мне нодо чтобы form2 (form2 - настройка пиложения) появлялась в момент запуска приложения, пробовал сделать это так:

procedure TForm1.FormShow(Sender: TObject);
begin
if paramStr(1)<>"system.ini" then
begin
form2.show;
form2.BringToFront;
form1.hide;
end;
end;

но при запуске form2 выдается Cannot Chage Visible in OnShow or OnHide.

← →
Anatoly Podgoretsky © (2007-08-17 16:19) [3]

> Poroshm (17.08.2007 16:12:02) [2]

Смени свойство Visible

← →
Альф (2007-08-17 16:28) [4]

> Anatoly Podgoretsky © (17.08.07 16:19) [3]
> > Poroshm (17.08.2007 16:12:02) [2]
>
> Смени свойство Visible

Анатолий - думаю не поможет, он же делает вот это:
> procedure TForm1.FormShow(Sender: TObject); > begin > if paramStr(1)<>"system.ini" then > begin > form2.show; > form2.BringToFront; > form1.hide; > end; > end;

← →
Poroshm (2007-08-17 16:28) [5]

Поменял, окно главной формы(form1) стало видимым, Окно настройки(form2) тоже, но теперь выдается сообщение Access voliatio at adress EFF343 in module....... вообще ни че не понимаю!!!!!!!!!!!!!!!!!!!!!!!

← →
Anatoly Podgoretsky © (2007-08-17 16:47) [6]

> Альф (17.08.2007 16:28:04) [4]

Он утверждает, что у него ругается про form2.show

← →
iXT © (2007-08-17 16:49) [7]

...
Form1.Hide;
Form2:=TForm2.Create(Application);
try
.....
Form2.ShowModal;
if Form2.ModalResult=mrOk then....
finally
Form2.Free;
Form1.Show;
end;

+в файле проекта форму не создавать (Вынуть из AutoCreate);

← →
poroshm (2007-08-17 21:16) [8]

Просите за тупость, но где это все надо прописать? и что такое AutoCreate?

← →
poroshm (2007-08-17 21:16) [9]

Просите за тупость, но где это все надо прописать? и что такое AutoCreate?

← →
poroshm (2007-08-18 13:34) [10]

Ув. Мастера обратите пожалуйста внимание на мой вопрос.

> и что такое AutoCreate?

Это строчки в DPR файле
Application.CreateForm(TFormN, FormN);
Или что тоже самое, но более верное для начала, в Project>Options - Auto-create forms

> где это все надо прописать

там, где хочешь, что бы было :), а вообще брось эту затею. не твое это.

← →
Poroshm (2007-08-18 23:16) [13]

> ...
> Form1.Hide;
> Form2:=TForm2.Create(Application);
> try
> .....
> Form2.ShowModal;
> if Form2.ModalResult=mrOk then....
> finally
> Form2.Free;
> Form1.Show;
> end;

Вот это не работает

Это мы уже слышали.

Работа с окнами Найти похожие ветки