Internetlink mit variablen link

[shmia]

Nimm einfach diese Funktion:

Delphi-Quellcode:

function OpenURL(const url: string): Boolean;
begin
   Result := ShellExecute(0, 'open', PChar(url), nil, nil, SW_SHOW) > 32;
end;

Anwendungsbeispiel:

Delphi-Quellcode:

if not OpenURL('http://www.delphipraxis.net/'+ Format('topic%d.html', [122269])) then
   ShowMessage('URL konnte nicht geöffnet werden');