Rückgabewerte von Funktionen und Prozeduren

[Sanchez]

@ Hansa
zu deiner Frage: Wieso ist da kein Rückgabewert.

Eine Funktion liefert einen Rückgabewert

Delphi-Quellcode:

function Test : integer;
begin 
    result := 5; 
end;

Diese Funktion hat einen Rückgabewert vom Typ Integer mit dem Wert 5.

Eine Prozedur hat keinen Rückgabewert

Delphi-Quellcode:

procedure Test (VAR i : integer); 
begin 
    i := 5; 
end;

Diese Prozedur hat keinen Rückgabewert, sondern sie pinselt hier nur den Wert 5 in die Adresse der Variable die du ihr Übergibst.

Deshalb kannst du auch nicht das machen:

Delphi-Quellcode:

begin
  showmessage (IntToStr (Test (8));
end;

Das würde funktionieren:

Delphi-Quellcode:

var i : integer;
begin
  i := 2;
  Test (i);
  showmessage (IntToStr (i);
end;

In der Messagebox würde eine 5 stehen.

Alles klar?

mfg Daniel