Saludos:
Ya dije en un correo anterior que las dos funciones DTR y STR están
dentro de la librería LibHBct.a, pero que en la LibHBComm.a no existen
esas funciones.
Lo que yo quería es que me enseñaras tú código para leer en el puerto
serie.
Yo anteriormente lo usaba así:
::lEstado := .T.
** Prueba de leer y escribir en el puerto
::oMemo1:Value := ""
DO WHILE ::lEstado
ProcessMessages()
IF !::lEstado
EXIT
ENDIF
::DoProcesar()
ENDDO
Y ::DoPrecesar() era así:
METHOD DoProcesar() CLASS TForm1 // Este metodo no funciona igual
LOCAL nChr := InBufSize(::nHandle)
LOCAL cBuff := SPACE( nChr )
//LOCAL i := 0
*
LogDisplay( nChr ) // Da 0
LogDisplay( cBuff ) // Da Spaces
LogDisplay(InChr( ::nHandle, nChr, @cBuff )) // Da -1 anterior daba 0
IF nChr != InChr( ::nHandle, nChr, @cBuff ) // Da siempre fallo de
lectura en el puerto como es normal porque nChr que es 0 no es igual a -1
MsgInfo( "La lectura en el puerto ha fallado")
RETURN ::lEstado := .F.
*
ENDIF
*
IF Len(Alltrim(cBuff)) > 0
*
IF ASC(Alltrim(cBuff)) != 108
LogDisplay(ASC(Alltrim(cBuff)))
ENDIF
::oMemo1:Append(cBuff)
*
ENDIF
*
RETURN ::lEstado
Esto que funciona perfectamente en xHarbour y BBCC++ no funciona con
la nueva librería da siempre error de lectura en el puerto y quería
saber si tú lo hacías de otra forma.
José R. Castro
El 04/04/2013 14:02, Sommus - Reginaldo escribió:
> Cassiano,
>
> O problema síƒÂ£o exatamente os dois míƒÂ©todos/funíƒÂ§íƒÂµes que faltam....
>
>
> "Cassiano de Oliveira" <
calunaty@calunaty.com.br> escreveu na notíƒÂcia
> da mensagem:515b728d$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
>> Reginaldo eu utilizo a HBCOMM para comunicaíƒÂ§íƒÂ£o tb e tb migrei para
>> 3.0.1 com Mingw e níƒÂ£o tive problemas... vc usa pra comunicar com a
>> porta Serial?
>>
>> Se sim poste o trecho q vc usa para quem sabe eu possa te ajudar...
>>
>> []í‚´s
>>
>> "Sommus - Reginaldo" wrote in message news:515240b1$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
>>
>> Prezados,
>>
>> Migrei todos os meus projetos com o xailer 2.7.5 para o
>> xailer 3.0.1 e agora estou apenas com um problema:
>>
>> Troquei hbcomm.lib pela libhbcomm.a (pasta
>> xailer3hb32Libwinmingw) e tive o seguinte erro de
>> compilaíƒÂ§íƒÂ£o:
>>
>> A linkar: cbc.exe...
>> D:/SOMMUS/DESENVOLVIMENTO/PROJETOS/AUTOSYS Posto MíƒÂ³dulo CBC
>> - xailer3/Obj/Funcoes.o:(.data+0x208): undefined reference
>> to `HB_FUN_SETDTR'
>> D:/SOMMUS/DESENVOLVIMENTO/PROJETOS/AUTOSYS Posto MíƒÂ³dulo CBC
>> - xailer3/Obj/Funcoes.o:(.data+0x218): undefined reference
>> to `HB_FUN_SETRTS'
>> 7 Files, 0 Warnings, 2 Errors
>> Compilar tempo: 3.47s Linkar tempo: 0.83s Tempo total:
>> 4.31s
>>
>> Saludos,
>> Reginaldo
>