html link in delphi

Delphi~Anfänger · Beiträge: 97

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:

uses {...,}shellapi;

{...}
procedure TForm1.Label9Click(Sender: TObject);
begin
if shellexecute(handle,'open','http://www.delphi-forum.de',nil,nil,sw_show)<=32
then showmessage('Internetseite konnte nicht geöffnet werden!');
end;

end.

Fehler:

Zitat:

Deklaration erwartet, aber "USES" gefunden

raziel · Verfasst: Fr 04.06.04 19:56

uses im interface abschnitt?

_________________
JSXGraph

Delphi~Anfänger · Beiträge: 97

ich meine das uses: uses {...} shellapi;

was heißt INERFACE ?

raziel · Verfasst: Fr 04.06.04 20:05

du hast mehrere bereiche in einer delphi-anwendung.
gewöhnlich sind es zwei:
interface und implementation
außerdem dürfte im interface teil bereits ein uses stehen. entfern da am ende einfach das semikolon und schreib das hier hin:

markieren

Delphi-Quelltext

1:	, ShellAPI;

raziel

_________________
JSXGraph

Delphi~Anfänger · Beiträge: 97

funzt aber nicht immer noch gleicher fehler!!

Delphi~Anfänger · Beiträge: 97

geht jetzt

einfach so:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:

procedure TForm1.Label9Click(Sender: TObject);
begin
if shellexecute(handle,'open','http://www.delphi-forum.de',nil,nil,sw_show)<=32
then showmessage('Internetseite konnte nicht geöffnet werden!');
end;

end.

Ohne:uses

raziel · Verfasst: Fr 04.06.04 20:24

dann post bitte etwas mehr code.
hast du auch nur ein uses im interface oder zwei?
//edit: auf die idee muss man erstmal kommen eine unit zweimal einzubinden... :roll:

_________________
JSXGraph

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme