Naja Debuggen hätte nich viel gebracht:
Delphi hab ich nur unter Vista, wollte nur mal schaun obs auch unter XP läuft (<-- das Programm unter XP, nicht Delphi).
Papierkorb:
Delphi-Quellcode:
procedure TForm1.papierkorb;
begin
FindDirs('C:\$RECYCLE.BIN\','*',false);
FindDirs('D:\$RECYCLE.BIN\','*',false);
FindDirs('E:\$RECYCLE.BIN\','*',false);
FindDirs('F:\$RECYCLE.BIN\','*',false);
FindDirs('G:\$RECYCLE.BIN\','*',false);
FindDirs('H:\$RECYCLE.BIN\','*',false);
korb:=aResult;
end;
^^ Ich wette, dass XP da ein Laufwerk / Datenträger nicht gefunden hat
