La funcion "CREATEFILE()" a que libreria pertenece.
Posted: Fri Apr 23, 2010 6:19 pm
Hola a todos, necesito hacer una impresion con harbour puro, hacia una impresora en bluetooth, unicamente es imprimir un archivo de texto, pero cuando compilo me da unos errores, aca este el codigo del programa
*cText=archivo a imprimir
static FUNCTION SendText( cText )
LOCAL i, hOut := CreateFile( "COM1:",GENERIC_WRITE, 0, 0, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL )
IF hOut==-1
Mensaje("can not open port of printer")
ELSE
FOR i = 1 TO Len( cText )
WriteByte( hOut, Asc( SubStr( cText, i, 1 ) ) )
NEXT
CloseHandle( hOut )
ENDIF
RETURN NIL
*** Estos son los errores que me da:
lecturas.o:lecturas.c:(.data+0x66c): undefined reference to `HB_FUN_CREATEFILE'
lecturas.o:lecturas.c:(.data+0x67c): undefined reference to `HB_FUN_WRITEBYTE'
lecturas.o:lecturas.c:(.data+0x6ac): undefined reference to `HB_FUN_CLOSEHANDLE'
Alguien tiene alguna sugerencia, el CREATEFILE es nativo de harbour, o alguna otra via para imprimir sin usar el CreateFile().
Gracias a todos de antemano
*cText=archivo a imprimir
static FUNCTION SendText( cText )
LOCAL i, hOut := CreateFile( "COM1:",GENERIC_WRITE, 0, 0, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL )
IF hOut==-1
Mensaje("can not open port of printer")
ELSE
FOR i = 1 TO Len( cText )
WriteByte( hOut, Asc( SubStr( cText, i, 1 ) ) )
NEXT
CloseHandle( hOut )
ENDIF
RETURN NIL
*** Estos son los errores que me da:
lecturas.o:lecturas.c:(.data+0x66c): undefined reference to `HB_FUN_CREATEFILE'
lecturas.o:lecturas.c:(.data+0x67c): undefined reference to `HB_FUN_WRITEBYTE'
lecturas.o:lecturas.c:(.data+0x6ac): undefined reference to `HB_FUN_CLOSEHANDLE'
Alguien tiene alguna sugerencia, el CREATEFILE es nativo de harbour, o alguna otra via para imprimir sin usar el CreateFile().
Gracias a todos de antemano