.url öffnen geht nicht

[sx2008]

Dein "filename" ist sicher nicht korrekt, denn wenn man Memo1.Text abruft sind immer CR/LF enthalten (ausser das Memofeld wäre leer).
Wenn du prüfst, ob ein Dateiname in Ordnung ist, dann darfst du dich nicht auf dein Gehirn verlassen
(denk an den Tomaten-Auf-Den-Augen-Effekt)
sondern solltest das im Programm überprüfen:

Delphi-Quellcode:

if not FileExists(filename) then
  raise Exception.CreateFmt('Datei %d existiert nicht', [filename];

Hier erst einmal kleine Hilfsfunktion

Delphi-Quellcode:

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

// Beispielaufrufe
OpenURL('http://www.delphipraxis.net');
OpenURL('C:\MeineFavoriten\test.url');