FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Pocket PC Nuevo en FWPPC
Posts: 1816
Joined: Wed Oct 26, 2005 02:49 PM
Nuevo en FWPPC
Posted: Thu Apr 09, 2015 01:06 AM

CompaΓ±eros del foro buenas noches...

El dΓ­a de hoy adquirΓ­ el fwppc, Necesito desarrollar para la empresa que trabajo actualmente una pequeΓ±a aplicaciΓ³n para el control del recaudo de los servicios de electricidad y agua. Pero la verdad es que no se por donde empezar y tampoco se que herramientas necesito. Me gustarΓ­a saber si alguien me puede indicar por donde empezar?. No se si exista un emulador de windows CE, para hacer las pruebas. Me imagino que necesito bcc582.... Mejor dicho no se por donde.

Si alguien me puede dar una luz le agradecerΓ­a.

Saludos

Saludos
LEANDRO AREVALO
BogotΓ‘ (Colombia)
https://hymlyma.com
https://hymplus.com/
leandroalfonso111@gmail.com
leandroalfonso111@hotmail.com

[ Turbo Incremental Link64 6.98 Embarcadero 7.70 ] [ FiveWin 25.01 ] [ xHarbour 64 bits) ]
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Nuevo en FWPPC
Posted: Thu Apr 09, 2015 07:21 AM

Leandro,

Cuando accedes a http://www.fivetechsoft.com/software/fwppc ahi tienes todo lo que necesitas:

  1. FWPPC
  2. Harbour 3.4 para Windows Mobile/Windows CE
  3. El compilador de C a usar (no se usa Borland)
  4. Los emuladores de Microsoft listos para usarlos (wce_wm_emulator.zip)

a) Ejecuta FWPPC.exe y te crearΓ‘ la carpeta FWPPC.
b) Descomprimer Harbour respetando su estructura de carpetas.
c) Descomprime vce2008.zip respetando su estructura de carpetas y ya tienes el compilador de C a usar.
d ) Descomprime wce_wm_emulator.zip y ahi tienes los dos emuladores (Windows Mobile y Windows CE, segΓΊn lo que necesites).

Ve a la carpeta samples y ejecuta:
buildce.bat tutor01

te generarΓ‘ tutor01.exe. Ahora lo copias a una carpeta compartida con el emulador, que se configura desde la carpeta
donde instales los emuladores. Edita gowce.bat y verΓ‘s que por defecto usamos /sharedfolder c:\fwppc\samples

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Nuevo en FWPPC
Posted: Thu Apr 09, 2015 07:25 AM
Finalmente aqui tienes una aplicaciΓ³n completa con todo el cΓ³digo fuente que desarrollΓ³ nuestro querido Charly (Carles Aubia):

http://www.fivetechsoft.com/files/clients.zip

ModifΓ­cala segΓΊn tus necesidades y ya tienes tu aplicaciΓ³n :-)
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1816
Joined: Wed Oct 26, 2005 02:49 PM
Re: Nuevo en FWPPC
Posted: Thu Apr 09, 2015 07:02 PM

Excelente Antonio..... Funciono a la primera. Ya compile varios ejemplos. Muchas Gracias.

Pero te tengo una pregunta... como hago para compilar varios pgrs?

Saludos
LEANDRO AREVALO
BogotΓ‘ (Colombia)
https://hymlyma.com
https://hymplus.com/
leandroalfonso111@gmail.com
leandroalfonso111@hotmail.com

[ Turbo Incremental Link64 6.98 Embarcadero 7.70 ] [ FiveWin 25.01 ] [ xHarbour 64 bits) ]
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Nuevo en FWPPC
Posted: Thu Apr 09, 2015 07:48 PM
Leandro,

Tienes que usar un fichero makefile. Necesitas estos ficheros y ejecuta go.bat:

go.bat
Code (fw): Select all Collapse
c:\vce2008\bin\nmake -ftest.mak


Tienes que descargar nmake.exe desde aqui:
https://bitbucket.org/fivetech/fivewin-contributions/downloads/nmake.exe

test.mak
Code (fw): Select all Collapse
#FWPPC make sample, (c) FiveTech Software 2015

HBDIR=c:\harbour_3.4_fwppc
FWDIR=c:\fwppc
VCDIR=c:\vce2008

PRGS =       \
uno.prg  \
dos.prg     \
tres.prg 
#aqui tantos PRGs como quieras

.SUFFIXES: .prg .c .obj .rc .res

test.exe : $(PRGS:.prg=.obj) test.res
   echo $(PRGS:.prg=.obj) > msvc.tmp

   echo $(FWDIR)\lib\Fivece.lib $(FWDIR)\lib\fivecec.lib >> msvc.tmp

   echo $(HBDIR)\lib\hbrtl.lib    >> msvc.tmp
   echo $(HBDIR)\lib\hbvm.lib     >> msvc.tmp
   echo $(HBDIR)\lib\gtgui.lib    >> msvc.tmp
   echo $(HBDIR)\lib\hblang.lib   >> msvc.tmp
   echo $(HBDIR)\lib\hbmacro.lib  >> msvc.tmp
   echo $(HBDIR)\lib\hbrdd.lib    >> msvc.tmp
   echo $(HBDIR)\lib\rddntx.lib   >> msvc.tmp
   echo $(HBDIR)\lib\rddcdx.lib   >> msvc.tmp
   echo $(HBDIR)\lib\rddfpt.lib   >> msvc.tmp
   echo $(HBDIR)\lib\hbsix.lib    >> msvc.tmp
   echo $(HBDIR)\lib\hbdebug.lib  >> msvc.tmp
   echo $(HBDIR)\lib\hbcommon.lib >> msvc.tmp
   echo $(HBDIR)\lib\hbpp.lib     >> msvc.tmp
   echo $(HBDIR)\lib\hbwin.lib    >> msvc.tmp
   echo $(HBDIR)\lib\hbcplr.lib   >> msvc.tmp
   echo $(HBDIR)\lib\xhb.lib      >> msvc.tmp
   echo $(HBDIR)\lib\hbpcre.lib   >> msvc.tmp
   echo $(HBDIR)\lib\hbct.lib     >> msvc.tmp
   echo $(HBDIR)\lib\hbcpage.lib  >> msvc.tmp
   echo $(HBDIR)\lib\hbzlib.lib   >> msvc.tmp
   echo $(HBDIR)\lib\png.lib      >> msvc.tmp
   echo $(HBDIR)\lib\gtwvt.lib   >> msvc.tmp

   echo $(VCDIR)\lib\coredll.lib   >> msvc.tmp
   echo $(VCDIR)\lib\corelibc.lib  >> msvc.tmp
   echo $(VCDIR)\lib\aygshell.lib  >> msvc.tmp
   echo $(VCDIR)\lib\ws2.lib       >> msvc.tmp
   echo $(VCDIR)\lib\ole32.lib     >> msvc.tmp
   echo $(VCDIR)\lib\oleaut32.lib  >> msvc.tmp
   echo $(VCDIR)\lib\uuid.lib      >> msvc.tmp
   echo $(VCDIR)\lib\ceshell.lib   >> msvc.tmp
   echo $(VCDIR)\lib\commctrl.lib  >> msvc.tmp
   echo $(VCDIR)\lib\wininet.lib   >> msvc.tmp
   echo $(VCDIR)\lib\winsock.lib   >> msvc.tmp

   IF EXIST test.res echo test.res >> msvc.tmp
   
   $(VCDIR)\bin\link @msvc.tmp /nologo /SUBSYSTEM:WINDOWSCE,4.20 /MACHINE:THUMB /ARMPADCODE /NODEFAULTLIB:libcmt /NODEFAULTLIB:oldnames > link.log
   @type link.log
   @del $(PRGS:.prg=.obj)

$(PRGS:.prg=.obj) : $(PRGS:.prg=.c)
$(PRGS:.prg=.c) : $(PRGS)

test.res : test.rc
   $(VCDIR)\bin\rc.exe -r -d__FLAT__ -I$(VCDIR)\include test.rc 
   
.prg.c:
   $(HBDIR)\bin\harbour $< /n /i$(FWDIR)\include;$(HBDIR)\include

.c.obj:
   $(VCDIR)\bin\cl.exe -c -TC -W3 -I$(HBDIR)\include -I$(VCDIR)\include $<


Te aparecerΓ‘ un warning al construir el EXE, pero aΓΊn asi debe funcionar bien:
gtwvt.lib(gtwvt.obj) : warning LNK1166: cannot adjust code at offset=0x00001000, rva=0x000FAE28
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Nuevo en FWPPC
Posted: Thu Apr 09, 2015 07:59 PM
Falta test.rc:

test.rc
Code (fw): Select all Collapse
#include "c:\vce2008\include\windows.h"

test DIALOG 10, 35, 139, 89
STYLE DS_MODALFRAME | WS_POPUP | WS_VISIBLE | WS_CAPTION | WS_SYSMENU
CAPTION "DialogBox Test"
FONT 8, "system"
{
 LTEXT "&Name:", -1, 14, 4, 23, 8
 EDITTEXT 110, 12, 14, 114, 12
 LTEXT "&Address:", -1, 14, 30, 32, 8
 EDITTEXT 120, 12, 41, 114, 12
 DEFPUSHBUTTON "OK", IDOK, 14, 67, 50, 14
 PUSHBUTTON "Cancel", IDCANCEL, 74, 67, 50, 14
}
regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1816
Joined: Wed Oct 26, 2005 02:49 PM
Re: Nuevo en FWPPC
Posted: Fri Apr 10, 2015 03:09 PM

Ok Antonio muchas gracias... voy a hacer las pruebas y te comento.

Por otro lado necesito realizar impresiones en una pequeΓ±a impresora termica marca bixolon. La cual puedo conectar por bluetooth. Tienes algun ejemplo sobre como hacer esto?

Saludos
LEANDRO AREVALO
BogotΓ‘ (Colombia)
https://hymlyma.com
https://hymplus.com/
leandroalfonso111@gmail.com
leandroalfonso111@hotmail.com

[ Turbo Incremental Link64 6.98 Embarcadero 7.70 ] [ FiveWin 25.01 ] [ xHarbour 64 bits) ]
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Nuevo en FWPPC
Posted: Fri Apr 10, 2015 03:16 PM

Leandro,

En la carpeta samples de FWPPC tienes el ejemplo bluetoth.prg

Si buscas en estos foros por fwppc bluetooth encontrarΓ‘s mΓ‘s ejemplos

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1816
Joined: Wed Oct 26, 2005 02:49 PM
Re: Nuevo en FWPPC
Posted: Tue Apr 14, 2015 02:13 PM
Antonio Buenos dias...

Que pena molestar de nuevo.. pero es que estoy intentando compilar client.prg.... Pero
me dice que hacen falta unas funciones de harbour.. este es el error que arroja.

Code (fw): Select all Collapse
β”Œβ”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”
β”‚ FiveWin for Pocket PC - February 2010            Harbour development power β”‚β–„
β”‚ (c) FiveTech Software, 1993-2010           for Microsoft Windows Pocket PC β”‚β–ˆ
β””β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”˜β–ˆ
Β  β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€
Compiling...
Harbour 3.4.0dev () (2014-09-28 23:40)
Copyright (c) 1999-2014, https://github.com/vszakats/harbour-core/
Compiling 'client.prg' and generating preprocessed output to 'client.ppo'...
Lines 2085, Functions/Procedures 13
Generating C source output to 'client.c'... Done.
Microsoft (R) C/C++ Optimizing Compiler Version 15.00.20720 for ARM
Copyright (C) Microsoft Corporation.  All rights reserved.

client.c
Microsoft (R) Windows (R) Resource Compiler Version 6.2.9200.20789
Copyright (C) Microsoft Corporation.  All rights reserved.

client.RC(2) : fatal error RC1015: cannot open include file 'include'.
client.obj : error LNK2001: unresolved external symbol HB_FUN_HB_LANG_ESWIN
client.exe : fatal error LNK1120: 1 unresolved externals
* Linking errors *

C:\fwppc\samples>


Cuando comento esa linea me arroja este...

Code (fw): Select all Collapse
β”Œβ”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”
β”‚ FiveWin for Pocket PC - February 2010            Harbour development power β”‚β–„
β”‚ (c) FiveTech Software, 1993-2010           for Microsoft Windows Pocket PC β”‚β–ˆ
β””β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”€β”˜β–ˆ
Β  β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€β–€
Compiling...
Harbour 3.4.0dev () (2014-09-28 23:40)
Copyright (c) 1999-2014, https://github.com/vszakats/harbour-core/
Compiling 'client.prg' and generating preprocessed output to 'client.ppo'...
Lines 2085, Functions/Procedures 13
Generating C source output to 'client.c'... Done.
Microsoft (R) C/C++ Optimizing Compiler Version 15.00.20720 for ARM
Copyright (C) Microsoft Corporation.  All rights reserved.

client.c
Microsoft (R) Windows (R) Resource Compiler Version 6.2.9200.20789
Copyright (C) Microsoft Corporation.  All rights reserved.

client.RC(2) : fatal error RC1015: cannot open include file 'include'.
gtwvt.lib(gtwvt.obj) : warning LNK1166: cannot adjust code at offset=0x00001000,
 rva=0x00104400
* Application successfully built *
Acceso denegado.
        0 archivo(s) copiado(s).

C:\fwppc\samples>


Saludos
Saludos
LEANDRO AREVALO
BogotΓ‘ (Colombia)
https://hymlyma.com
https://hymplus.com/
leandroalfonso111@gmail.com
leandroalfonso111@hotmail.com

[ Turbo Incremental Link64 6.98 Embarcadero 7.70 ] [ FiveWin 25.01 ] [ xHarbour 64 bits) ]
Posts: 1816
Joined: Wed Oct 26, 2005 02:49 PM
Re: Nuevo en FWPPC
Posted: Tue Apr 14, 2015 02:38 PM

Antonio que pena molestarte sin solucionar la pregunta anterior....

Pero tampoco logro crear un menu.....

Necesito armar mi ventana principal... con varias opciones pero tampoco lo logro.

Saludos

Saludos
LEANDRO AREVALO
BogotΓ‘ (Colombia)
https://hymlyma.com
https://hymplus.com/
leandroalfonso111@gmail.com
leandroalfonso111@hotmail.com

[ Turbo Incremental Link64 6.98 Embarcadero 7.70 ] [ FiveWin 25.01 ] [ xHarbour 64 bits) ]
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Nuevo en FWPPC
Posted: Wed Apr 15, 2015 07:18 AM

Que lΓ­nea tienes aqui ?

client.RC(2) : fatal error RC1015: cannot open include file 'include'.

Tienes un ejemplo de menus en FWPPC\samples\menus.prg y menus.rc

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 44158
Joined: Thu Oct 06, 2005 05:47 PM
Re: Nuevo en FWPPC
Posted: Wed Apr 15, 2015 07:20 AM

Leandro,

Cambia estas lΓ­neas:

#include "c:\vce\include\arm\windows.h"
#include "c:\vce\include\arm\commctrl.h"

por

#include "c:\vce2008\include\windows.h"
#include "c:\vce2008\include\commctrl.h"

regards, saludos

Antonio Linares
www.fivetechsoft.com
Posts: 1816
Joined: Wed Oct 26, 2005 02:49 PM
Re: Nuevo en FWPPC
Posted: Wed Apr 29, 2015 12:31 PM
Antonio buenos dias....

que pena molestar de nuevo, lo que pasa es que necesito realizar impresiones mediante bluetoth, tengo una impresora tΓ©rmica de referencia BIXOLON SPP-R200II, ya logre realizar la conexion por el puerto COM2(serial), compile el ejemplo que mencionaste en samples, pero no logro realizar la impresiΓ³n. Tu me podrias dar una luz con respecto a este tema. No se si hay que configurar algo mas en mi dispositivo.

El codigo esta de la siguiente manera:

Code (fw): Select all Collapse
// BlueTooth use sample

#include "FWCE.ch"

#define GENERIC_READ Β  Β 0x80000000
#define GENERIC_WRITE Β  0x40000000
#define OPEN_EXISTING Β  3
#define FILE_ATTRIBUTE_NORMAL 0x00000080

function Main()

Β  Β local oWnd
Β  Β local hOut := CreateFile( "COM2:",; // change the number as needed
Β  Β  Β  Β  Β  Β  Β  Β  Β  Β  Β  Β  Β  Β  Β GENERIC_WRITE, 0, 0, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL )
Β  Β local hIn := CreateFile( "COM0:",; // change the number as needed
Β  Β  Β  Β  Β  Β  Β  Β  Β  Β  Β  Β  Β  Β  GENERIC_READ, 0, 0, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL )

Β  Β DEFINE WINDOW oWnd TITLE "BlueTooth"

Β  Β @ 2, 2 BUTTON "Send" ;
Β  Β  Β  ACTION SendText( hOut, "Hello world!" ) SIZE 80, 20

Β  Β ACTIVATE WINDOW oWnd

Β  Β CloseHandle( hOut )
Β  Β CloseHandle( hIn )

return nil

function SendText( hOut, cText )

Β  Β local n
Β  Β 
Β  Β for n = 1 to Len( cText )
Β  Β  Β  WriteByte( hOut, Asc( SubStr( cText, n, 1 ) ) )
Β  Β next

return nil
Saludos
LEANDRO AREVALO
BogotΓ‘ (Colombia)
https://hymlyma.com
https://hymplus.com/
leandroalfonso111@gmail.com
leandroalfonso111@hotmail.com

[ Turbo Incremental Link64 6.98 Embarcadero 7.70 ] [ FiveWin 25.01 ] [ xHarbour 64 bits) ]
Posts: 1816
Joined: Wed Oct 26, 2005 02:49 PM
Re: Nuevo en FWPPC
Posted: Wed Apr 29, 2015 01:51 PM

Antonio buenos dΓ­as de nuevo yo..

Ya logre hacer la conexiΓ³n con la impresora.

Pero ahora necesito hacer la impresiΓ³n de una pΓ‘gina completa.
Pero no se que comandos se usan para ello. Funciona igual
que la clase tdosprn?...

Como puedo imprimir cΓ³digos de barras?

Tienes algΓΊn ejemplo?

Saludos
LEANDRO AREVALO
BogotΓ‘ (Colombia)
https://hymlyma.com
https://hymplus.com/
leandroalfonso111@gmail.com
leandroalfonso111@hotmail.com

[ Turbo Incremental Link64 6.98 Embarcadero 7.70 ] [ FiveWin 25.01 ] [ xHarbour 64 bits) ]

Continue the discussion