Hallo

Ich möchte gerne in ein DBEdit Feld einen Hyperlink oder eine emailadresse eingeben und nach der Eingabe wird der Eintrag las effektiven Hyperlink zum anklicken erkannt.

Wie geht das?

Michael

Zitat von lemi4ever:

Ich möchte gerne in ein DBEdit Feld einen Hyperlink oder eine emailadresse eingeben und nach der Eingabe wird der Eintrag las effektiven Hyperlink zum anklicken erkannt.

Font.Color auf Blau und Font.Style auf Unterstrichen setzen, damit der Inhalt wie ein Hypherlink aussieht.

markieren

Delphi-Quellcode:

function OpenURL(const url: string): Boolean;
begin
   // uses Shellapi nicht vergessen
   Result := ShellExecute(Application.MainForm.Handle, 'open', PChar(url), nil, nil, SW_SHOW) > 32;
end;

.....DBEdit1Doubleclick(.....);
begin
   OpenURL(DBEdit1.Text);
end;