Var Parameter

[PhilmacFLy]

Hoi DP

Ich hab folgendes Problem, und zwar hab ich folgende procedure

Delphi-Quellcode:

procedure Tform1.geht(var Reihe: Integer);
begin
case Reihe of
1:
//
end;
end;

und wollte diese wie folgt aufrufen

geht(1); Soweit so gut/schlecht jetzt bekomm ich aber foglende Fehlermeldung:

[Fehler] viergewinnt_main.pas(660): E2033 Die Typen der tatsächlichen und formalen Var-Parameter müssen übereinstimmen Vllt seh ichs einfach nicht oder hab nen Denkfehler, aber ich find ihn nicht. Wäre sehr dankbar über eine Hilfestellung.

[DeddyH]

1 ist eine Konstante, die kannst Du nicht als var übergeben. So sollte es funktionieren:

Delphi-Quellcode:

var Zahl: integer;
begin
  Zahl := 1;
  geht(Zahl);
end;

[Sharky]

Zitat von PhilmacFLy:

...
geht(1); ...

Hai PhilmacFly,

im Procedureheader sagst Du das Du eine Variable übergibst. Aber Du übergibst eine "Konstante" nämlich die 1.

Der Rüsselmops war schneller

[PhilmacFLy]

Ok ist es auch möglich das direkt als Konstante zu übergeben, da ich damit sage in welcher Spalte (hab ich code falsch ) der stein fällt und da es ziemlihc unvorteilhaft wäre immer erst eine variable zu deklarieren.

[DeddyH]

Wenn der Wert innerhalb der Methode niemals verändert wird, macht die Übergabe by Reference keinen Sinn. Lass also einfach das "var" weg.procedure Tform1.geht(Reihe: Integer);

[himitsu]

wenn du Reihe nicht änder willst, dann laß besser einfach nur das VAR weg
und laß den Rest so wie er ist.

[edit]
bei den ganzen RedBoxes warDeddyH nun schneller

[PhilmacFLy]

Ok Danke.
Gut das es DP und solche Leute wie euch gibt, sonst würd ich immer noch an irgendwelchen Problemen hängen, und häte Delphi programmiern wahrscheinlich schon aufgegeben.