ShellExecute und CopyFile Problem

[Markus.S]

Hallo Leute,

habe folgendes Problem:

Habe vor längerer Zeit mal ein Datenbankprogramm geschrieben welches auf einen Server(NAS-System) Dateien(pdf,msg,..) ablägt bzw. mit Standardprogramm von Windows geöffnet wird.

Nun ist es so, das in unserem Büro ein Win7 Rechner dazugekommen ist (Rest sind XP-Rechner).
Es ist jetzt so, dass mit den XP-Rechner alles klappt - Auf Server kopieren und auch öffnen.

Nur mit dem Win7 Rechner will es einfach nicht, weder hinkopieren noch das öffenen ist möglich.

Mein Code für:

Kopieren: if CopyFile(Pchar(quellpfad),Pchar(Netzpfad + DateiName),True) then .

Öffenen: ShellExecute(Form1.Handle, 'open', PChar(ProgrammPfad), nil, nil, SW_SHOW);

kann mir wer helfen und sagen was da jetzt bei Win7 neu gemacht werden muss? Leider mit der Suchfunktion nichts passendes gefunden.

Thx