eigentlich hatte ich in den Funktionen nur sowas drin:
Delphi-Quellcode:
var
a,b,er: Integer;
a1,b1: String;
function Rechnen : Integer;
begin
a1 := Edit1.text;
b1 := Edit2.text;
a := a1;
b := b1;
er := a * b;
end;
procedure Buttonclick(Sender: Tobject);
begin
Label1.caption := inttostr(er);
end;
Edit: Delphi-Tags vergessen
