Вверх ↑
Ответов: 16884
Рейтинг: 1239
#1: 2010-11-08 22:56:09 ЛС | профиль | цитата
nesco, немного освободился.
Давай разберёмся, что делает твой совет с таймером.

procedure THIMainForm.Load;
begin
_hi_OnEvent(_event_onCreate);
Control.Visible := _prop_Visible;
end;
1. При запуске программы, появляется событие onCreate.
2. Запускается Timer
3. И пока он считает своё время
4. Срабатывает вторая строчка Control.Visible := _prop_Visible;
5. А так как мы таймером (по идее) "задержали" onCreate, то в итоге и получили
вот такой порядок срабатывния.

procedure THIMainForm.Load;
begin
Control.Visible := _prop_Visible;
_hi_OnEvent(_event_onCreate);
end;
Смоделировать
nesco писал(а):
ненужные артефакты перерисовки
не получилось.
Может попробуешь (на досуге) смоделировать ?
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0