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