Zahlen symmetrisch

[xShadowBoZz]

ok thx für die hilfe.

hab es jetzt auch geschaft bei mir im code einen fehler error einzubauen falls nicht alle editfelder *edit* meine ausgefüllt sind.

hab jetzt einfach das hinzugefügt.

Delphi-Quellcode:

try
  eins:=StrToInt(edit1.text);
  zwei:=StrToInt(edit2.text);
  drei:=StrToInt(edit3.text);
  vier:=StrToInt(edit4.Text);
  fuenf:=StrToInt(edit5.Text);
except
  ShowMessage('Bitte Fülle alle Felder aus!');
  abort;
end;