OHHotLabel8Click method

Applies to
TForm2

Declaration
procedure OHHotLabel8Click(Sender: TObject);

Implementation

procedure TForm2.OHHotLabel8Click(Sender: TObject);
begin try
if Sender<>nil then play_snd(1);
WinExec(PChar(compile_path(get_ini_params('system','wikiresearch'))),1)
except
on E : Exception do _log_entry_error(E.ClassName,E.Message,'CA56200');
end;End;


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