Restrição de Teclas

[PiRaDu 0]

Daê galera...Siguinti... eu tenho que restringir um Edit a receber apenas numeros, daí eu fiz assim:if key in['0'..'9',','] = false thenbegin key := #0;end;Só que aí me veio o "pobrema"... num tem como eu usar BackSpace :angry: ...Que que eu tenho que colocar ali pra abilitar o BackSpace tb???

[hcr 0]

Olá...

 

Tente acrecentar o #8 no seu código

 

if key in['0'..'9',',', #8 ] = false thenbeginkey := #0;end;

 

Henrique

[ccc3 0]

ou assim com o chr(08)if key in ['a'..'z','A'..'Z',chr(08)] = false then key:=#0;