NewsStartPage1Click method

Applies to
TForm2

Declaration
procedure NewsStartPage1Click(Sender: TObject);

Implementation

procedure TForm2.NewsStartPage1Click(Sender: TObject);
begin try
play_snd(1);
self.Notebook1.PageIndex:=6;
SetPriorityClass(GetCurrentProcess,high_p);
if (Trim(wikinews_console.LocationURL)='')or(Sender=OHHotLabel3) then
        wikinews_console.Go(get_ini_params('wikis','wikinews.main'));
except end;End;


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