kann keine *.lnk öffnen

[BlackBird1977]

Hallo auf einigen Systemen - was genau die Ursache weis ich nicht deswegen schreibe ich hier - hab ich mit meinem Programm ein Problem *.lnk Dateien zu öffnen bei mir zB.: XP Pro mit SP2 und XP PRO SP1 geht es OHNE Probleme.
Bei einem Nutzer - der XP Pro SP1 nutzt geht es nicht statt das die Verknüpfung ordentlich geöffnet wird, erscheint das - was Ihr auf dem Bild sehen könnt...


Bin ratlos.

zum öffnen der *.lnk benutzte ich

Delphi-Quellcode:

procedure ExecuteProgramm(const PFileName: string);
var
  SEInfo: TShellExecuteInfo;
  ExitCode: DWORD;
  ExecuteFile: string;
begin
  ExecuteFile := '"' + PFileName + '"';
  FillChar(SEInfo, SizeOf(SEInfo), 0);
  SEInfo.cbSize := SizeOf(TShellExecuteInfo);

  with SEInfo do
  begin
    fMask := SEE_MASK_NOCLOSEPROCESS;
    Wnd := Application.Handle;
    lpFile := PChar(ExecuteFile);
    nShow := SW_SHOWNORMAL;
  end;

  if ShellExecuteEx(@SEInfo) then
  begin
    repeat
      Application.ProcessMessages;
      GetExitCodeProcess(SEInfo.hProcess, ExitCode);
    until (ExitCode <> STILL_ACTIVE) or
      Application.Terminated;
  end else
  begin
    Application.MessageBox('Error - konnte Datei nicht öffnen', 'Hinweis', MB_SYSTEMMODAL);
  end;
end;

Hab es aber auch schon mit ShellExecute und WinExec versucht ;(