|
Registriert seit: 8. Apr 2004
183 Beiträge
Delphi 7 Enterprise
|
Re: Entscheidungen bei Edit treffen
23. Dez 2004, 12:43
if (edit1.Text <> '') AND (edit2.Text <> '') then edit3.Text := IntToStr(StrToInt(Edit1.Text) - StrToInt(Edit2.Text));
if (edit2.Text <> '') AND (edit3.Text <> '') then Edit1.Text := IntToStr(StrToInt(Edit2.Text) + StrToInt(Edit3.Text));
|