ok wenn das dann doch der ganze pfad ist hab ich jetzt ein neues problem :S
Zitat:
procedure TForm1.Button1Click(Sender: TObject);
var speicherort:string;
a:integer;
begin
try
if savedialog1.Execute() then speicherort:= savedialog1.filename;
begin
copyfile('C:\11test', speicherort, true);
end;
except
messagedlg('Fehler!', mterror, [mbok], 0);
end;
end;
savedialog1.filename ist ein string, copyfile verlangt jedoch ein pansichar. wird wohl nicht gehen so wie ich mir das vorgestellt hatte oder?
/edit: funktioniert mit
Zitat:
pchar(speicherort)
, hat sich damit erledigt. vielen dank
