Timer1Timer method

Applies to
TForm1

Declaration
procedure Timer1Timer(Sender: TObject);

Implementation

procedure TForm1.Timer1Timer(Sender: TObject);
begin try
Timer1.Enabled :=false;
Application.CreateForm(TForm2, Form2);
form2.SkinData1.skinfile:=form2.root+'System\wikibrowse.skn';
form2.SkinData1.Active:=true;
form10:=TForm10.Create(nil);        {to avoid mem fails}
form2.enum_research_projects;
form2.plugin1.PluginFolder :=form2.root +'Plugins';
form2.plugin1.LoadPlugins;
form2.JvFormStorage1.RestoreFormPlacement;
form2.Hide;
form2.param_loader.Enabled :=true;
Hide;
form1.final_loader.Enabled :=true;
except end;End;


HTML generated by Time2HELP
http://www.time2help.com