quinta-feira, 24 de setembro de 2009

Validando entradas no edit

//No evento OnKeyPress do objeto Edit, digite:


if not ( Key In ['0'..'9','.'] ) then
Abort;

Nenhum comentário:

Postar um comentário