Zitat von
lbccaleb:
Vor kurzem wurde hier ne gute Klasse für sowas reingestellt, vllt währe das was für dich, wenn es nun auch nicht direkt was zu dem Problem ist:
FinFilesCls
Erstmal das
Dann gibt es auch noch einige andere FindAllFiles-Funktionen in der
DP und CodeLib.
FindAllFiles &
FindAllFiles
Zitat von
Gargamel:
access violation at 0x7c91e8e6: write of address 0x00030ffc
Und an welcher Stelle/CodeZeile tritt diese
Exception auf?
[add]
Der Gund ist
Zitat:
Code:
if FindFirst(aPath+aMask,aAttr,aRes) [color=#ff0000][b]<[/b][/color] 0 then exit;
Es stimmt zwar, daß viele Fehlercodes negativ (31. Bit gesetzt >
OLE Error Codes = Severity-Flag),
aber
Delphi-Quellcode:
{ The system cannot find the file specified. }
ERROR_FILE_NOT_FOUND = 2;
Zitat:
FindFirst returns 0 if a file was successfully located, otherwise, it returns an error code.
Die Umkehrung von =0 ist <>0