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?