Forum: Programmieren allgemein
by implementation,
16. Feb 2010
IF (LaengeEdit.Text { --> } = { <-- } '') { --> } and { <-- } (BreiteEdit.Text<> '') and (FlaecheEdit.Text <> '')
THEN
begin
LaengeEdit.Text := FloatToStr(StrToInt(FlaecheEdit.Text)/StrToInt(BreiteEdit.Text));
BreiteEdit.Text := FloatToStr(StrToInt(FlaecheEdit.Text)/StrToInt(LaengeEdit.Text));
end
Forum: Programmieren allgemein
by implementation,
16. Feb 2010
Wenn das zweite Feld leer ist, soll das ja ausgerechnet werden, oder verstehe ich das falsch?
Forum: Programmieren allgemein
by implementation,
16. Feb 2010
Eben. Deshalb musst du das or ja auch durch ein and ersetzen. Es muss ja alles zutreffen.
Außerdem solltest du das erste <> durch = ersetzen.