Hi,
Bei Functionen hast Du einen Rückgabewert, den Du definieren kannst. Mit diesen Rückgabewert kannst Du dann noch weiter arbeiten. Hingegen, wenn Du das gleiche in einer Procedure schreibst, mußt Du eine globale Variable definieren um einen eventuellen Rückgabewert in einer anderen Function oder Procedure weiter zu verwenden.
Beispiel :
Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12:
| function addiere(test1 : integer; test 2: integer):real begin result := test1 + test 2; end;
procedure Button1.Click; var ergebnis : real; begin ergebnis := addiere(15,15); Label1.Caption := FloatToStr(ergebnis); end; |