Forum: Programmieren allgemein
Delphi
by DelTurbo,
28. Apr 2011
Hier mal der Code abschnitt.
function ForceDirectories(Dir: string): Boolean;
var
E: EInOutError;
begin
Result := True;
if Dir = '' then
begin
E := EInOutError.CreateRes(@SCannotCreateDir);
Forum: Programmieren allgemein
Delphi
by DelTurbo,
27. Apr 2011
Das kommt auch rein. Ich hatte nur das beispiel so einfach wie möglich gehalten. Das prob war/ist, man findet nix über diesen fehler bei google. Deswegen war ich etwas verwirrt.
Und die einzige "anlaufstelle" die ich in solchen fällen habe ist halt dieses Forum hier. Das hat den grund, das man nicht immer gleich als blöde abgestempelt wird und gesagt bekommt "nutz die Boardsuche" oder änhlich.
Forum: Programmieren allgemein
Delphi
by DelTurbo,
27. Apr 2011
Jap, schau oben. Es wird ja nix anderes gemacht. Button klicken und dann kommt das was oben steht. Ich hatte wohl mal was an der Sysutils geändert und vergessen den Devinition MSWINDOWS reinzumachen. Ich glaub ich werd alt :roll:
Forum: Programmieren allgemein
Delphi
by DelTurbo,
27. Apr 2011
Hat sich erledigt. Es lag an der SysUtils. Die war wohl für unix. :(
Trotzdem danke....
Forum: Programmieren allgemein
Delphi
by DelTurbo,
27. Apr 2011
Hi,
ich glaube ich brech gleich ab. Ich nutze (als beispiel) folgenden code um mehr als eine Directory anzulegen.
procedure TForm1.Button1Click(Sender: TObject);
begin
ForceDirectories('E:\test\1\2\3');
end;
Was ich auch mache, ich bekomme immer die folgende fehlermeldung.