ist euch eigentlich aufgefallen dass die If Bedingungen von cherry falsch sind ?
Zitat:
Delphi-Quellcode:
if (hr and ERROR_FILE_NOT_FOUND = 0) then
result := rsERROR_FILE_NOT_FOUND
ist natürlich absoluter Blödsin
richtig wäre :
Delphi-Quellcode:
if ((hr and ERROR_FILE_NOT_FOUND)= ERROR_FILE_NOT_FOUND) then
result := rsERROR_FILE_NOT_FOUND