procedure THIMainForm.Load;begin
  _hi_OnEvent(_event_onCreate);
  Control.Visible := _prop_Visible;
end;

Control.Visible := _prop_Visible;