Unterprogramme in Delphi 7 Felder ansprechen

[snboy2010]

Hallo. Hoffe bin hier in der richtigen Abteilung geladet Also folgendes Problem habe ich:
Ich möchte mein Programm optimieren indem ich es in Unterprogramme zerlege. Jetzt habe ich die folgende Procedur geschrieben:

Delphi-Quellcode:

procedure VerbrauchBGes(Target: Edit3.Text, Edit4.Text);
  var verb, jahrk, verbj: real;
   begin
      verb := StrToFloat(Edit3.Text);
      jahrk := StrToFloat(Edit4.Text);

      verbj := verb * jahrk;
end;

procedure TForm1.Button1Click(Sender: TObject);

begin

    Panel1.Caption := FloatTostr(VerbrauchBGes);

end;

Also in der Procedur soll folgendes geschen: Die Werte aus den Textfelder Edit 3 & 4 sollen eingelesen werden und miteinander multipliziert. Das Ergebniss soll dann beim drücken auf den Button im Panel1 ausgegeben werden.

Mit dieser Variante zeigt der Compiler dieses Problem:
[Error]Recher.pas(55): Undeclared identifier: 'Edit3'
[Error]Recher.pas(55): Missing parameter type
[Error]Recher.pas(56): Identifier redeclared: 'Text'
[Error]Recher.pas(58): There is no overloaded version of 'StrToFloat' that can be called with these arguments
[Error]Recher.pas(72): Not enough actual parameters
[Fatal Error]Project1.dpr(5): Could not compile used unit 'Rechner.pas'

Was mache ich in der Procedur falsch und was muss ich verbessern?