Thema: Delphi probleme mit filecopy

Einzelnen Beitrag anzeigen

fuisch

Registriert seit: 26. Dez 2004
18 Beiträge
 
Delphi 6 Personal
 
#1

probleme mit filecopy

  Alt 26. Dez 2004, 16:08
in meinem programm sollen mehrere dateien mittels filecopy kopiert werden, allerdings startet der pc jedes mal nach einem bestimmtem (von mal zu mal verschiedenem, bereich zwischen 100 und 300 MB) kopierten dateivolumen einfach so neu (bzw stürzt ab)

mein betriebssystem ist windows 98se

habe den verdacht dass es mit dem ram zusammenhängt, einmal deshalb weil das dateivolumen nach dem der pc abstürzt in nem bereich liegt in dem der ram in frage kommen könnte und weil das volumen immer ein wenig anders ist...

thx für hilfe schonmal!

hier noch der code:
Code:
found:=findfirst(ordner+'/*', faAnyFile, Srec);
while found=0 do
 begin
 if ((Srec.Attr and faDirectory)=0) then
  begin
  if CopyFile(PChar(ordner+'/'+Srec.name),PChar(zielordner+'/'+zusichernderordner+'/'+Srec.Name),true) then
   memostatus.Lines.add(Srec.Name+' erfolgreich nach '+zielordner+'/'+zusichernderordner+'/'+Srec.Name+' kopiert')
  else memostatus.lines.add(Srec.Name+' konnte nicht nach '+zielordner+'/'+zusichernderordner+'/'+Srec.Name+' verschoben werden');
  end;
 found:=findnext(Srec);
 end;
findclose(Srec);
  Mit Zitat antworten Zitat