Einzelnen Beitrag anzeigen

ItsMe1

Registriert seit: 31. Jan 2013
15 Beiträge
 
#1

Anfängerproblem !?

  Alt 31. Jan 2013, 14:19
Hallo Leute,

Kann mir bitte jemand helfen... Ich bin neu hier und hab auch erst vor kurzem mit dem schreiben von Programmen in Delphi angefangen. Jetzt hab ich mein erstes Problem bei dem ich im Forum nichts finde.
Ich möchte, dass mein Programm wenn in einem Edit-feld 0 steht das es mir eine showmessage zeigt (das funktioniert noch) und dann mich die Zahl ändern lässt(das ist mein Problem).
Mein programm macht einfach weiter und gibt mir dann aus, dass ein Fehler aufgetreten ist.
Der teil von dem Programm sieht so aus
Code:
begin
  if edit3.text='0' then
    begin
      showmessage('Zahl 3 bitte ändern')
    end else
      label1.Color:=clred;
      label1.Caption:= Floattostr(strtofloat(Edit1.Text)/strtofloat(edit2.text)/strtofloat(edit3.text));
end;
Bitte um Hilfe
Grüße ItsMe1
  Mit Zitat antworten Zitat