Delphi-PRAXiS - Delphi Procedure/Funktion mit drei Rückgabewerten ?

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)

- - Delphi Procedure/Funktion mit drei Rückgabewerten ? (https://www.delphipraxis.net/104399-procedure-funktion-mit-drei-rueckgabewerten.html)

HolgerCW

3. Dez 2007 10:19

Procedure/Funktion mit drei Rückgabewerten ?

Hallo zusammen,

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

Gruss

Holger

DeddyH

3. Dez 2007 10:20

Re: Procedure/Funktion mit drei Rückgabewerten ?

Übergeb die Rückgabewerte als var-Parameter.

HolgerCW

3. Dez 2007 10:32

Re: Procedure/Funktion mit drei Rückgabewerten ?

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

3. Dez 2007 10:33

Re: Procedure/Funktion mit drei Rückgabewerten ?

Was klappt nicht?

HolgerCW

3. Dez 2007 10:34

Re: Procedure/Funktion mit drei Rückgabewerten ?

Die Meldung beim Aufruf der Procedure lautet:

Konstantenobjekt kann nicht als Var-Parameter weitergegeben werden.

Gruss

Holger

HolgerCW

3. Dez 2007 10:43

Re: Procedure/Funktion mit drei Rückgabewerten ?

Mein Fehler. "Tag" war falsch deklariert.

Danke und Gruss

Holger

Alle Zeitangaben in WEZ +1. Es ist jetzt 23:24 Uhr.