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