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