Verzeichnis anlegen +1 ?

[mkinzler]

function DirectoryCreate( var Path: string): boolean; Dann enthält die Variable nach dem Aufruf den erzeugten Pfad

[DXO]

Sorry aber Kapier ich nicht

[mkinzler]

Die erste Version war Call-By-Value, es wurde also ein Wert an die Funktion übergeben, schreibt man ein var vor den Parameter, deklariert man ihn als Call-By-Reference, es wird also die Variable an sich nicht ihr wert übergeben.

Delphi-Quellcode:

var
   Pfad: string;
   erfolg: boolean;
...
  pfad := DateToStr( date));
  erfolg :=  DirectoryCreate( Pfad);

Die Variable Pfad im rufenden Programm ist nun identisch mit der Variable Path in der Funktion. Alle Änderungen an ihr betrifft also auch Pfad.

[DXO]

So oder wie ?

Delphi-Quellcode:

function AskPath( var Path: string): boolean;
var
   Pfad: string;
   begin
   pfad := DateToStr( date);
   result:= DirectoryCreate( Pfad);
end;

Aber dann funktioniert der aufruf nicht

Label3.Caption:=InttoStr(AskPath( DateToStr( date); Label3 soll erstmal als Anzeige dienen da ich keine lust hab ständig dateien hin un her zu moven


... kann nicht als Var Parameter weitergegeben werden

[mkinzler]

Einfach so

Delphi-Quellcode:

   pfad := DateToStr( date);
   result:= DirectoryCreate( Pfad);
   label3.Caption := Pfad;

[DXO]

hmm nö geht nicht er zeigt dann im Label nur das Aktuelle Datum an aber nicht den zulezt erstellen Ordner

[mkinzler]

Du hast aber das var bei DirectoryCreate ergänzt?

[DXO]

Ja jetzt garnicht gesehen ... so nächstes Prob

Delphi-Quellcode:

...
result:= (DirectoryCreate( Pfad)); // inkompatible Typen: 'String' und 'Boolean'
...

[mkinzler]

Result ist ja vom typ Boolean. Der geänderte Pfad steht in Pfad!!