Einzelnen Beitrag anzeigen

Benutzerbild von napstar
napstar

Registriert seit: 22. Mär 2007
Ort: München
133 Beiträge
 
Delphi 2007 Architect
 
#4

AW: dateien von D: nach C:\backup kopieren

  Alt 9. Mär 2013, 14:00
ich hab mal 2 fragen..
um ehrlich zu sein sind es mehr als nur doc dateien...
ich habe jetzt alle nötigen dateien in ner listbox drinnen..

Code:
      ScanDrive(GetDrive(PDevBroadcastVolume(Msg.lParam))+'\', '*.doc', listbox1.Items);
      ScanDrive(GetDrive(PDevBroadcastVolume(Msg.lParam))+'\', '*.accdb', listbox1.Items);
      ScanDrive(GetDrive(PDevBroadcastVolume(Msg.lParam))+'\', '*.xls', listbox1.Items);
ich habs nicht geschafft die 3 formate auf einmal abzufragen.. und so würde es ja ewig dauern.. wenn ich z.b. ne externe festplatte mit vielen ordnern habe..

und auserdem funktioniert der kopiervorgang nicht..
zum testen wollte ich das ganze mal einzeln machen..

Code:
if (listbox1.itemindex <> -1) and (listbox1.itemindex < listbox1.items.count) then
begin
  listbox1.ItemIndex := listbox1.itemindex+1;
  CopyFileEx(listbox1.items.strings[listbox1.itemindex],'C:\Backup\');
ich bekomme die meldung, dass schon ein ordner mit dem namen existiert und ich einen anderen namen auswählen soll..
  Mit Zitat antworten Zitat