Bild auf externen Rechner hochladen

[Woyzeck]

Hallo zusammen,

ich habe vor, über ein Delphi-Formular eine Bilddatei auszuwählen, die dann auf einem externen Rechner abgelegt werden soll.

Leider funktioniert das noch nicht so, wie ich mir das vorstelle:

Delphi-Quellcode:

procedure TfrmMain.btnBildUploadClick(Sender: TObject);
var DateiPfad,ServerVerzeichnis:String;
begin
If OpenPictureDialog2.Execute() then
begin
  DateiPfad:=OpenPictureDialog2.FileName;
  ServerVerzeichnis:='\\'+frmSQL.SQLServer+'\images\'+ExtractFileName(DateiPfad);
  CopyFile(PWideChar(DateiPfad),PWideChar(ServerVerzeichnis) ,true);
end;
end;

Zur Erläuterung des Zielpfades: in der Variable frmSQL.SQLServer steht die IP-Adresse des Servers drin und images ist ein für das Netzwerk freigegebener Ordner ohne Schreibschutz.

Wo steckt mein Denkfehler?

Schon einmal im Voraus vielen Dank

Woyzeck