Naja, sehr toll ist das ja nicht, das hier wäre um einiges besser:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
function summe(const a, b: Integer): Integer;
begin
result := a + b;
end;
var wert: Integer;
begin
Label1.Caption := inttostr(summe(5,5));
end;