Form.Show в Form.Create

[UnD)eaD)Snake]

Есть 2 формы:
Form1 - главная
Form2 - неглавная

Нужно:

Form1.OnCreate
begin
Form2.show;
end;

Но сразу ассесс волатион.
Как сдлать чтобы работало? (главной всеравно должна быть form1)

[Азазель]

Попести код в Form1.OnShow, а не в OnCreate;

[UnD)eaD)Snake]

Точно! я забыл спасибо

[mutabor]

она на тот момент еще не создана, поэтому и исключение

[UnD)eaD)Snake]

Вот опять. У меня

Form1.create
begin
if memo1.lines[0]='blabla' then checkbox1.checked:=true;
if memo1.lines[1]='blabla' then checkbox2.checked:=true;
if memo1.lines[2]='blabla' then checkbox3.checked:=true;
if memo1.lines[3]='blabla' then checkbox4.checked:=true;
if memo1.lines[4]='blabla' then checkbox5.checked:=true;
... и вот так их около 200 строк
end;

Я хочу сделать прогрессбар на form.create т.к эти 200 строк загружаются долго. Надо чтобы до их выполнения показывалась Form2 с прогрессбаром.. т.е. как можно

Form1.OnCreate
begin
Form2.show;
end;

(главной всеравно должна быть form1)

[JTG]

Посмотри в файле проекта (project->view source) там форма2 хоть создаётся? (Application.CreateForm(TForm2, Form2); )

[Pitbull]

Сообщение от UnD)eaD)Snake

Вот опять. У меня

Form1.create
begin
if memo1.lines[0]='blabla' then checkbox1.checked:=true;
if memo1.lines[1]='blabla' then checkbox2.checked:=true;
if memo1.lines[2]='blabla' then checkbox3.checked:=true;
if memo1.lines[3]='blabla' then checkbox4.checked:=true;
if memo1.lines[4]='blabla' then checkbox5.checked:=true;
... и вот так их около 200 строк
end;

Я хочу сделать прогрессбар на form.create т.к эти 200 строк загружаются долго. Надо чтобы до их выполнения показывалась Form2 с прогрессбаром.. т.е. как можно

Form1.OnCreate
begin
Form2.show;
end;

(главной всеравно должна быть form1)

в исходник пишешь:
Application.Initialize;
Form2:= TForm2.Create(Application);
Form2.Show;
Form2.Repaint;
Application.CreateForm(TForm1, Form1);
Application.Run;
а на самой форме2 пишешь увеличение прогрессБар.....