Edit / Textfeld Problem (Editfelder auslesen)

[Condore99]

Hallo,
ich habe folgende Situation. Ich habe 3 Textfelder. Edit1 ist Zahl1, Edit2 ist Zahl2 und Edit3 ist Ergebnis. So, jetzt soll das Programm prüfen, in welchen Textfeldern eine Zahl steht. Steht z.B in Edit1 und Edit2 eine zahl, dann soll normal gerechnet werden, also so: Edit1 + Edit2 = Edit3. Das ist noch einfach. Aber was ist wenn das ist: Wenn in Edit1 und Edit3 eine Zahl steht ? Das programm muss ja jetzt von Edit3 die zahl in Edit1 abziehen und erhält somit Edit2. Aber wie soll das Programm wissen in welchen Felder was steht bzw. ob was da steht ? Und was mache ich, wenn es nicht 3 Feldern sind, sondern 10 ? Soll ich dann mit CASE arbeiten ? Ich hoffe jemand hat das verstanden was ich meine und kann mir helfen. Bis dann. Euer Condor.

[Dax]

Mit 3 Feldern ist es recht einfach:

Delphi-Quellcode:

if Edit1.Text = '' then Edit1.Text := IntToStr(StrToInt(Edit3.Text) - StrToInt(Edit2.Text)) else
if Edit2.Text = '' then Edit2.Text := IntToStr(StrToInt(Edit3.Text) - StrToInt(Edit1.Text)) else
if Edit3.Text = '' then Edit3.Text := IntToStr(StrToInt(Edit1.Text) + StrToInt(Edit2.Text));

Wenn du nun mehr als 3 Felder hast, musst du entsprechend mehr if-Zweige nehmen, denn mit case kannst du hier leider nicht viel machen.

[Condore99]

Hallo,
danke für deine Mühen. Ich werde das mal testen. Ich hab da noch ein anderes Problem das etwas schwieriger für mich ist, aber da mach ich doch lieber einen neuen Thread auf. Danke nochmal.