In dem Fall ist d eigentlich überflüssig:
Delphi-Quellcode:
procedure TForm1.BitBtn3Click(Sender: TObject);
begin
a:=StrToFloat (Edit1.Text); //a ist der Inhalt der Textbox und ist das Zwischenergebnis
b:=StrToFloat (Edit1.Text); //b soll den Wert, der zu a hinzuaddiert werden soll aus der Textbox auslesen
end;
procedure TForm1.BitBtn4Click(Sender: TObject);
begin
c:=a+b; //a soll mit b addiert werden
Edit1.Text:= FloatToStr (c); //c soll das Ergebnis in der Textbox ausgeben
end;
Wenn du das jetzt so machen würdest, brauchst du d nicht, du nimmst aber trotzdem a*2:
In einer Prozedur setzt du a und b auf den Inhalt des Edits, ohne das der Wert zwischendrin geändert werden kann...
Versuch mal das hier:
Delphi-Quellcode:
procedure TForm1.BitBtn3Click(Sender: TObject);
begin
a:=StrToFloat (Edit1.Text); //a ist der Inhalt der Textbox und ist das Zwischenergebnis
end;
procedure TForm1.BitBtn4Click(Sender: TObject);
begin
b:=StrToFloat (Edit1.Text); //b soll den Wert, der zu a hinzuaddiert werden soll aus der Textbox auslesen
c:=a+b; //a soll mit b addiert werden
Edit1.Text:= FloatToStr (c); //c soll das Ergebnis in der Textbox ausgeben
end;
Liebe Grüße!