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.