FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Validar Ingreso De Letras En Un Edit
Código Delphi [-]
unit valletra; interface uses Classes, DBTables, QControls, SysUtils,Windows, Messages, Variants,Graphics, Controls, Forms, Dialogs, StdCtrls; Type Tvalletra= class(TWidgetControl) private letr: String; public property letra: String read letr write letr; procedure validarn(letra: String); end; implementation procedure TValletra.validarn(letra:String); var i: integer; var b: String; begin letr:=Letra; for i:=1 to length(letra) do begin if ((letra[i] in ['a'..'z'])and (letra[i] in ['A'..'Z'])) then b:='Verdadero' else b:='Falso'; end; showmessage(''+b+''); end; end. Buen dia. En el codigo que les adjunto estoy intentando de elaborar una clase que me valide si le ingreso letras el valor de b (tipo String) retorne verdadero, de lo contrario b sea falso, recorriendo cada letra por medio de un ciclo. El problema que tengo es haciendo pruebas de que valor me retorna b, siempre me retorna Falso, ya sea si el ingreso letras o no, quisiera por favor si me pueden ayudar que error tengo, o que correcciones me sugieren con respecto a esa clase. Mil Gracias Sergio |
Herramientas | Buscar en Tema |
Desplegado | |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Solo letras y numeros en edit | oesteve | OOP | 30 | 28-06-2013 21:30:43 |
Validar numeros y letras en un Edit? | danytorres | Varios | 12 | 12-11-2010 21:42:27 |
Validar ingreso al Sistema.... | BlueSteel | Varios | 8 | 28-01-2005 00:58:27 |
como validar numeros y letras | ealexmp | Impresión | 0 | 29-12-2004 23:11:17 |
edit sin letras | mainau | Varios | 7 | 19-07-2004 13:11:05 |
|