Einzelnen Beitrag anzeigen

RomanTK

Registriert seit: 17. Apr 2007
1 Beiträge
 
#1

TShellLink / ShellLinkResolve "Problem"

  Alt 17. Apr 2007, 13:05
Hallo zusammen , habe mich nun auch mal angemeldet nach dem ich ein paar Wochen hier mit gelesen habe

Und gleich zu beginn habsch ne kleine Frage

Ich möchte von einer Dateiverknüpfung den Pfad der verknüpften Datei auslesen. Bin be der Boardsuche auf TShellink und damit verbunden auf die Funktion ShellLinkResolve gestoßen.

Dort fand ich dieses Code Beispiel :

Delphi-Quellcode:
function GetLinkTarget(const link: string): string;
var
  LinkInfo: TShellLink;
begin
  try
    LinkInfo.IdList := nil;
    OleCheck(ShellLinkResolve(Link, LinkInfo));
    result := LinkInfo.Target;
  finally
    ShellLinkFree(LinkInfo);
  end;
end;
Das ganze funktioniert und gibt die Pfade aus , was schonmal sehr schön ist

Allerdings wird automatisch nach der Originaldatei gesucht wenn sie nicht vorhanden ist ! Dazu wird der hiweiss "Fehlende Verknüpfung" aufgerufen. Dies ist zwar schön und gut .. aber ich möchte es nicht.

Gibt es vieleicht irgendeine Möglichkeit dies zu unterbinden ??


Gruß Roman
  Mit Zitat antworten Zitat