procedure-Deklaration

[Sharky]

Zitat von Ultimator:

Hallo!
Also zusammenfassend gesagt: Wozu ist dieses var gut?

Grob gesagt: Wenn Du die Variable in der Procedure änderst kannst Du sie später wieder verwenden.

Delphi-Quellcode:

procedure MachWas (var wert : integer);
begin
  wert := wert +5;
end;

procedure TForm1.Button1Click (sender : TObject);
var
  mywert : Integer;
begin
  mywert := 2;
  MachWas (mywert);
  Label1.Caption := IntToStr (mywert);
end;