Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.06.25;
Скачать: 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 вся ветка

Текущий архив: 2006.06.25;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.048 c
2-1149512871
VitV
2006-06-05 17:07
2006.06.25
Не могу найти компоненты TSocket....


3-1146110130
Insane SPIRIT
2006-04-27 07:55
2006.06.25
После SQL-запроса Table1 недоступна!


6-1125580152
Gold
2005-09-01 17:09
2006.06.25
IdPOP31.Retrieve(i,IdMessage1) - coding table entry not found


2-1149588259
D@Nger
2006-06-06 14:04
2006.06.25
Ошибка при поиске методом Locate


2-1149505921
FiJer
2006-06-05 15:12
2006.06.25
Как можно выровнить текст в Edit по вертикали?