Скачать: CL | DM;

procedure TForm1.FormCreate(Sender: TObject); Параметры формы   Найти похожие ветки 

← →
XTD ©   (2006-06-06 12:21) [0]

Я хочу сделать при загрузки формы такую вещь:

form1.Height:=0;
q:=0;
a:=455;
for q:=1 to a do
begin
 //как сделать таймаут 0,5 секунд?
 form1.Height:=q;
end;

Но почему-то окно не раскрывается (как задумано в цикле), а просто появляется. Что делать ? Что посоветуете ?

---

← →
Ega23 ©   (2006-06-06 12:27) [1]

Читай разницу между событиями TForm.OnCreate, TForm.OnActivate и TForm.OnShow

---

← →
ЮЮ ©   (2006-06-06 12:27) [2]

Не в FormCreate же, в конце концов. Посмотри рядом обсуждается:

экран + мышка
http://delphimaster.net/view/2-1149571360/

---

← →
XTD ©   (2006-06-06 12:30) [3]

OK! Спасибо ...

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: -0.963 c