TEdit primer digito no sea número

25-07-2013

alquimista alquimista is offline

Miembro

Registrado: ene 2008

Posts: 203

Poder: 17

Y le añado lo primero que puse???

Y si quiero limitarlo a un número determinado de caracteres???
vale con poner: or (SelStart + SelLength >x) ??

Código Delphi [-]procedure TForm1.EditKeyPress(Sender: TObject; var Key: Char);
begin
  with Sender as TEdit do
    ReadOnly := (SelStart + SelLength = 0) and (Key in ['0'..'9']) OR ((SelStart + SelLength >longitud);
end;

PD: Me parece impresionante...

Gracias..

Última edición por alquimista fecha: 25-07-2013 a las 00:18:06.

« Tema Anterior | Próximo Tema »

Normas de Publicación
no Puedes crear nuevos temas no Puedes responder a temas no Puedes adjuntar archivos no Puedes editar tus mensajes El código vB está habilitado Las caritas están habilitado Código [IMG] está habilitado Código HTML está deshabilitado

Saltar a Foro

Temas Similares
Tema	Autor	Foro	Respuestas	Último mensaje
Obtener determinado dígito de un número	xneox	Varios	10	07-10-2012 01:43:22
Determinar digito mayor de un numero	luisito2011	Varios	6	25-04-2011 22:17:54
sumar cada digito de un numero entero	emenchi34	Varios	9	19-09-2006 23:02:35
Extraer primer digito en minusculas ?	Coco_jac	SQL	4	21-12-2005 16:13:01
Consultas en Acces por el primer digito	jdattoli	Tablas planas	2	17-11-2005 18:04:11

La franja horaria es GMT +2. Ahora son las 08:29:56.