PDA

Archiv verlassen und diese Seite im Standarddesign anzeigen : [Delphi] kopie von Datei verschieben



Crash-Override
20.03.2004, 23:54
Hi, wie ache ich es bei Delphi, das wenn man auf einen Button klickt, das dann eine Datei in ein anderes Verzeich iss kopiert wird...aber nur kopiert, nicht verschoben...?

Freezy
21.03.2004, 00:26
http://www.delphi-source.de/tipps/dateien/?id=77

Soll heisen:

CopyFile(PChar('von'), PChar('nach'), true);

thats all

Crash-Override
21.03.2004, 00:41
Danke, aber das funzt nur mit genauem Dateinamen...also:

CopyFile(PChar(OpenDialog1.Filename), PChar('C:\1.txt'), true);
aber wie mach ichs, das die Datei den selben Dateinamen hat wie die geladene?

Ineluki
21.03.2004, 02:07
Procedure Button1Click(Sender:TObjct);
var filename:String;
begin
if Not(OpenDialog1.execute) then Exit;
filename:=ExtractFileName(Opendialog1.Filename);
CopyFile(PChar(OpenDialog1.filename),PChar('C:\Wo\Du\Auch\Hin\Willst\' + filename));
end;