tak si predtim nez zacnes prirazovat tohle "a1:=StrToInt(Edit1.Text);", zkontroluj co v tom Editu mas. proste nejakou podminku (IF ... THEN ... ELSE), ze pokud v tech editech neni cislo, tak se to provadeni tech prikazu preskoci a nechas tam vyhodit nejakou hlasku.