d.h. ich könnt was rechnen lassen:
Delphi-Quellcode:
function Rechnen (a,b,c,d, er: Integer): Integer;
begin
a := 239;
b := a * 34;
c := a * b * 23M;
d := a * 4 - b / c;
er := a * b - c + d;
Result := er;
end;
procedure Form.Show;
begin
showmessage(inttostr(Rechnen(Result));
end;
Oder versteh ich da was falsch???