procedure TForm2.FormCreate(Sender: TObject);
var tdate : String; reg1:TRegIniFile;
begin try
norm_p:=get_acc_level(0);
high_p:=get_acc_level(1);
SetPriorityClass(GetCurrentProcess,norm_p);
media_file_list:=TStringList.Create;
download_types:=TStringList.Create;
_log:=TStringList.Create;
_log.Add('WikiBrowse Starts at : '+DateTimeToStr(now));
_log.Add('WikiBrowse Starts from : '+root+'*');
if form2.get_ini_params('system','log_file')='0' then
   _log.Add('WikiBrowse Internal logging feature is disable by user');
form2._log.SaveToFile(form2.root+'wikibrowse.log');
fav_:=Tinifile.Create(get_fav_list);

reg1:=TRegIniFile.Create;
reg1.RootKey := HKEY_CURRENT_USER;
frnt_ui_delta:=reg1.ReadInteger('\SOFTWARE\WikiBrowse\1.0','front_UI_delta',0);
reg1.free;
wikipedia_console:=TEmbeddedWB.Create(Panel2);
wikipedia_console.ParentWindow:=Panel2.Handle;
wikipedia_console.Top:=0; wikipedia_console.Left:= -158;
wikipedia_console.Width:=Panel2.Width+(Abs(wikipedia_console.Left)-1);
wikipedia_console.Height:=Panel2.Height;
wikipedia_console.RegisterAsBrowser :=true;
wikipedia_console.RegisterAsDropTarget :=false;
wikipedia_console.OnDocumentComplete :=wikipedia_consoleDocumentComplete;
wikipedia_console.OnBeforeNavigate2 :=self.BrowserBeforeNavigate2;
wikipedia_console.OnProgressChange :=WikisProgressChange;
wikipedia_console.HideBorders :=true;

wikimedia_console :=TEmbeddedWB.Create(Panel7);
wikimedia_console.ParentWindow:=Panel7.Handle;
wikimedia_console.Top:=0; wikimedia_console.Left:= wikipedia_console.Left;
wikimedia_console.Width:=wikipedia_console.Width;
wikimedia_console.Height:=Panel7.Height;
wikimedia_console.RegisterAsBrowser :=true;
wikimedia_console.RegisterAsDropTarget :=false;
wikimedia_console.OnDocumentComplete :=wikipedia_consoleDocumentComplete;
wikimedia_console.OnBeforeNavigate2 :=self.BrowserBeforeNavigate2;
wikimedia_console.OnProgressChange :=WikisProgressChange;
wikimedia_console.HideBorders :=true;

wikidict_console :=TEmbeddedWB.Create(Panel9);
wikidict_console.ParentWindow:=Panel9.Handle;
wikidict_console.Top:=0; wikidict_console.Left:= wikipedia_console.Left;
wikidict_console.Width:=wikipedia_console.Width;
wikidict_console.Height:=Panel9.Height;
wikidict_console.RegisterAsBrowser :=true;
wikidict_console.RegisterAsDropTarget :=false;
wikidict_console.OnDocumentComplete :=wikipedia_consoleDocumentComplete;
wikidict_console.OnBeforeNavigate2 :=self.BrowserBeforeNavigate2;
wikidict_console.OnProgressChange :=WikisProgressChange;
wikidict_console.HideBorders :=true;

wikibooks_console :=TEmbeddedWB.Create(Panel16);
wikibooks_console.ParentWindow:=Panel16.Handle;
wikibooks_console.Top:=0; wikibooks_console.Left:= wikipedia_console.Left;
wikibooks_console.Width:=wikipedia_console.Width;
wikibooks_console.Height:=Panel16.Height;
wikibooks_console.RegisterAsBrowser :=true;
wikibooks_console.RegisterAsDropTarget :=false;
wikibooks_console.OnDocumentComplete :=wikipedia_consoleDocumentComplete;
wikibooks_console.OnBeforeNavigate2 :=self.BrowserBeforeNavigate2;
wikibooks_console.OnProgressChange :=WikisProgressChange;
wikibooks_console.HideBorders :=true;

wikinews_console :=TEmbeddedWB.Create(Panel18);
wikinews_console.ParentWindow:=Panel18.Handle;
wikinews_console.Top:=0; wikinews_console.Left:= wikipedia_console.Left;
wikinews_console.Width:=wikipedia_console.Width;
wikinews_console.Height:=Panel18.Height;
wikinews_console.RegisterAsBrowser :=true;
wikinews_console.RegisterAsDropTarget :=false;
wikinews_console.OnDocumentComplete :=wikipedia_consoleDocumentComplete;
wikinews_console.OnBeforeNavigate2 :=self.BrowserBeforeNavigate2;
wikinews_console.OnProgressChange :=WikisProgressChange;
wikinews_console.HideBorders :=true;

wikiquote_console :=TEmbeddedWB.Create(Panel20);
wikiquote_console.ParentWindow:=Panel20.Handle;
wikiquote_console.Top:=0; wikiquote_console.Left:= wikipedia_console.Left;
wikiquote_console.Width:=wikipedia_console.Width;
wikiquote_console.Height:=Panel18.Height;
wikiquote_console.RegisterAsBrowser :=true;
wikiquote_console.RegisterAsDropTarget :=false;
wikiquote_console.OnDocumentComplete :=wikipedia_consoleDocumentComplete;
wikiquote_console.OnBeforeNavigate2 :=self.BrowserBeforeNavigate2;
wikiquote_console.OnProgressChange :=WikisProgressChange;
wikiquote_console.HideBorders :=true;

wikisource_console :=TEmbeddedWB.Create(Panel22);
wikisource_console.ParentWindow:=Panel22.Handle;
wikisource_console.Top:=0; wikisource_console.Left:= wikipedia_console.Left;
wikisource_console.Width:=wikipedia_console.Width;
wikisource_console.Height:=Panel18.Height;
wikisource_console.RegisterAsBrowser :=true;
wikisource_console.RegisterAsDropTarget :=false;
wikisource_console.OnDocumentComplete :=wikipedia_consoleDocumentComplete;
wikisource_console.OnBeforeNavigate2 :=self.BrowserBeforeNavigate2;
wikisource_console.OnProgressChange :=WikisProgressChange;
wikisource_console.HideBorders :=true;

wikispices_console :=TEmbeddedWB.Create(Panel24);
wikispices_console.ParentWindow:=Panel24.Handle;
wikispices_console.Top:=0; wikispices_console.Left:= wikipedia_console.Left;
wikispices_console.Width:=wikipedia_console.Width;
wikispices_console.Height:=Panel18.Height;
wikispices_console.RegisterAsBrowser :=true;
wikispices_console.RegisterAsDropTarget :=false;
wikispices_console.OnDocumentComplete :=wikipedia_consoleDocumentComplete;
wikispices_console.OnBeforeNavigate2 :=self.BrowserBeforeNavigate2;
wikispices_console.OnProgressChange :=WikisProgressChange;
wikispices_console.HideBorders :=true;

WinExec32andWait(root+'netstper.exe',0);
sp_1.Picture.LoadFromFile(root+'Support\intro5893n372.jpg');
DateTimeToString(tdate,'yyyy mmmm dd',now);
now_factor.Caption :=tdate;
bborad1.Active := true;
HookID := SetWindowsHookEx(WH_MOUSE, MouseProc, 0, GetCurrentThreadId());
in_main_UI:=true;
notebook1.PageIndex :=1;
get_wikibrws_accept_file_types(download_types);

try case REgReadInteger(HKEY_CURRENT_USER,'Software\WikiBrowse\1.0','videomode') of
   0:begin
         DSVideoWindowEx1.AspectRatio := rmStretched;
         Stretched1.Checked :=true;
     end;
   1:begin
         DSVideoWindowEx1.AspectRatio := rmLetterBox;
         LetterBox1.Checked :=true;
     end;
   2:begin
         DSVideoWindowEx1.AspectRatio := rmCrop;
         Crop1.Checked :=true;
     end;
end; except end;

draw_plugins_list_frm2;
update_mmedia_list(compile_path(get_ini_params('cache','media')));
url_cats := TStringList.Create;
url_cats.LoadFromFile(root+'System\directnav.brs');
update_ui_media_component;
if media_file_list.Count>0 then minfo_list.ItemIndex :=0;

run_fav_loader1.Execute;
except
on E : Exception do _log_entry_error(E.ClassName,E.Message,'A10000');
end;End;