Rechner programmieren

[Tytomik]

Tut mir echt leit das verstehe ich immer noch nicht ganz könnetet ihr mr den teil nicht mal richtig schrieben:

Delphi-Quellcode:

procedure TForm1.Button5Click(Sender: TObject);
var a,b: real;
begin
Label3.caption:= floattostr(a-b);
If Strtofloat(Label3.Caption)>500 then begin
Form1.Color:= clred;

Habe gestern angefangen.
Wäre echt nett.
Danke