Hallo,
Delphi-Quellcode:
procedure VerbrauchBGes(var verbj: real; jahrk, verb: real);
begin
verbj := verb * jahrk;
end;
so könnte man es auch einsetzen, aber eine Function ist schon besser dafür geeignet.
Bis bald Chemiker
wer gesund ist hat 1000 wünsche wer krank ist nur einen.