Создание формы в потоке

[Pamparam]

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

выполнять результаты (создание форм и т.п.)

выполнять не в потоке потому, что создавать форму в неосновном потоке нельзя

[veniside]

> выполнять результаты (создание форм и т.п.)

так, отделим мух от котлет. Создание форм — дело недолгое, особенно, если они созданы заранее, и сидят невидимые. Show() и готово. И даже если формы не созданы заранее, их создание не должно длиться более секунды. Если у вас не так, надо пересматривать, что там на Create/Show происходит.

"выполнять результаты" и т.п. — вероятно, дело долгое, которое можно:
а) выполнить в отдельном потоке
б) выполнять небольшими порциями, так, чтобы GUI успевал выгребать сообщения

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

[Pamparam]

мне нужно именно создавать форму при получении правильного ответа с сервера т.е. что-то типа авторизации, а отображение формы можно сделать при элементарной отправке месаг окну (если кто будет хакать), что сводит авторизацию на 0

[veniside]

ну тогда в чём проблема? отработал ваш поток, получил данные. Послал сообщение через SendMessage() главной форме, она (уже будучи в главном потоке) создала нужные формы.

> что сводит авторизацию на 0

если авторизация сводится к тому, что у вас форма хитро спрятана, то она и так на нуле )

[3D Hunter]

создайте в вашем потоке процедуру:

uses
  Forms;
...
procedure ThrCreateForm;
begin
   with TForm.Create(Application) do ShowModal;
end;

В методе Execute вашего потока, где нужно создать форму, пишите:

  Synchronize(ThrCreateForm);

[Pamparam]

Сообщение от 3D Hunter

создайте в вашем потоке процедуру:

uses
  Forms;
...
procedure ThrCreateForm;
begin
   with TForm.Create(Application) do ShowModal;
end;

В методе Execute вашего потока, где нужно создать форму, пишите:

  Synchronize(ThrCreateForm);

спс окно грузится, но с фреймами проблемы, при любом обращении к ним вылазят эксепшены. У меня 3 фрейма на создаваемой форме, как их загружать?
---------------------------
Debugger Exception Notification
---------------------------
Project Project31.exe raised exception class EAccessViolation with message 'Access violation at address 00545A16 in module 'Project31.exe'. Read of address 00000324'. Process stopped. Use Step or Run to continue.
---------------------------

[3D Hunter]

как вызываете? где используете? код в студию

[Pamparam]

в потоке я создал сначала форму без фреймов, а из нее при формкриейте создал остальные
так все норм, спс

[GunSmoker]

http://www.delphikingdom.ru/asp/view...catalogid=1355

Создание формы в потоке

BAM! Headshot.

в потоке я создал сначала форму без фреймов, а из нее при формкриейте создал остальные

Какое слово в

к VCL нельзя обращаться не из главного потока.

не понятно?

[3D Hunter]

GunSmoker, да ТС уже убежал на радостях, схавал фишку и все заробило у него, а главного совета не увидел)) что ж, с Богом