InternetSeite aufrufen (ShellExecute)

[APP]

Schade, sonst hätte ich Dir

Delphi-Quellcode:

    FUNCTION ExtractLongFileName(CONST FileName: STRING): STRING;
    VAR
      Info                         : TSHFileInfo;
    BEGIN
      IF SHGetFileInfo(PChar(FileName), 0, Info, Sizeof(Info), SHGFI_DISPLAYNAME) <> 0 THEN
        Result := STRING(Info.szDisplayName)
      ELSE
        Result := FileName;
    END;

empfohlen

BTW: wenn Du die Parameter mit verwenden möchtest, (sind wohl nur für Shelleoperationen nötig) dann
gibt es in der Shellexecute-Funktion einen eigenen Parameter dafür:

Code:

    LPCTSTR lpParameters,   // pointer to string that specifies executable-file parameters