Puerto Paralelo y Gambas3 + USB

AlfredoSC 30-12-2020, 01:03

#10

Hola: Habiendo leído los 2 artículos sobre Pegar Código e Insertar Imagen, procedo a insertar la imagen que quedó pendiente....saludos...
[Imagen: Dmq19H3.png]

La funcionalidad del botón "Monitor" no es correcta en este momento, pero estoy trabajando en ello. Si es posible que me echen una mano para lograrlo, lo agradeceré....

Nuevamente por aquí:

He colocado un Menú y un sub menú para elegir el bus HID que Linux ha destinado cuando se conecta el dispositivo externo USB, en este caso mi proyecto. En la ruta /dev/usb aparecen hiddev0 o hiddev1 y lp1.

Así que mi comando de Menú hace que se abra un nuevo Form y con el Control FileChooser abro por default la ruta /dev/usb para que me muestre el contenido. Se hace click en hiddev0 o hiddev1, con lo que esa cadena se pone en el cuadro de texto del FMain destinado para el Puerto USB seleccionado. Funciona muy bien.

En FMain el código adicional es:

Código:
Public Sub mnuUsb_Click()

Form1.Show

End

Public Sub recibe(archivo As String)

  txtPuertoS.Text = archivo

End

Y en el Form adicional, el código es:

Código:
' Gambas class file

Public Sub Form_Open()

  Me.Left = 1200

  Me.top = 500

  FileC1.SelectedPath = "/dev/usb/"

End

Public Sub cmdAceptar_Click()

Dim archivo As String

archivo = FileC1.SelectedPath

FMain.recibe(archivo)

Wait 1

Me.Close

End

Saludos...

Última modificación: 30-12-2020, 01:19 por AlfredoSC.

Es mejor saber un poco de todo, que todo de muy poco. Lo primero, garantiza la supervivencia humana.