Hallo zusammen,
ich habe einen Fehler, den ich mir nicht erklären kann:
Delphi-Quellcode:
Nummer := 0;
REPEAT
ok := CreateDir(Verzeichnis);
IF not ok THEN
begin
Inc(Nummer);
o := Pos('~',Verzeichnis);
if (o > 0) then
Delete(Verzeichnis,o,255);
Verzeichnis := Verzeichnis+'~'+IntToStr(Nummer);
end;
UNTIL ok;
Klappt bei mir hervorragend, bei 2 Nutzern, die genau so XP benutzen, wie ich, allerdings nicht!
D.h. die Routine wird abgearbeitet, CreateDir MUSS also mal TRUE geliefert haben, aber es gibt KEIN
Verzeichnis - Rechnersuche nach einer Datei, die dann IN dem Verzeichnis sein sollte, brachte kein Ergebnis.
Kann das irgendetwas mit Benutzerrechten zu tun haben?!
Iegendwelche Vorschläge!?
Marc