Necesito ayuda para teclas de funcion. 
Author Message
 Necesito ayuda para teclas de funcion.

Tengo un problema con este programa.

Necesito saber como puedo asignar y desasignar la tecla F1 para acceder a
las funciones one(), two() y three() segn sea el campo que este
editando.

Pueden ayudarme ?

Function main()

# include "inkey.ch"

local cField1 := space( 5 )
local cField2 := space( 5 )
local cField3 := space( 5 )

cls
while .t.



     read
end while

return nil

function one()

alert( "Ayuda para cField1" )

return nil

function two()

alert( "Ayuda para cField2" )

return nil

function three()

alert( "Ayuda para cField3" )

return nil



Sun, 05 Dec 1999 03:00:00 GMT  
 Necesito ayuda para teclas de funcion.


Quote:
> =
> Tengo un problema con este programa.
> =
> Necesito saber como puedo asignar y desasignar la tecla F1 para acceder=
 a
> las funciones one(), two() y three() seg=FAn sea el campo que este
> editando.
> =
> Pueden ayudarme ?
> =
> Function main()
> =
> # include "inkey.ch"
> =
> local cField1 :=3D space( 5 )
> local cField2 :=3D space( 5 )
> local cField3 :=3D space( 5 )
> =
> cls
> while .t.



>      read
> end while
> =
> return nil
> =
> function one()
> =
> alert( "Ayuda para cField1" )
> =
> return nil
> =
> function two()
> =
> alert( "Ayuda para cField2" )
> =
> return nil
> =
> function three()
> =
> alert( "Ayuda para cField3" )
> =
> return nil

Hola Fernando,

Creo que algo asi tendra que funcionar :
LOCAL bF1:=3DSETKEY(K_F1)



 read
 SETKEY(K_F1,bF1)

No lo he probado, es lo que me occure leiendo tu mensaje !

Espero que te ayude,

Philippe
-- =

Videomuseum
6, rue Beaubourg
75004 Paris
Philippe Morchain
Tel : (33-1) 42.71.61.39
Fax : (33-1) 42.71.62.90


http://www.geocities.com/SiliconValley/Heights/7237/
http://www.videomuseum.fr



Mon, 06 Dec 1999 03:00:00 GMT  
 
 [ 2 post ] 

 Relevant Pages 

1. Necesito ayuda de como pasar datos de Excel a un programa Clipper

2. NECESITO EL CODIGO FUENTE DE LA TORRE DE HANOI

3. Necesito ayuda con ReportWriter

4. Necesito ayuda!!!!, Please help my!!!!

5. necesito ayuda !!!

6. Necesito Ayuda

7. Necesito ayuda, Gracias.

8. Necesito ayuda con lisp

9. Ayuda en Red para Clipper 5.2

10. Ayuda para cobol, extensiones MGG

11. Necesito ayuda con Visual C++ para crear un CIN.

12. amigos, necesito una copia pirata de blinker 3.30 o mayor

 

 
Powered by phpBB® Forum Software