Зависание на application.CreateForm(TForm1, Form1);

[Sanprof]

Собственно проблема такая, что в потоке у меня создается форма (я ее в Design Time уже создал и убрал из dpr application.CreateForm(TForm1, Form1), чтобы при виполнении программы не занимала память, т.к. появляется она редко, только при необходимости), так вот в потоке на строчке application.CreateForm(TForm1, Form1); программа виснет наглухо, но при пошаговом выполнении (F8) она создается

   if FileExists(FPathSave + FArchvName) then
      begin
         application.CreateForm(TForm1, Form1);
       try
         Form1.ShowModal;
       except
         FreeAndNil(Form1);
       end;
         FreeAndNil(Form1);

[Utkin]

А зачем блок try? И вообще какой тайный смысл в Form1.ShowModal;? Она изначально, когда создается невидима?

[Stilet]

application.CreateForm(TForm1, Form1);

Замени на

 Form1:=TForm1.Create...
 ...

и так далее. Короче создавай ее собственным методом ее класса, а не через Application

Она изначально, когда создается невидима?

Плюс ко всему ото скорее всего именно там и косяк.

[Sanprof]

она создается только при определенном условии, на форме несколько кнопок по нажатию на них в поток возвращается определенное значение, форма уже не нужна (уничтожается), поток продолжает выполнение.

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

Она изначально, когда создается невидима?

begin
  Application.Initialize;
  Application.CreateForm(TForm2, Form2);
//  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.

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

Замени на

 Form1:=TForm1.Create...
 ...

и так далее. Короче создавай ее собственным методом ее класса

все равно на строчке Form1 := TForm1.Create(nil); виснет, зато при пошаговом выполнении все нормально создается.

[Stilet]

Плюс ко всему ото скорее всего именно там и косяк.

Так похоже я тупанул. Уткин, дружище, ShowModal по барабану невидимость формы, она ее видимой сделает.

Sanprof

если есть возможность прикрепи в архиве сюда свой проект, посмотрим на это чудо.

[Utkin]

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

все равно на строчке Form1 := TForm1.Create(nil); виснет, зато при пошаговом выполнении все нормально создается.

Это-то как раз и неудивительно. Меня больше поражает что при пошаговом Form1 := TForm1.Create(nil); она создается...

Уткин, дружище, ShowModal по барабану невидимость формы, она ее видимой сделает.

Да, но при создании формы у меня тоже с ней косяки были... Представь, что она видиммая. Он ее создал - она появилась и тут он ей ShowModal приказывает... Лично я не знаю как бы Дельфи поступил, поэтому про видимость и уточняю (чтобы не гадать, а проверить).

[Stilet]

она создается...

А чего она не будет создаваться?
Другое дело что автор для нее Parent не указывает, потому ей возможно негде отрисовываться.

[wladmoscow]

fsdfsfsdfsdfsdfsfsdfsfsdf

Проверка работы...

Удалите это!

[Utkin]

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

А чего она не будет создаваться?
Другое дело что автор для нее Parent не указывает, потому ей возможно негде отрисовываться.

Об этом и речь, но ИМХО, здесь косяк не один....

[Utkin]

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

fsdfsfsdfsdfsdfsfsdfsfsdf

Проверка работы...

Удалите это!

Да удалите вот это - wladmoscow