function is_internal_cmd(url:String) : Boolean;
begin
Result:=false;
StrReplace(url,'event:','',[rfIgnoreCase, rfReplaceAll]);
if lowercase(ExtractFileExt(url))='.mac' then begin
   if lowercase(extractfilename(url))='ie_settings.mac' then begin
      form2.play_snd(1);
      WinExec(PChar(trim(form2.compile_path(form2.get_ini_params('system','ie_config')))),SW_SHOW);
      Result:=true;
   end;
   if lowercase(extractfilename(url))='wiki_help.mac' then begin
      form2.WikiBrowseHelp1Click(nil);
      Result:=true;
   end;
   if lowercase(extractfilename(url))='wikibrws.mac' then begin
      form2.play_snd(1);
      ShellExecute(0,'open',PChar(form2.get_ini_params('system','home')),'','',SW_MAXIMIZE);
      Result:=true;
   end;
end;
End;