mirror-github-bspeice/apophysis
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fixed wrong 'hints'

Browse Source
This commit is contained in:
zueuk
2005-10-30 16:03:58 +00:00
parent c6bc21a062
commit f5af5a80ba
2 changed files with 29 additions and 50 deletions
Download Patch File Download Diff File Expand all files Collapse all files

21
2.10/Source/About.pas
View File

@ -47,9 +47,6 @@ type
Label15: TLabel;
Bevel2: TBevel;
Bevel3: TBevel;
procedure Label15Click(Sender: TObject);
procedure Label14Click(Sender: TObject);
procedure Label13Click(Sender: TObject);
procedure btnOKClick(Sender: TObject);
procedure Label4Click(Sender: TObject);
procedure lblFlamecomClick(Sender: TObject);
@ -109,22 +106,4 @@ begin
nil, nil, SW_SHOWNORMAL);
end;
procedure TAboutForm.Label13Click(Sender: TObject);
begin
ShellExecute(ValidParentForm(Self).Handle, 'open', PChar('http://www.tmssoftware.com/'),
nil, nil, SW_SHOWNORMAL);
end;
procedure TAboutForm.Label14Click(Sender: TObject);
begin
ShellExecute(ValidParentForm(Self).Handle, 'open', PChar('http://www.destructor.de/'),
nil, nil, SW_SHOWNORMAL);
end;
procedure TAboutForm.Label15Click(Sender: TObject);
begin
ShellExecute(ValidParentForm(Self).Handle, 'open', PChar('http://pngdelphi.sourceforge.net/'),
nil, nil, SW_SHOWNORMAL);
end;
end.