Thema: Delphi function in procedure

Einzelnen Beitrag anzeigen

moperswings

Registriert seit: 27. Mai 2004
Ort: Bad Sooden-Allendorf
240 Beiträge
 
Delphi 6 Professional
 
#1

function in procedure

  Alt 17. Apr 2007, 14:37
Hallo,

kann ich nicht eine Funktion auch innerhalb einer Procedure laufen lassen?
Ich habe ein einfaches Bsp, aber die Funktion hat nicht genügend Parameter?
Was muss ich denn noch ausser der summe weitergeben?
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
  function summe(var a,b: Integer): Integer;
  begin
        a := strtoint(Edit1.text);
        b := strtoint(Edit2.Text);
        result := a + b;
  end;

var wert: Integer;
begin
        wert := summe; //() nicht genügend wirkliche Parameter;
        Label1.Caption := inttostr(wert);
end;

end.
Grüsse, moperswings
  Mit Zitat antworten Zitat