Dateien kopieren mit Platzhalter??

**Ammersmann**

Hallo,
Ich suche nach einer einfachen Metode Dateien von der Festplatte auf eine Diskette zu kopieren.
Ich möchte alle Dateien eines Verzeichnisses mit der Endung ( DB ) und ( PX ) kopieren.

Im Moment mache ich das so wie im Beispiel unten:

markieren

Delphi-Quellcode:

			CopyFile(Pchar('C:\ABC\Kunden.db'),Pchar('A:\Ablage\Kunden.DB'),false) ;

CopyFile(Pchar('C:\ABC\Rechnungen.db'),Pchar('A:\Ablage\Rechnungen.DB'),false);

CopyFile(Pchar('C:\ABC\Nummer.db'),Pchar('A:\Ablage\Nummer.DB'),false);

CopyFile(Pchar('C:\ABC\Nummer.px'),Pchar('A:\Ablage\Nummer.px'),false);

FARGE:

Gibt es nicht auch eine Möglichkeit das in ein zwei zeilen zu bringen da es sich bei mit um ca.45 Dateien handelt, ich Dachte da an so was wie.

markieren

Delphi-Quellcode:

			CopyFile(Pchar('C:\ABC\*.db'),Pchar('A:\Ablage\'),false) ;

CopyFile(Pchar('C:\ABC\*.px'),Pchar('A:\Ablage\'),false) ;

Geht bei mir aber nicht!!
WIESO???

Und gibt es eine Möglichkeit die Dateien in A:\Ablage vor dem Kopieren zu löschen, wenn das Verzeichnis den schön angelegt ist?

[edit=SirThornberry]Delphi-Tags gesetzt - Mfg, SirThornberry[/edit]

Dateien kopieren mit Platzhalter??

Dateien kopieren mit Platzhalter??

Forumregeln