sono io che non mi sono spiegato bene.ho un FUNCTION che mi rileva le porte abilitate
FUNCTION Configurar_puertas()
DIM Search_Device, Cursor AS String
DIM ID_Device AS String[]
DIM Puntador AS Integer
SHELL "ls -la /dev/ttyS* /dev/ttyUSB*" WAIT TO Search_Device
ID_Device = Split(Search_Device, "\n", " ", TRUE)
FOR EACH Cursor IN ID_Device
Puntador = InStr(Cursor, "/dev")
cboPuertaSerial.Add(Trim$(Mid$(Cursor, Puntador + 5, 12))) '
NEXT
END
l'errore era che il mid$ puntava a partire di Puntador+5.quindi niente "/dev/" quando restituiva le porte ok.
al corregere il puntatore con
.
.
.
cboPuertaSerial.Add(Trim$(Mid$(Cursor, Puntador, 12)))
.
.
.
me ristituisce "/dev/ttyxxxx" che va a finire in PortSerial.PortName.
adesso funziona con il controllo PortSerial di gambas.se volete vi posto lo sbozzo che funziona.