Portal    Foro    Buscar    FAQ    Registrarse    Conectarse


Publicar nuevo tema  Responder al tema 
Página 1 de 1
 
 
Uso De Funcionex Externas Hechas En C: Inkeys
Autor Mensaje
Responder citando   Descargar mensaje  
Mensaje Uso De Funcionex Externas Hechas En C: Inkeys 
 
En este video tutorial explico como crear y usar una funcion externa en gambas3.


Link



Para más información y descargar el código fuente:
http://jsbsan.blogspot.com.es/2016/...s-externas.html
 




===================
Blog personal
Web: SoloGambas seleccion de articulos dedicados a Gambas
Visita el Curso de Gambas3 ¡¡¡Gratuito!!!
 
última edición por jguardon el Domingo, 29 May 2016, 15:21; editado 2 veces 
Editado por jguardon, Domingo, 29 May 2016, 15:21: Corregido enlace youtube
jsbsan - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Responder citando   Descargar mensaje  
Mensaje Re: Uso De Funcionex Externas Hechas En C: Inkeys 
 
El compañero del foro Vuott, me ha pasado otro código "más estilo gambas" para hacer imitar el funcionamiento de Inkeys:


Library "libc:6"

Public Struct termio
c_iflag As Short
c_oflag As Short
c_cflag As Short
c_lflag As Short
c_line As Byte
c_cc[8] As Byte
End Struct

Private Const STDINFD As Integer = 0
Private Const TCGETA As Integer = 21509
Private Const TCSETA As Integer = 21510
Private Const ICANON As Integer = 2
Private Const ECHO As Integer = 16

' int ioctl (int __fd, unsigned long int __request, ...)
' Perform the I/O control operation specified by REQUEST on FD.
Private Extern ioctl(__fd As Integer, __request As Integer, ter As Termio) As Integer


Public Sub Main()

Dim c As Byte
Dim param_ant As New Termio
Dim params As Termio
Dim fl As File

Print "Presionar una tecla..."

ioctl(STDINFD, TCGETA, param_ant)

params = param_ant
params.c_lflag = params.c_lflag And Not (ICANON Or ECHO)

params.c_cc[4] = 1

ioctl(STDINFD, TCSETA, params)

fl = Open "/proc" &/ CStr(Application.Id) &/ "fd/0"
Read #fl, c
fl.Close

ioctl(STDINFD, TCSETA, param_ant)

Print "Codigo ASCII de la tecla presionada: "; c; " Caracter: "; Chr(c)

End


Gracias Vuott !!!

Saludos
 




===================
Blog personal
Web: SoloGambas seleccion de articulos dedicados a Gambas
Visita el Curso de Gambas3 ¡¡¡Gratuito!!!
 
jsbsan - Ver perfil del usuarioEnviar mensaje privadoVisitar sitio web del usuario 
Volver arribaPágina inferior
Mostrar mensajes anteriores:    
 

Publicar nuevo tema  Responder al tema  Página 1 de 1
 

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno


 
Lista de permisos
No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
Puede descargar archivos
No puede publicar eventos en el calendario



  

 

cron