Datei kopieren

hansg · Verfasst: Do 25.03.04 18:55

Hallo zusammen,

wie kann ich eine Datei mit freier Zielauswahl kopieren?
Der obere Code funktioniert, in dem zweiten möchte ich aber das Zielverzeichnis wählen.
Das Ziel befindet sich in einem String, dieser ergibt sich aus einer FileListBox.

Wie stellt man so was an?

markieren

Delphi-Quelltext

1:
2:
3:
4:

  
begin
   copyFile PChar ('C:\Test.txt'), PChar('D:\Test.txt'), false);
end;

markieren

Delphi-Quelltext

1:
2:
3:
4:

  
begin
   copyFile PChar ('C:\Test.txt'), PChar(????), false);
end;

_________________
Gruß Hans

Ehemaliges Mitglied Erhaltene Danke: 1

Ein Beispiel von mehreren: Suche in: Delphi-Forum, Delphi-Library

SHBROWSEFORFOLDER.

NetZwerg · Beiträge: 448 Slackware 10.1 Kylix 3, D5 Standard

markieren

Delphi-Quelltext

1:
2:
3:
4:

procedure TForm1.Button1Click(Sender: TObject);
begin
  copyFile(PChar('C:\Test.txt'),PChar(Edit1.text), false); 
end;

Jetz brauchst du nur noch n Edit1 wo der Dateiname der Zeildatei drinsteht.

delphi]procedure TForm1.Button1Click(Sender: TObject);
begin
copyFile(PChar('C:\Test.txt'),PChar(''+Edit1.text+'\Test.txt' ), false);
end;[/delphi]
So wär's wenn man nur das Verzeichnis auswählen sollte.

cYa, Dave :twisted:

Moderiert von Peter Lustig: Code- durch Delphi-Tags ersetzt

_________________
"Manche Leute drücken nur deshalb ein Auge zu, damit sie besser zielen können."
Billy Wilder, amer. Filmregisseur

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme