Procedure/Funktion mit drei Rückgabewerten ?

[HolgerCW]

Hallo zusammen,

wie wird eine Procedure/Funktion mit drei Rückgabewerten aufgebaut ?

Gruss

Holger

[DeddyH]

Übergeb die Rückgabewerte als var-Parameter.

[HolgerCW]

SO klappt das nicht:

Delphi-Quellcode:

var
 Datum: TDate;
 Jahr: String;
 Tag: Integer;
begin

 Planer_Datum_bestimmen(ACol , Jahr , Tag , Datum);

end;

Delphi-Quellcode:

procedure Planer_Datum_bestimmen(Spalte:Integer;var var_Jahr:String; var var_Tag:Integer;var var_Datum:TDate);
begin

...

end;

Was ist da falsch ?

Gruss

Holger

[DeddyH]

Was klappt nicht?

[HolgerCW]

Die Meldung beim Aufruf der Procedure lautet:

Konstantenobjekt kann nicht als Var-Parameter weitergegeben werden.

Gruss

Holger

[HolgerCW]

Mein Fehler. "Tag" war falsch deklariert.

Danke und Gruss

Holger