Subversion Repositories decoder

Compare Revisions

Regard whitespace Rev 9 → Rev 10

/trunk/Quelltext/About.pas
69,7 → 69,7
 
procedure TAboutForm.lbl_urlClick(Sender: TObject);
begin
shellexecute(application.Handle, 'open', 'http://www.viathinksoft.de/', '', '', sw_normal);
shellexecute(application.Handle, 'open', 'https://www.viathinksoft.de/', '', '', sw_normal);
end;
 
procedure TAboutForm.btn_closeClick(Sender: TObject);