FiveTech Software tech support forums

Hello, I have been able to compile most of the sample linux prg's OK and have written a few of my own that compile and run OK. I have a need to do some serial communications (RS232). These are the linking errors I get when trying to compile. vend@v1:~/fivelinux/samples$ ./build.sh qibixx compiling.....

Hello, I have been able to compile most of the sample linux prg's OK and have written a few of my own that compile and run OK. I have a need to do some serial communications (RS232). These are the linking errors I get when trying to compile. vend@v1:~/fivelinux/samples$ ./build.sh qibixx compiling.....

... 6000 ACTION (BytesAtPort( nComm),oLbx:Refresh()) OF oWnd ACTIVATE TIMER oTmr function BytesAtPort( nComm, nStatus ) local cBuffer:=space(18) ReadComm( nComm, @cBuffer ) select RAWPOIDS append blank replace data with cBuffer return nil

... 6000 ACTION (BytesAtPort( nComm),oLbx:Refresh()) OF oWnd ACTIVATE TIMER oTmr function BytesAtPort( nComm, nStatus ) local cBuffer:=space(18) ReadComm( nComm, @cBuffer ) select RAWPOIDS append blank replace data with cBuffer return nil

Hi Jack, I don't use the library you're using, so let's go for trial... The Readcomm function expects Cbuffer as: A string variable supplied by reference where ReadComm() will place the read bytes. The length of the initial supplied value specifies the wished ...

>>ReadComm( nComm, @cBuffer ) // <<<<---- program will lock here
>>Msginfo( AllTrim( cBuffer ))

Excuse me, but I do not understand how from these lines, if you run only once, can result two msginfo...

In any way, what is the total string?

Hi, I have delete the MsgInfo for the status . I have only this : ReadComm( nComm, @cBuffer ) // <<<<---- program will lock here Msginfo( AllTrim( cBuffer )) But it gives me 2 times the MsgInfo , first with a part of the info and the second with ...

... "Error SETCOMM!" ) return .f. endif return nComm function BytesAtPort( nComm, nStatus ) local cBuffer := Space(20 ) Msginfo( nSTATUS) ReadComm( nComm, @cBuffer ) // <<<<---- program will lock here Msginfo( AllTrim( cBuffer )) return nil

... de informacion TX de leer el buffer completo Asi si el bloque de datos no sale completo solo incrementa el tiempo del sleep(000) */ nBytes := ReadComm( nComm, @cBloque ) ?? @cBloque Return cBloque

... de informacion TX de leer el buffer completo Asi si el bloque de datos no sale completo solo incrementa el tiempo del sleep(000) */ nBytes := ReadComm( nComm, @cBloque ) ?? @cBloque Return cBloque

... Seteado") ENDIF RETURN IdPort STATIC FUNCTION leer_bloque(port,n) LOCAL bloque:= SPACE(n),bcc1,nBytes,i:=1 DO WHILE .t. nBytes := ReadComm( port,@bloque) i++ IF EMPTY(bloque) MsgWait("Esperando ENQ","Espere",3) mandar_enq(port) LOOP ENDIF IF i > 20 // .or. ...

... enviado'+str(BitesSend,5),'',.5000) ENDIF cBlock=space(1024) nTry=0 do while nTry<10 // can remove this nTry if not applicable if ( nBytes := readComm( nComm, @cBlock) ) > 0 msgwait('Esperando haber si lee algo , espere'+str(nTry,5),'',.10) LogFile( "Milagros.log", cBlock) exit ...

... are ignored and the queue size is set to zero. Sample: SAMPLES\\TestComm.prg Source Code: SOURCE\\WINAPI\\Comm.c See also: CloseComm() WriteComm() ReadComm() BuildCommDcb() SetCommState() FlushComm() GetCommError()

Antonio... Incluí el comm.cc dentro de un prg y ya me compila. obtengo estos resultados 1.  if( pComm->CommNotifyHwnd != NULL )         SendMessage( pComm->CommNotifyHwnd, WM_COMMNOTIFY, ( WPARAM ) pComm,                      MAKELONG( CN_RECEIVE, 0 ) );      Me...

... with no prototype in function HB_FUN_OPENCOMM Warning W8012 .\..\\source\winapi\comm.c 333: Comparing signed and unsigned values in function ReadComm Warning W8019 .\..\\source\winapi\comm.c 334: Code has no effect in function ReadComm Turbo Incremental Link 5.69 Copyright (c) 1997-2005 Borland ...