Problem mit OnChange

[widowmaker2k7]

also ich benutze delphi 7 das wir alle in der schule nutzen müssen...

mein OS is windows vista home premium 32 bit

wenn ihr mein codeabschnitt seht fallt ihr tot um, da is alles durcheinander ich bin ja nur am testen ^^

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var ek, mwst, endbetrag, prozent1, prozent2, prozent3, prozent4,proend1, proend2, proend3, proend4: real;
begin
if labelededit1.text <> '' then
 ek := strtofloat (labelededit1.text);
 if labelededit1.Text = '' then exit;
 mwst := ek * 1.19;
 endbetrag := (ek * 1.20) * 1.19;
 labelededit2.text := floattostr (mwst);
 labelededit3.text := floattostr (endbetrag);
 proend1 := (ek * 1.10) * 1.19;
 labelededit8.text := floattostr (proend1);
 proend2 := (ek * 1.30) * 1.19;
 labelededit9.Text := floattostr (proend2);
 proend3 := (ek * 1.40) * 1.19;
 labelededit10.Text := floattostr (proend3);
end;

hab so lange rumexperimentiert wo ich eure ganzen befehle hinballern soll, dass ich manche einfach stehen gelassen hab ^^ aber es funktioniert jetzt durch das if labelededit1.text <> '' then"

boah bin ich hoffnungslos

vielen dank an euch aber über weitere tipps würd ich mich freuen, will soviel lernen wies geht

mfg