Hola Norberto,

Y no es mas facíl, aprovechar el teclado virtual que incluye el propio 
Windows???

Yo en mis sistemas, lo tengo asi:

*------------------------------------------------------------------------------*
* TecVirtual() Muestra en pantalla un Teclado Virtual                          *
*---------------------------------------------------------------- 07-08-2012 --*
Procedure TecVirtual
EXECUTE FILE 'OSK'
Return

Saludos,
Sergio


From: Norberto Mario Alvarez 
Sent: Friday, November 21, 2014 9:40 PM
To: GUFA List Member 
Subject: [GUFA] Teclado Touch alfabetico

Estimados colisteros, en base a consultas por la web, pude hacer un teclado 
alfabético, lo cual resulto sencillo, ya que solo tenia que poner en cada tecla 
(botón) el siguiente código:

 

Thisform.Display.Value = ALLTRIM(THISFORM.Display.VALUE)+"U"

 

El problema me surgio con la barra espaciadora, ya que en el mismo pongo:

 

Thisform.Display.Value = ALLTRIM(THISFORM.Display.VALUE)+" "

 

Pero al presionar otra tecla me elimina el espacio debido al ALLTRIM()

 

Y la verdad no le encuentro la vuelta, si por casualidad alguien se encontró 
con este problema, por favor me de una mano para solucionar el espacio. Desde 
ya muchas gracias y buen fin de semana!!!!!!

 

 

 

Norberto Alvarez

Socio # 1892

 

 

Responder a