wie, das ginge früher mal?
weder in D7 noch Neuer geht's
Delphi-Quellcode:
procedure Test2(var x: Integer);
begin
x := 123;
end;
procedure Test1(const x: Integer);
begin
Test2(x); // [Fehler] Unit1.pas(32): Konstantenobjekt kann
end; // nicht als Var-Parameter weitergegeben werden
procedure TForm1.FormCreate(Sender: TObject);
begin
Test1(Tag);
end;
man kann es sich so vorstellen (von der Verwendung her):
mit Const ist der Parameter wie eine Konstante
ohne Const ist es wie eine lokale Vaiable, welche beim Prozedurstart vorbelegt wurde