bobby ::btw. kada koristis StrToInt, obavezno to ubaci u try...except blok, za slucaj da neko u neki od tih edit boxova upise nesto sto nije broj.
Uopšte, treba koristiti try ... except blok.
U JCL/JVCL bibliotekama imaš TJvValidateEdit gde za property Display Format postavljaš određenu vrednost (integer, currency, float, scinentific, etc.), ujedno, zabranjen je unos slova.
Tako da tvoj primer sa try .. except blokom bi mogao izgledati ovako:
try
JvValidateEditRezultat.Value:= JvValidateEditPrvi.Value + JvValidateEditDrugi.Value;
except
on E : Exception do
ShowMessage(E.ClassName+' error raised, with message : +E.Message);
end;
Ili još bolje ti je da hendluješ Apllication.OnException.
Ako, ipak koristiš samo TEdit, a želiš izbeći unos slova, možeš za event OnKeyPress napisati:
case key of
'0': ;
'1': ;
'2': ;
'3': ;
'4': ;
'5': ;
'6': ;
'7': ;
'8': ;
'9': ;
',': ;
'.': ;
else abort;
end;
|