Clase Admita Espacios En Delphi

[jandok238]

Hola...

creo que a lo que poliburro se refiere es que agregues el margen de los caracteres a aceptar... y como caracteres se incluyen Espacios, Tecla Enter, Tecla Backspace...

en otras palabras....

Código Delphi [-]
  
if not ((letra[i] in ['a'..'z'])
        or (letra[i] in ['A'..'Z'])
        or (letra[i] = #32)) then  //el #32 es el ESPACIO
begin
...
end;

otra forma seria ....

Código Delphi [-]
  
if not (letra[i] in ['a'..'z', 'A'..'Z', #32]) then  //el #32 es el ESPACIO
begin
...
end;

espero esto te sirva .....

y creo que a esto se referia el compañero poliburro

salu2!!!!!!!