Динамическое создание форм

← →
Leksey (2005-03-15 20:04) [0]

Вопрос такой, создаю подряд 30 форм динамически где owner у меня само Application. Но возникает проблема, главная форма при ее перемещении начинает страшно тормозить причем созданные 30 форм я еще не вывел на экран, а только создал. В конце концов при закрытии моё приложение подвешивает на пару сек комп. Неужели 30 невидимых форм это много? может знаете как формы создавать так чтобы это было без таких страшных тормозов?

← →
begin...end © (2005-03-15 20:33) [1]

> Leksey (15.03.05 20:04)

Если все эти 30 форм не нужны одновременно, то, может быть, не нужно их создавать сразу ВСЕ?

← →
Юрий Зотов © (2005-03-16 00:27) [2]

> создаю подряд 30 форм динамически

Динамически, говорите?

Скажите, а чем же такое "динамическое" создание отличается от статического? Только тем, что Create написали Вы, а не Delphi?

А какая разница?

Leksey (15.03.05 20:04)

Видимо раз страшно тормозит, значит невидимые формы что-то делают? Ведь если просто создать 30 пустых форм, да хоть 100 томозить ничего не будет.

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

procedure TForm1.Button1Click(Sender: TObject);
var i : integer;
begin
for i := 0 to 100 do
TForm1.Create( Application ).Show;
end;

Динамическое создание форм Найти похожие ветки