procedure TForm1.WikiBrowseCentral1Click(Sender: TObject);
var ini1:TIniFile; str1:String;
begin try
if Sender<>nil then play_snd(1);
ini1:=TINiFile.Create(root+'wikibrowse.ini');
str1:=trim(compile_path(ini1.ReadString('system','wikibrws_cntrl','')));
if StrLeft(str1,1)<>'"' then str1:='"'+str1;
WinExec(PChar(str1),1);
ini1.Free;
except end;End;