Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 16-01-2009
Ðαяισš Ðαяισš is offline
Miembro
 
Registrado: dic 2008
Posts: 42
Poder: 0
Ðαяισš Va por buen camino
Smile Verificar Numeros Pegados

Hola

Otra ves tengo dudas..
Esta ves trata en como hacer para que al dar click a un boton pegue lo que esta copiado en "Clipboard"
pero el problema no es para pegar.. sino para que al pegar verifique si las letras y numeros pegados son Hexadecimales
Si no lo son entonces de un aviso como un mensaje que diga:

Los Numeros pegados no son valida, Solo se permiten numeros hexadecimales.

Código Delphi [-]
procedure TForm.PegarClick(Sender: TObject);
begin
Edit1.Clear;
Edit1.PasteFromClipboard;
// aqui iria la comprobacion de los numeros Hexadecimales 
// Por Defecto [0..1] [a..f] [A..F] si no es correcto iria esto:
raise exception.Create(''''+Key+'''' + ' Es Incorrecto, Solo Se Permiten Numeros Hexadecimales');
end;

Alguien Tiene idea de como hacer ello?

Gracias Por sus respuestas (A quienes lo hagan )

Última edición por dec fecha: 16-01-2009 a las 11:08:06.
Responder Con Cita
 



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
verificar string mjjj Varios 3 18-08-2008 21:17:10
Verificar la Existencia de un Archivo sidneyb Varios 2 22-04-2008 22:16:19
Verificar CIF/NIF con c++ Builder Cecilioxx C++ Builder 2 14-02-2007 13:38:46
Verificar registro con trigger fedelphi Firebird e Interbase 3 20-12-2006 12:57:43
Verificar impresora Diegoval Impresión 1 11-05-2005 06:41:23


La franja horaria es GMT +2. Ahora son las 03:01:46.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi