fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2007-11-10 12:29 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)

Browse Source 
* contrib/libmisc/common.mak
   * contrib/apollo/common.mak
   * contrib/libnf/common.mak
   * contrib/gd/common.mak
   * contrib/htmllib/common.mak
   * contrib/tip/common.mak
   * contrib/adordd/common.mak
   * contrib/rdd_ads/common.mak
   * contrib/libgt/common.mak
   * contrib/btree/common.mak
   * contrib/win32/common.mak
   * contrib/directx/common.mak
   * contrib/samples/common.mak
   * contrib/mysql/common.mak
   * contrib/bmdbfcdx/common.mak
   * contrib/pgsql/common.mak
     ! .obj -> $(OBJEXT)

   * contrib/pgsql/make_b32.bat
   * contrib/pgsql/make_vc.bat
     ! Minor fix.

   + contrib/pdflib/make_vc.bat
   + contrib/pdflib/make_b32.bat
   + contrib/pdflib/common.mak
   + contrib/pdflib/pdf1.prg
   + contrib/pdflib/pdfhbdoc.ch
   + contrib/pdflib/pdf.ch
   + contrib/pdflib/pdfhbdocs.prg
   * contrib/pdflib/pdflib.h
   * contrib/pdflib/pdfhbdoc.c
     * Borrowed from xhb.
     ! Fixed HB_ITEM -> PHB_ITEM.
     ! Fixed warnings.
     + Added non-GNU make files.
     ; NOTE: I didn't test this, it would be great if someone would.
This commit is contained in:
Viktor Szakats
2007-11-10 11:31:17 +00:00
parent 4c6474e9ca
commit b582aa43c0
28 changed files with 4313 additions and 614 deletions
Download Patch File Download Diff File Expand all files Collapse all files

40
harbour/ChangeLog
View File

@@ -8,6 +8,44 @@
2002-12-01 13:30 UTC+0100 Foo Bar <foo.bar@foobar.org>
*/
2007-11-10 12:29 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
* contrib/libmisc/common.mak
* contrib/apollo/common.mak
* contrib/libnf/common.mak
* contrib/gd/common.mak
* contrib/htmllib/common.mak
* contrib/tip/common.mak
* contrib/adordd/common.mak
* contrib/rdd_ads/common.mak
* contrib/libgt/common.mak
* contrib/btree/common.mak
* contrib/win32/common.mak
* contrib/directx/common.mak
* contrib/samples/common.mak
* contrib/mysql/common.mak
* contrib/bmdbfcdx/common.mak
* contrib/pgsql/common.mak
! .obj -> $(OBJEXT)
* contrib/pgsql/make_b32.bat
* contrib/pgsql/make_vc.bat
! Minor fix.
+ contrib/pdflib/make_vc.bat
+ contrib/pdflib/make_b32.bat
+ contrib/pdflib/common.mak
+ contrib/pdflib/pdf1.prg
+ contrib/pdflib/pdfhbdoc.ch
+ contrib/pdflib/pdf.ch
+ contrib/pdflib/pdfhbdocs.prg
* contrib/pdflib/pdflib.h
* contrib/pdflib/pdfhbdoc.c
* Borrowed from xhb.
! Fixed HB_ITEM -> PHB_ITEM.
! Fixed warnings.
+ Added non-GNU make files.
; NOTE: I didn't test this, it would be great if someone would.
2007-11-10 06:10 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
- contrib/hgf/tests/build_b32.bat
+ contrib/hgf/tests/bld_b32.bat
@@ -135,8 +173,8 @@
+ contrib/pgsql/make_vc.bat
* Changed most libs to use the generic non-GNU makefiles.
+ Added support for MSVC for all above libs.
; directx won't build under MSVC with an error.
+ Added "implib" for rdd_ads. TOFIX: Doesn't work for MSVC.
; TOFIX: directx won't build under MSVC with an error.
; TOFIX: I couldn't compile pgsql using latest 8.2.5.
* contrib/samples/gauge.c

2
harbour/contrib/adordd/common.mak
View File

@@ -11,7 +11,7 @@ LIB_PATH = $(LIB_DIR)\$(LIBNAME)$(LIBEXT)
#
LIB_OBJS = \
$(OBJ_DIR)\adordd.obj
$(OBJ_DIR)\adordd$(OBJEXT)
all: \
$(LIB_PATH) \

4
harbour/contrib/apollo/common.mak
View File

@@ -11,8 +11,8 @@ LIB_PATH = $(LIB_DIR)\$(LIBNAME)$(LIBEXT)
#
LIB_OBJS = \
$(OBJ_DIR)\apollo.obj \
$(OBJ_DIR)\apollo1.obj \
$(OBJ_DIR)\apollo$(OBJEXT) \
$(OBJ_DIR)\apollo1$(OBJEXT) \
all: \
$(LIB_PATH) \

4
harbour/contrib/bmdbfcdx/common.mak
View File

@@ -11,8 +11,8 @@ LIB_PATH = $(LIB_DIR)\$(LIBNAME)$(LIBEXT)
#
LIB_OBJS = \
$(OBJ_DIR)\bmdbfcdx1.obj \
$(OBJ_DIR)\bmsixcdx1.obj \
$(OBJ_DIR)\bmdbfcdx1$(OBJEXT) \
$(OBJ_DIR)\bmsixcdx1$(OBJEXT) \
all: \
$(LIB_PATH) \

4
harbour/contrib/btree/common.mak
View File

@@ -11,8 +11,8 @@ LIB_PATH = $(LIB_DIR)\$(LIBNAME)$(LIBEXT)
#
LIB_OBJS = \
$(OBJ_DIR)\hb_btree.obj \
$(OBJ_DIR)\tbtree.obj \
$(OBJ_DIR)\hb_btree$(OBJEXT) \
$(OBJ_DIR)\tbtree$(OBJEXT) \
all: \
$(LIB_PATH) \

2
harbour/contrib/directx/common.mak
View File

@@ -11,7 +11,7 @@ LIB_PATH = $(LIB_DIR)\$(LIBNAME)$(LIBEXT)
#
LIB_OBJS = \
$(OBJ_DIR)\w32_ddrw.obj \
$(OBJ_DIR)\w32_ddrw$(OBJEXT) \
all: \
$(LIB_PATH) \

12
harbour/contrib/gd/common.mak
View File

@@ -11,12 +11,12 @@ LIB_PATH = $(LIB_DIR)\$(LIBNAME)$(LIBEXT)
#
LIB_OBJS = \
$(OBJ_DIR)\gdwrp.obj \
$(OBJ_DIR)\gd.obj \
$(OBJ_DIR)\gdimage.obj \
$(OBJ_DIR)\gdchart.obj \
$(OBJ_DIR)\gdbar.obj \
$(OBJ_DIR)\gdbarcod.obj \
$(OBJ_DIR)\gdwrp$(OBJEXT) \
$(OBJ_DIR)\gd$(OBJEXT) \
$(OBJ_DIR)\gdimage$(OBJEXT) \
$(OBJ_DIR)\gdchart$(OBJEXT) \
$(OBJ_DIR)\gdbar$(OBJEXT) \
$(OBJ_DIR)\gdbarcod$(OBJEXT) \
all: \
$(LIB_PATH) \

24
harbour/contrib/htmllib/common.mak
View File

@@ -11,18 +11,18 @@ LIB_PATH = $(LIB_DIR)\$(LIBNAME)$(LIBEXT)
#
LIB_OBJS = \
$(OBJ_DIR)\ohtm.obj \
$(OBJ_DIR)\htmbrows.obj \
$(OBJ_DIR)\oedit.obj \
$(OBJ_DIR)\ofile.obj \
$(OBJ_DIR)\jlist.obj \
$(OBJ_DIR)\oini.obj \
$(OBJ_DIR)\jwindow.obj \
$(OBJ_DIR)\ocgi.obj \
$(OBJ_DIR)\oframe.obj \
$(OBJ_DIR)\counter.obj \
$(OBJ_DIR)\errorsys.obj \
$(OBJ_DIR)\htmutil.obj \
$(OBJ_DIR)\ohtm$(OBJEXT) \
$(OBJ_DIR)\htmbrows$(OBJEXT) \
$(OBJ_DIR)\oedit$(OBJEXT) \
$(OBJ_DIR)\ofile$(OBJEXT) \
$(OBJ_DIR)\jlist$(OBJEXT) \
$(OBJ_DIR)\oini$(OBJEXT) \
$(OBJ_DIR)\jwindow$(OBJEXT) \
$(OBJ_DIR)\ocgi$(OBJEXT) \
$(OBJ_DIR)\oframe$(OBJEXT) \
$(OBJ_DIR)\counter$(OBJEXT) \
$(OBJ_DIR)\errorsys$(OBJEXT) \
$(OBJ_DIR)\htmutil$(OBJEXT) \
all: \
$(LIB_PATH) \

34
harbour/contrib/libgt/common.mak
View File

@@ -11,23 +11,23 @@ LIB_PATH = $(LIB_DIR)\$(LIBNAME)$(LIBEXT)
#
LIB_OBJS = \
$(OBJ_DIR)\asciisum.obj \
$(OBJ_DIR)\ascpos.obj \
$(OBJ_DIR)\atdiff.obj \
$(OBJ_DIR)\chareven.obj \
$(OBJ_DIR)\charmix.obj \
$(OBJ_DIR)\charodd.obj \
$(OBJ_DIR)\chrcount.obj \
$(OBJ_DIR)\chrfirst.obj \
$(OBJ_DIR)\chrtotal.obj \
$(OBJ_DIR)\strasint.obj \
$(OBJ_DIR)\strcount.obj \
$(OBJ_DIR)\strcspn.obj \
$(OBJ_DIR)\strdiff.obj \
$(OBJ_DIR)\strexpan.obj \
$(OBJ_DIR)\strleft.obj \
$(OBJ_DIR)\strpbrk.obj \
$(OBJ_DIR)\strright.obj
$(OBJ_DIR)\asciisum$(OBJEXT) \
$(OBJ_DIR)\ascpos$(OBJEXT) \
$(OBJ_DIR)\atdiff$(OBJEXT) \
$(OBJ_DIR)\chareven$(OBJEXT) \
$(OBJ_DIR)\charmix$(OBJEXT) \
$(OBJ_DIR)\charodd$(OBJEXT) \
$(OBJ_DIR)\chrcount$(OBJEXT) \
$(OBJ_DIR)\chrfirst$(OBJEXT) \
$(OBJ_DIR)\chrtotal$(OBJEXT) \
$(OBJ_DIR)\strasint$(OBJEXT) \
$(OBJ_DIR)\strcount$(OBJEXT) \
$(OBJ_DIR)\strcspn$(OBJEXT) \
$(OBJ_DIR)\strdiff$(OBJEXT) \
$(OBJ_DIR)\strexpan$(OBJEXT) \
$(OBJ_DIR)\strleft$(OBJEXT) \
$(OBJ_DIR)\strpbrk$(OBJEXT) \
$(OBJ_DIR)\strright$(OBJEXT)
all: \
$(LIB_PATH) \

24
harbour/contrib/libmisc/common.mak
View File

@@ -11,19 +11,19 @@ LIB_PATH = $(LIB_DIR)\$(LIBNAME)$(LIBEXT)
#
LIB_OBJS = \
$(OBJ_DIR)\dates2.obj \
$(OBJ_DIR)\dbftools.obj \
$(OBJ_DIR)\hb_f.obj \
$(OBJ_DIR)\mathx.obj \
$(OBJ_DIR)\strfmt.obj \
$(OBJ_DIR)\stringsx.obj \
$(OBJ_DIR)\dates2$(OBJEXT) \
$(OBJ_DIR)\dbftools$(OBJEXT) \
$(OBJ_DIR)\hb_f$(OBJEXT) \
$(OBJ_DIR)\mathx$(OBJEXT) \
$(OBJ_DIR)\strfmt$(OBJEXT) \
$(OBJ_DIR)\stringsx$(OBJEXT) \
\
$(OBJ_DIR)\fileread.obj \
$(OBJ_DIR)\nconvert.obj \
$(OBJ_DIR)\numtxten.obj \
$(OBJ_DIR)\numtxthu.obj \
$(OBJ_DIR)\stringp.obj \
$(OBJ_DIR)\twirler.obj
$(OBJ_DIR)\fileread$(OBJEXT) \
$(OBJ_DIR)\nconvert$(OBJEXT) \
$(OBJ_DIR)\numtxten$(OBJEXT) \
$(OBJ_DIR)\numtxthu$(OBJEXT) \
$(OBJ_DIR)\stringp$(OBJEXT) \
$(OBJ_DIR)\twirler$(OBJEXT)
all: \
$(LIB_PATH) \

262
harbour/contrib/libnf/common.mak
View File

@@ -11,140 +11,140 @@ LIB_PATH = $(LIB_DIR)\$(LIBNAME)$(LIBEXT)
#
LIB_OBJS = \
$(OBJ_DIR)\caplock.obj \
$(OBJ_DIR)\color2n.obj \
$(OBJ_DIR)\descend.obj \
$(OBJ_DIR)\numlock.obj \
$(OBJ_DIR)\proper.obj \
$(OBJ_DIR)\shift.obj \
$(OBJ_DIR)\mouse.obj \
$(OBJ_DIR)\getvid.obj \
$(OBJ_DIR)\setkeys.obj \
$(OBJ_DIR)\setlastk.obj \
$(OBJ_DIR)\ftisprn.obj \
$(OBJ_DIR)\ftidle.obj \
$(OBJ_DIR)\iamidle.obj \
$(OBJ_DIR)\chdir.obj \
$(OBJ_DIR)\rmdir.obj \
$(OBJ_DIR)\alt.obj \
$(OBJ_DIR)\ctrl.obj \
$(OBJ_DIR)\getenvrn.obj \
$(OBJ_DIR)\n2color.obj \
$(OBJ_DIR)\origin.obj \
$(OBJ_DIR)\prtscr.obj \
$(OBJ_DIR)\stod.obj \
$(OBJ_DIR)\kspeed.obj \
$(OBJ_DIR)\mkdir.obj \
$(OBJ_DIR)\getver.obj \
$(OBJ_DIR)\ftattr.obj \
$(OBJ_DIR)\dispc.obj \
$(OBJ_DIR)\fttext.obj \
$(OBJ_DIR)\ftshadow.obj \
$(OBJ_DIR)\putkey.obj \
$(OBJ_DIR)\caplock$(OBJEXT) \
$(OBJ_DIR)\color2n$(OBJEXT) \
$(OBJ_DIR)\descend$(OBJEXT) \
$(OBJ_DIR)\numlock$(OBJEXT) \
$(OBJ_DIR)\proper$(OBJEXT) \
$(OBJ_DIR)\shift$(OBJEXT) \
$(OBJ_DIR)\mouse$(OBJEXT) \
$(OBJ_DIR)\getvid$(OBJEXT) \
$(OBJ_DIR)\setkeys$(OBJEXT) \
$(OBJ_DIR)\setlastk$(OBJEXT) \
$(OBJ_DIR)\ftisprn$(OBJEXT) \
$(OBJ_DIR)\ftidle$(OBJEXT) \
$(OBJ_DIR)\iamidle$(OBJEXT) \
$(OBJ_DIR)\chdir$(OBJEXT) \
$(OBJ_DIR)\rmdir$(OBJEXT) \
$(OBJ_DIR)\alt$(OBJEXT) \
$(OBJ_DIR)\ctrl$(OBJEXT) \
$(OBJ_DIR)\getenvrn$(OBJEXT) \
$(OBJ_DIR)\n2color$(OBJEXT) \
$(OBJ_DIR)\origin$(OBJEXT) \
$(OBJ_DIR)\prtscr$(OBJEXT) \
$(OBJ_DIR)\stod$(OBJEXT) \
$(OBJ_DIR)\kspeed$(OBJEXT) \
$(OBJ_DIR)\mkdir$(OBJEXT) \
$(OBJ_DIR)\getver$(OBJEXT) \
$(OBJ_DIR)\ftattr$(OBJEXT) \
$(OBJ_DIR)\dispc$(OBJEXT) \
$(OBJ_DIR)\fttext$(OBJEXT) \
$(OBJ_DIR)\ftshadow$(OBJEXT) \
$(OBJ_DIR)\putkey$(OBJEXT) \
\
$(OBJ_DIR)\aading.obj \
$(OBJ_DIR)\aavg.obj \
$(OBJ_DIR)\acctadj.obj \
$(OBJ_DIR)\acctmnth.obj \
$(OBJ_DIR)\acctqtr.obj \
$(OBJ_DIR)\acctweek.obj \
$(OBJ_DIR)\acctyear.obj \
$(OBJ_DIR)\adessort.obj \
$(OBJ_DIR)\aemaxlen.obj \
$(OBJ_DIR)\aeminlen.obj \
$(OBJ_DIR)\amedian.obj \
$(OBJ_DIR)\anomatch.obj \
$(OBJ_DIR)\any2any.obj \
$(OBJ_DIR)\aredit.obj \
$(OBJ_DIR)\asum.obj \
$(OBJ_DIR)\at2.obj \
$(OBJ_DIR)\bitclr.obj \
$(OBJ_DIR)\bitset.obj \
$(OBJ_DIR)\blink.obj \
$(OBJ_DIR)\byt2bit.obj \
$(OBJ_DIR)\byt2hex.obj \
$(OBJ_DIR)\byteand.obj \
$(OBJ_DIR)\byteneg.obj \
$(OBJ_DIR)\bytenot.obj \
$(OBJ_DIR)\byteor.obj \
$(OBJ_DIR)\bytexor.obj \
$(OBJ_DIR)\calendar.obj \
$(OBJ_DIR)\clrsel.obj \
$(OBJ_DIR)\cntryset.obj \
$(OBJ_DIR)\d2e.obj \
$(OBJ_DIR)\datecnfg.obj \
$(OBJ_DIR)\dayofyr.obj \
$(OBJ_DIR)\daytobow.obj \
$(OBJ_DIR)\dectobin.obj \
$(OBJ_DIR)\diskfunc.obj \
$(OBJ_DIR)\dispmsg.obj \
$(OBJ_DIR)\dosver.obj \
$(OBJ_DIR)\e2d.obj \
$(OBJ_DIR)\easter.obj \
$(OBJ_DIR)\elapmil.obj \
$(OBJ_DIR)\elapsed.obj \
$(OBJ_DIR)\eltime.obj \
$(OBJ_DIR)\findith.obj \
$(OBJ_DIR)\firstday.obj \
$(OBJ_DIR)\gcd.obj \
$(OBJ_DIR)\hex2dec.obj \
$(OBJ_DIR)\invclr.obj \
$(OBJ_DIR)\isbit.obj \
$(OBJ_DIR)\isbiton.obj \
$(OBJ_DIR)\isshare.obj \
$(OBJ_DIR)\lastday.obj \
$(OBJ_DIR)\linked.obj \
$(OBJ_DIR)\madd.obj \
$(OBJ_DIR)\menu1.obj \
$(OBJ_DIR)\menuto.obj \
$(OBJ_DIR)\metaph.obj \
$(OBJ_DIR)\miltime.obj \
$(OBJ_DIR)\min2dhm.obj \
$(OBJ_DIR)\month.obj \
$(OBJ_DIR)\mouse1.obj \
$(OBJ_DIR)\netpv.obj \
$(OBJ_DIR)\nooccur.obj \
$(OBJ_DIR)\ntow.obj \
$(OBJ_DIR)\nwlstat.obj \
$(OBJ_DIR)\page.obj \
$(OBJ_DIR)\pchr.obj \
$(OBJ_DIR)\pegs.obj \
$(OBJ_DIR)\pending.obj \
$(OBJ_DIR)\pickday.obj \
$(OBJ_DIR)\popadder.obj \
$(OBJ_DIR)\prtesc.obj \
$(OBJ_DIR)\pvid.obj \
$(OBJ_DIR)\qtr.obj \
$(OBJ_DIR)\rand1.obj \
$(OBJ_DIR)\restsets.obj \
$(OBJ_DIR)\ftround.obj \
$(OBJ_DIR)\savearr.obj \
$(OBJ_DIR)\savesets.obj \
$(OBJ_DIR)\scregion.obj \
$(OBJ_DIR)\sinkey.obj \
$(OBJ_DIR)\sleep.obj \
$(OBJ_DIR)\sqzn.obj \
$(OBJ_DIR)\tbwhile.obj \
$(OBJ_DIR)\tempfile.obj \
$(OBJ_DIR)\vertmenu.obj \
$(OBJ_DIR)\vidmode.obj \
$(OBJ_DIR)\wda.obj \
$(OBJ_DIR)\week.obj \
$(OBJ_DIR)\workdays.obj \
$(OBJ_DIR)\woy.obj \
$(OBJ_DIR)\xbox.obj \
$(OBJ_DIR)\year.obj
$(OBJ_DIR)\aading$(OBJEXT) \
$(OBJ_DIR)\aavg$(OBJEXT) \
$(OBJ_DIR)\acctadj$(OBJEXT) \
$(OBJ_DIR)\acctmnth$(OBJEXT) \
$(OBJ_DIR)\acctqtr$(OBJEXT) \
$(OBJ_DIR)\acctweek$(OBJEXT) \
$(OBJ_DIR)\acctyear$(OBJEXT) \
$(OBJ_DIR)\adessort$(OBJEXT) \
$(OBJ_DIR)\aemaxlen$(OBJEXT) \
$(OBJ_DIR)\aeminlen$(OBJEXT) \
$(OBJ_DIR)\amedian$(OBJEXT) \
$(OBJ_DIR)\anomatch$(OBJEXT) \
$(OBJ_DIR)\any2any$(OBJEXT) \
$(OBJ_DIR)\aredit$(OBJEXT) \
$(OBJ_DIR)\asum$(OBJEXT) \
$(OBJ_DIR)\at2$(OBJEXT) \
$(OBJ_DIR)\bitclr$(OBJEXT) \
$(OBJ_DIR)\bitset$(OBJEXT) \
$(OBJ_DIR)\blink$(OBJEXT) \
$(OBJ_DIR)\byt2bit$(OBJEXT) \
$(OBJ_DIR)\byt2hex$(OBJEXT) \
$(OBJ_DIR)\byteand$(OBJEXT) \
$(OBJ_DIR)\byteneg$(OBJEXT) \
$(OBJ_DIR)\bytenot$(OBJEXT) \
$(OBJ_DIR)\byteor$(OBJEXT) \
$(OBJ_DIR)\bytexor$(OBJEXT) \
$(OBJ_DIR)\calendar$(OBJEXT) \
$(OBJ_DIR)\clrsel$(OBJEXT) \
$(OBJ_DIR)\cntryset$(OBJEXT) \
$(OBJ_DIR)\d2e$(OBJEXT) \
$(OBJ_DIR)\datecnfg$(OBJEXT) \
$(OBJ_DIR)\dayofyr$(OBJEXT) \
$(OBJ_DIR)\daytobow$(OBJEXT) \
$(OBJ_DIR)\dectobin$(OBJEXT) \
$(OBJ_DIR)\diskfunc$(OBJEXT) \
$(OBJ_DIR)\dispmsg$(OBJEXT) \
$(OBJ_DIR)\dosver$(OBJEXT) \
$(OBJ_DIR)\e2d$(OBJEXT) \
$(OBJ_DIR)\easter$(OBJEXT) \
$(OBJ_DIR)\elapmil$(OBJEXT) \
$(OBJ_DIR)\elapsed$(OBJEXT) \
$(OBJ_DIR)\eltime$(OBJEXT) \
$(OBJ_DIR)\findith$(OBJEXT) \
$(OBJ_DIR)\firstday$(OBJEXT) \
$(OBJ_DIR)\gcd$(OBJEXT) \
$(OBJ_DIR)\hex2dec$(OBJEXT) \
$(OBJ_DIR)\invclr$(OBJEXT) \
$(OBJ_DIR)\isbit$(OBJEXT) \
$(OBJ_DIR)\isbiton$(OBJEXT) \
$(OBJ_DIR)\isshare$(OBJEXT) \
$(OBJ_DIR)\lastday$(OBJEXT) \
$(OBJ_DIR)\linked$(OBJEXT) \
$(OBJ_DIR)\madd$(OBJEXT) \
$(OBJ_DIR)\menu1$(OBJEXT) \
$(OBJ_DIR)\menuto$(OBJEXT) \
$(OBJ_DIR)\metaph$(OBJEXT) \
$(OBJ_DIR)\miltime$(OBJEXT) \
$(OBJ_DIR)\min2dhm$(OBJEXT) \
$(OBJ_DIR)\month$(OBJEXT) \
$(OBJ_DIR)\mouse1$(OBJEXT) \
$(OBJ_DIR)\netpv$(OBJEXT) \
$(OBJ_DIR)\nooccur$(OBJEXT) \
$(OBJ_DIR)\ntow$(OBJEXT) \
$(OBJ_DIR)\nwlstat$(OBJEXT) \
$(OBJ_DIR)\page$(OBJEXT) \
$(OBJ_DIR)\pchr$(OBJEXT) \
$(OBJ_DIR)\pegs$(OBJEXT) \
$(OBJ_DIR)\pending$(OBJEXT) \
$(OBJ_DIR)\pickday$(OBJEXT) \
$(OBJ_DIR)\popadder$(OBJEXT) \
$(OBJ_DIR)\prtesc$(OBJEXT) \
$(OBJ_DIR)\pvid$(OBJEXT) \
$(OBJ_DIR)\qtr$(OBJEXT) \
$(OBJ_DIR)\rand1$(OBJEXT) \
$(OBJ_DIR)\restsets$(OBJEXT) \
$(OBJ_DIR)\ftround$(OBJEXT) \
$(OBJ_DIR)\savearr$(OBJEXT) \
$(OBJ_DIR)\savesets$(OBJEXT) \
$(OBJ_DIR)\scregion$(OBJEXT) \
$(OBJ_DIR)\sinkey$(OBJEXT) \
$(OBJ_DIR)\sleep$(OBJEXT) \
$(OBJ_DIR)\sqzn$(OBJEXT) \
$(OBJ_DIR)\tbwhile$(OBJEXT) \
$(OBJ_DIR)\tempfile$(OBJEXT) \
$(OBJ_DIR)\vertmenu$(OBJEXT) \
$(OBJ_DIR)\vidmode$(OBJEXT) \
$(OBJ_DIR)\wda$(OBJEXT) \
$(OBJ_DIR)\week$(OBJEXT) \
$(OBJ_DIR)\workdays$(OBJEXT) \
$(OBJ_DIR)\woy$(OBJEXT) \
$(OBJ_DIR)\xbox$(OBJEXT) \
$(OBJ_DIR)\year$(OBJEXT)
# $(OBJ_DIR)\sysmem.obj \
# $(OBJ_DIR)\dfile.obj \
# $(OBJ_DIR)\vidcur.obj \
# $(OBJ_DIR)\scancode.obj \
# $(OBJ_DIR)\setdate.obj \
# $(OBJ_DIR)\settime.obj \
# $(OBJ_DIR)\nwsem.obj \
# $(OBJ_DIR)\nwuid.obj \
# $(OBJ_DIR)\sysmem$(OBJEXT) \
# $(OBJ_DIR)\dfile$(OBJEXT) \
# $(OBJ_DIR)\vidcur$(OBJEXT) \
# $(OBJ_DIR)\scancode$(OBJEXT) \
# $(OBJ_DIR)\setdate$(OBJEXT) \
# $(OBJ_DIR)\settime$(OBJEXT) \
# $(OBJ_DIR)\nwsem$(OBJEXT) \
# $(OBJ_DIR)\nwuid$(OBJEXT) \
# $(OBJ_DIR)\floptst.obj
# $(OBJ_DIR)\floptst$(OBJEXT)
all: \
$(LIB_PATH) \

6
harbour/contrib/mysql/common.mak
View File

@@ -11,9 +11,9 @@ LIB_PATH = $(LIB_DIR)\$(LIBNAME)$(LIBEXT)
#
LIB_OBJS = \
$(OBJ_DIR)\tmysql.obj \
$(OBJ_DIR)\tsqlbrw.obj \
$(OBJ_DIR)\mysql.obj
$(OBJ_DIR)\tmysql$(OBJEXT) \
$(OBJ_DIR)\tsqlbrw$(OBJEXT) \
$(OBJ_DIR)\mysql$(OBJEXT)
all: \
$(LIB_PATH) \

18
harbour/contrib/pdflib/common.mak Normal file
View File

@@ -0,0 +1,18 @@
#
# $Id$
#
LIBNAME = hbpdflib
LIB_PATH = $(LIB_DIR)\$(LIBNAME)$(LIBEXT)
#
# LIB rules
#
LIB_OBJS = \
$(OBJ_DIR)\pdfhbdoc$(OBJEXT) \
$(OBJ_DIR)\pdf1$(OBJEXT) \
all: \
$(LIB_PATH) \

60
harbour/contrib/pdflib/make_b32.bat Normal file
View File

@@ -0,0 +1,60 @@
@echo off
rem
rem $Id$
rem
rem ---------------------------------------------------------------
rem IMPORTANT: You'll need PDFLIB lib sources this envvar
rem to be set to successfully build this library:
rem set C_USR=-IC:\pdflib\src\pdflib
rem ---------------------------------------------------------------
rem ---------------------------------------------------------------
rem This is a generic template file, if it doesn't fit your own needs
rem please DON'T MODIFY IT.
rem
rem Instead, make a local copy and modify that one, or make a call to
rem this batch file from your customized one. [vszakats]
rem
rem Set any of the below settings to customize your build process:
rem set HB_MAKE_PROGRAM=
rem set HB_MAKE_FLAGS=
rem ---------------------------------------------------------------
if "%HB_CC_NAME%" == "" set HB_CC_NAME=b32
if "%HB_MAKE_PROGRAM%" == "" set HB_MAKE_PROGRAM=make.exe
set HB_MAKEFILE=..\mtpl_%HB_CC_NAME%.mak
rem ---------------------------------------------------------------
if "%1" == "clean" goto CLEAN
if "%1" == "CLEAN" goto CLEAN
if "%1" == "install" goto INSTALL
if "%1" == "INSTALL" goto INSTALL
:BUILD
%HB_MAKE_PROGRAM% %HB_MAKE_FLAGS% -f %HB_MAKEFILE% %1 %2 %3 > make_%HB_CC_NAME%.log
if errorlevel 1 notepad make_%HB_CC_NAME%.log
goto EXIT
:CLEAN
%HB_MAKE_PROGRAM% %HB_MAKE_FLAGS% -f %HB_MAKEFILE% CLEAN > make_%HB_CC_NAME%.log
if exist make_%HB_CC_NAME%.log del make_%HB_CC_NAME%.log > nul
if exist inst_%HB_CC_NAME%.log del inst_%HB_CC_NAME%.log > nul
goto EXIT
:INSTALL
if "%HB_INSTALL_PREFIX%" == "" set HB_INSTALL_PREFIX=..\..
if "%HB_BIN_INSTALL%" == "" set HB_BIN_INSTALL=%HB_INSTALL_PREFIX%\bin
if "%HB_INC_INSTALL%" == "" set HB_INC_INSTALL=%HB_INSTALL_PREFIX%\include
if "%HB_LIB_INSTALL%" == "" set HB_LIB_INSTALL=%HB_INSTALL_PREFIX%\lib
%HB_MAKE_PROGRAM% %HB_MAKE_FLAGS% -f %HB_MAKEFILE% INSTALL > nul
goto EXIT
:EXIT

60
harbour/contrib/pdflib/make_vc.bat Normal file
View File

@@ -0,0 +1,60 @@
@echo off
rem
rem $Id$
rem
rem ---------------------------------------------------------------
rem IMPORTANT: You'll need PDFLIB lib sources this envvar
rem to be set to successfully build this library:
rem set C_USR=-IC:\pdflib\src\pdflib
rem ---------------------------------------------------------------
rem ---------------------------------------------------------------
rem This is a generic template file, if it doesn't fit your own needs
rem please DON'T MODIFY IT.
rem
rem Instead, make a local copy and modify that one, or make a call to
rem this batch file from your customized one. [vszakats]
rem
rem Set any of the below settings to customize your build process:
rem set HB_MAKE_PROGRAM=
rem set HB_MAKE_FLAGS=
rem ---------------------------------------------------------------
if "%HB_CC_NAME%" == "" set HB_CC_NAME=vc
if "%HB_MAKE_PROGRAM%" == "" set HB_MAKE_PROGRAM=nmake.exe
set HB_MAKEFILE=..\mtpl_%HB_CC_NAME%.mak
rem ---------------------------------------------------------------
if "%1" == "clean" goto CLEAN
if "%1" == "CLEAN" goto CLEAN
if "%1" == "install" goto INSTALL
if "%1" == "INSTALL" goto INSTALL
:BUILD
%HB_MAKE_PROGRAM% %HB_MAKE_FLAGS% -f %HB_MAKEFILE% %1 %2 %3 > make_%HB_CC_NAME%.log
if errorlevel 1 notepad make_%HB_CC_NAME%.log
goto EXIT
:CLEAN
%HB_MAKE_PROGRAM% %HB_MAKE_FLAGS% -f %HB_MAKEFILE% CLEAN > make_%HB_CC_NAME%.log
if exist make_%HB_CC_NAME%.log del make_%HB_CC_NAME%.log > nul
if exist inst_%HB_CC_NAME%.log del inst_%HB_CC_NAME%.log > nul
goto EXIT
:INSTALL
if "%HB_INSTALL_PREFIX%" == "" set HB_INSTALL_PREFIX=..\..
if "%HB_BIN_INSTALL%" == "" set HB_BIN_INSTALL=%HB_INSTALL_PREFIX%\bin
if "%HB_INC_INSTALL%" == "" set HB_INC_INSTALL=%HB_INSTALL_PREFIX%\include
if "%HB_LIB_INSTALL%" == "" set HB_LIB_INSTALL=%HB_INSTALL_PREFIX%\lib
%HB_MAKE_PROGRAM% %HB_MAKE_FLAGS% -f %HB_MAKEFILE% INSTALL > nul
goto EXIT
:EXIT

230
harbour/contrib/pdflib/pdf.ch Normal file
View File

@@ -0,0 +1,230 @@
#include "fileio.ch"
#include "common.ch"
#define CRLF chr(13)+chr(10)
#define NORMAL 0
#define BOLD 1
#define ITALIC 2
#define BOLDITALIC 3
#define BOOKLEVEL 1
#define BOOKTITLE 2
#define BOOKPARENT 3
#define BOOKPREV 4
#define BOOKNEXT 5
#define BOOKFIRST 6
#define BOOKLAST 7
#define BOOKCOUNT 8
#define BOOKPAGE 9
#define BOOKCOORD 10
#define FONTNAME 1 // font name
#define FONTSIZE 2 // font size
#define LPI 3 // lines per inch
#define PAGESIZE 4 // page size
#define PAGEORIENT 5 // page orientation
#define PAGEX 6
#define PAGEY 7
#define REPORTWIDTH 8 // report width
#define REPORTPAGE 9 // report page
#define REPORTLINE 10 // report line
#define FONTNAMEPREV 11 // prev font name
#define FONTSIZEPREV 12 // prev font size
#define PAGEBUFFER 13 // page buffer
#define REPORTOBJ 14 // current obj
#define DOCLEN 15 // document length
#define TYPE1 16 // array of type 1 fonts
#define MARGINS 17 // recalc margins ?
#define HEADEREDIT 18 // edit header ?
#define NEXTOBJ 19 // next obj
#define PDFTOP 20 // top row
#define PDFLEFT 21 // left & right margin in mm
#define PDFBOTTOM 22 // bottom row
#define HANDLE 23 // handle
#define PAGES 24 // array of pages
#define REFS 25 // array of references
#define BOOKMARK 26 // array of bookmarks
#define HEADER 27 // array of headers
#define FONTS 28 // array of report fonts
#define IMAGES 29 // array of report images
#define PAGEIMAGES 30 // array of current page images
#define PAGEFONTS 31 // array of current page fonts
#define FONTWIDTH 32 // array of fonts width's
#define OPTIMIZE 33 // optimized ?
#define CREATOR 34
#define KEYWORD 35
#define AUTHOR 36
#define SUBJECT 37
#define OVERLINE 38
#define UNDERLINE 39
#define PDFCOMPLVL 40
#define PARAMLEN 40 // number of report elements
#define ALIGN_LEFT 1
#define ALIGN_CENTER 2
#define ALIGN_RIGHT 3
#define ALIGN_JUSTIFY 4
#define IMAGE_WIDTH 1
#define IMAGE_HEIGHT 2
#define IMAGE_XRES 3
#define IMAGE_YRES 4
#define IMAGE_BITS 5
#define IMAGE_FROM 6
#define IMAGE_LENGTH 7
#define BYTE 1
#define ASCII 2
#define SHORT 3
#define LONG 4
#define RATIONAL 5
#define SBYTE 6
#define UNDEFINED 7
#define SSHORT 8
#define SLONG 9
#define SRATIONAL 10
#define FLOAT 11
#define DOUBLE 12
#define pdf_ALICEBLUE "F0F8FF"
#define pdf_ANTIQUEWHITE "FAEBD7"
#define pdf_AQUA "00FFFF"
#define pdf_AQUAMARINE "7FFFD4"
#define pdf_AZURE "F0FFFF"
#define pdf_BEIGE "F5F5DC"
#define pdf_BISQUE "FFE4C4"
#define pdf_BLACK "000000"
#define pdf_BLANCHEDALMOND "FFEBCD"
#define pdf_BLUE "0000FF"
#define pdf_BLUEVIOLET "8A2BE2"
#define pdf_BROWN "A52A2A"
#define pdf_BURLYWOOD "DEB887"
#define pdf_CADETBLUE "5F9EA0"
#define pdf_CHARTREUSE "7FFF00"
#define pdf_CHOCOLATE "D2691E"
#define pdf_CORAL "FF7F50"
#define pdf_CORNFLOWERBLUE "6495ED"
#define pdf_CORNSILK "FFF8DC"
#define pdf_CRIMSON "DC143C"
#define pdf_CYAN "00FFFF"
#define pdf_DARKBLUE "00008B"
#define pdf_DARKCYAN "008B8B"
#define pdf_DARKGOLDENROD "B8860B"
#define pdf_DARKGRAY "A9A9A9"
#define pdf_DARKGREEN "006400"
#define pdf_DARKKHAKI "BDB76B"
#define pdf_DARKMAGENTA "8B008B"
#define pdf_DARKOLIVEGREEN "556B2F"
#define pdf_DARKORANGE "FF8C00"
#define pdf_DARKORCHID "9932CC"
#define pdf_DARKRED "8B0000"
#define pdf_DARKSALMON "E9967A"
#define pdf_DARKSEAGREEN "8FBC8F"
#define pdf_DARKSLATEBLUE "483D8B"
#define pdf_DARKSLATEGRAY "2F4F4F"
#define pdf_DARKTURQUOISE "00CED1"
#define pdf_DARKVIOLET "9400D3"
#define pdf_DEEPPINK "FF1493"
#define pdf_DEEPSKYBLUE "00BFFF"
#define pdf_DIMGRAY "696969"
#define pdf_DODGERBLUE "1E90FF"
#define pdf_FIREBRICK "B22222"
#define pdf_FLORALWHITE "FFFAF0"
#define pdf_FORESTGREEN "228B22"
#define pdf_FUCHSIA "FF00FF"
#define pdf_GAINSBORO "DCDCDC"
#define pdf_GHOSTWHITE "F8F8FF"
#define pdf_GOLD "FFD700"
#define pdf_GOLDENROD "DAA520"
#define pdf_GRAY "808080"
#define pdf_GREEN "008000"
#define pdf_GREENYELLOW "ADFF2F"
#define pdf_HONEYDEW "F0FFF0"
#define pdf_HOTPINK "FF69B4"
#define pdf_INDIANRED "CD5C5C"
#define pdf_INDIGO "4B0082"
#define pdf_IVORY "FFFFF0"
#define pdf_KHAKI "F0E68C"
#define pdf_LAVENDER "E6E6FA"
#define pdf_LAVENDERBLUSH "FFF0F5"
#define pdf_LAWNGREEN "7CFC00"
#define pdf_LEMONCHIFFON "FFFACD"
#define pdf_LIGHTBLUE "ADD8E6"
#define pdf_LIGHTCORAL "F08080"
#define pdf_LIGHTCYAN "E0FFFF"
#define pdf_LIGHTGOLDENRODYELLOW "FAFAD2"
#define pdf_LIGHTGREEN "90EE90"
#define pdf_LIGHTGREY "D3D3D3"
#define pdf_LIGHTPINK "FFB6C1"
#define pdf_LIGHTSALMON "FFA07A"
#define pdf_LIGHTSEAGREEN "20B2AA"
#define pdf_LIGHTSKYBLUE "87CEFA"
#define pdf_LIGHTSLATEGRAY "778899"
#define pdf_LIGHTSTEELBLUE "B0C4DE"
#define pdf_LIGHTYELLOW "FFFFE0"
#define pdf_LIME "00FF00"
#define pdf_LIMEGREEN "32CD32"
#define pdf_LINEN "FAF0E6"
#define pdf_MAGENTA "FF00FF"
#define pdf_MAROON "800000"
#define pdf_MEDIUMAQUAMARINE "66CDAA"
#define pdf_MEDIUMBLUE "0000CD"
#define pdf_MEDIUMORCHID "BA55D3"
#define pdf_MEDIUMPURPLE "9370DB"
#define pdf_MEDIUMSEAGREEN "3CB371"
#define pdf_MEDIUMSLATEBLUE "7B68EE"
#define pdf_MEDIUMSPRINGGREEN "00FA9A"
#define pdf_MEDIUMTURQUOISE "48D1CC"
#define pdf_MEDIUMVIOLETRED "C71585"
#define pdf_MIDNIGHTBLUE "191970"
#define pdf_MINTCREAM "F5FFFA"
#define pdf_MISTYROSE "FFE4E1"
#define pdf_MOCCASIN "FFE4B5"
#define pdf_NAVAJOWHITE "FFDEAD"
#define pdf_NAVY "000080"
#define pdf_OLDLACE "FDF5E6"
#define pdf_OLIVE "808000"
#define pdf_OLIVEDRAB "6B8E23"
#define pdf_ORANGE "FFA500"
#define pdf_ORANGERED "FF4500"
#define pdf_ORCHID "DA70D6"
#define pdf_PALEGOLDENROD "EEE8AA"
#define pdf_PALEGREEN "98FB98"
#define pdf_PALETURQUOISE "AFEEEE"
#define pdf_PALEVIOLETRED "DB7093"
#define pdf_PAPAYAWHIP "FFEFD5"
#define pdf_PEACHPUFF "FFDAB9"
#define pdf_PERU "CD853F"
#define pdf_PINK "FFC0CB"
#define pdf_PLUM "DDADDD"
#define pdf_POWDERBLUE "B0E0E6"
#define pdf_PURPLE "800080"
#define pdf_RED "FF0000"
#define pdf_ROSYBROWN "BC8F8F"
#define pdf_ROYALBLUE "4169E1"
#define pdf_SADDLEBROWN "8B4513"
#define pdf_SALMON "FA8072"
#define pdf_SANDYBROWN "F4A460"
#define pdf_SEAGREEN "2E8B57"
#define pdf_SEASHELL "FFF5EE"
#define pdf_SIENNA "A0522D"
#define pdf_SILVER "C0C0C0"
#define pdf_SKYBLUE "87CEEB"
#define pdf_SLATEBLUE "6A5ACD"
#define pdf_SLATEGRAY "708090"
#define pdf_SNOW "FFFAFA"
#define pdf_SPRINGGREEN "00FF7F"
#define pdf_STEELBLUE "4682B4"
#define pdf_TAN "D2B48C"
#define pdf_TEAL "008080"
#define pdf_THISTLE "D8BFD8"
#define pdf_TOMATO "FF6347"
#define pdf_TURQUOISE "40E0D0"
#define pdf_VIOLET "EE82EE"
#define pdf_WHEAT "F5DEB3"
#define pdf_WHITE "FFFFFF"
#define pdf_WHITESMOKE "F5F5F5"
#define pdf_YELLOW "FFFF00"
#define pdf_YELLOWGREEN "9ACD32"

1848
harbour/contrib/pdflib/pdf1.prg Normal file
View File

File diff suppressed because it is too large Load Diff

796
harbour/contrib/pdflib/pdfhbdoc.c
View File

@@ -6,7 +6,7 @@
* Harbour Project source code:
* PDF low level Api for HBDOC
*
* Copyright 2000 Luiz Rafael Culik <culik@sl.conex.net>
* Copyright 2000-2004 Luiz Rafael Culik <culikr /at/ brturbo.com>
* www - http://www.harbour-project.org
*
* This program is free software; you can redistribute it and/or modify
@@ -65,436 +65,540 @@ PDF *szPDFFile;
#define LEAD ((int) (FONTSIZESMALL * 1.0))
#define LEADLINK ((int) (FONTSIZESMALL * 1.3))
#define LEADTABLE ((int) (FONTSIZESMALL * 1.2))
static float iRow=800;
static float fRow = 800;
static float fOldPos;
static float iWidth;
static float iCol;
static int sziFontBold=0;
static int sziFont=0;
static int iPage=1;
static float fCol;
static int sziFontBold = 0;
static int sziFont = 0;
static int iPage = 1;
static ULONG uiLen;
static ULONG uiCount;
static BOOL bTItems;
static BOOL bFItems;
PHB_ITEM pArray=NULL;
static float hb_checkStringWidth(const char *szString);
static float hb_pdfGetHeight(const char *szText);
static void hb_ProcessTableItem(PHB_ITEM p1,PHB_ITEM p2,PHB_ITEM p3,PHB_ITEM p4);
float getText(PDF *p,const char *szText,int iFont,float irow,float icol,float iw);
void setText(PDF *p,const char *szText,float irow,float icol,float h,float iw);
#if 0
static float fRow = 0
#endif
static float fCurCol = 0, fCurLastCol, fLastRow;
static float fStartCol, fStartCol2;
static PHB_ITEM pArray = NULL;
static BOOL bInitArray = 0;
static float hb_checkStringWidth( const char * szString );
static float hb_pdfGetHeight( const char *szText );
static void hb_ProcessTableItem( PHB_ITEM p1, PHB_ITEM p2, PHB_ITEM p3, PHB_ITEM p4 );
float getText( PDF *p, const char *szText, int iFont, float frow, float fcol, float iw);
void setText( PDF *p, const char *szText, float frow, float fcol, float h, float iw);
HB_FUNC(HB_PDFNEW)
{
const char *szFileResult;
szFileResult= (char *) hb_parc(1);
if (szPDFFile ==NULL) {
szPDFFile=PDF_new();
PDF_set_value(szPDFFile,"compress", (float) 9);
}
const char *szFileResult;
szFileResult= ( char * ) hb_parc( 1 );
if (PDF_open_file(szPDFFile, szFileResult) == -1) {
hb_retl(1);
}
PDF_set_info(szPDFFile, "Keywords", "Harbour compiler");
PDF_set_info(szPDFFile, "Subject", "Harbour");
PDF_set_info(szPDFFile, "Title", "Harbour doc guide");
PDF_set_info(szPDFFile, "Creator", "HBDOC Harbour Document Extractor");
PDF_set_info(szPDFFile, "Author", "Luiz Rafael Culik");
sziFont = PDF_findfont(szPDFFile, FONTNORMAL, "host", 0);
sziFontBold = PDF_findfont(szPDFFile, FONTBOLD, "host", 0);
hb_retl(0);
if ( szPDFFile == NULL)
{
szPDFFile = PDF_new();
PDF_set_value( szPDFFile, "compress", ( float ) 9);
}
if ( PDF_open_file( szPDFFile, szFileResult ) == -1 )
{
hb_retl( 1 );
}
PDF_set_info( szPDFFile, "Keywords", "XHarbour compiler" );
PDF_set_info( szPDFFile, "Subject" , "XHarbour" ) ;
PDF_set_info( szPDFFile, "Title" , "XHarbour doc guide" );
PDF_set_info( szPDFFile, "Creator" , "HBDOC XHarbour Document Extractor" );
PDF_set_info( szPDFFile, "Author" , "Luiz Rafael Culik" );
sziFont = PDF_findfont( szPDFFile, FONTNORMAL, "host", 0);
sziFontBold = PDF_findfont( szPDFFile, FONTBOLD, "host", 0);
hb_retl( 0 );
}
HB_FUNC(HB_PDFNEWPAGE)
{
const char *szTitleT;
szTitleT= (char *) hb_parc(1);
PDF_begin_page(szPDFFile, a4_width, a4_height); /* start a new page */
PDF_setfont(szPDFFile, sziFontBold, FONTSIZEBOLD);
PDF_show_xy(szPDFFile, szTitleT,50,iRow-=LEAD);
// PDF_show_xy(szPDFFile, szKeyWordT, 50, iRow-=LEAD);
const char *szTitleT;
fCurCol = 0;
szTitleT= ( char * ) hb_parc( 1 );
PDF_begin_page( szPDFFile, a4_width, a4_height ); /* start a new page */
PDF_setfont( szPDFFile, sziFontBold, FONTSIZEBOLD );
PDF_show_xy( szPDFFile, szTitleT, 50, fRow -= LEAD );
}
HB_FUNC(HB_PDFENDPAGE)
{
iRow=800;
PDF_end_page(szPDFFile); /* close page */
iPage++;
fRow = 800;
PDF_end_page( szPDFFile ); /* close page */
iPage ++ ;
}
HB_FUNC(HB_PDFWRITEBOLDTEXT)
{
const char *szTextT;
const char *szTextT;
szTextT = ( char * ) hb_parc( 1 );
if ( fRow<=40)
{
fRow=800;
PDF_end_page( szPDFFile );
sziFont = PDF_findfont( szPDFFile, FONTNORMAL, "host", 0 );
sziFontBold = PDF_findfont( szPDFFile, FONTBOLD, "host", 0 );
PDF_begin_page( szPDFFile, a4_width, a4_height ); /* start a new page */
iPage ++ ;
}
szTextT=(char *) hb_parc(1);
PDF_setfont( szPDFFile, sziFontBold, FONTSIZESMALL );
if (iRow<=40) {
iRow=800;
PDF_end_page(szPDFFile);
sziFont = PDF_findfont(szPDFFile, FONTNORMAL, "host", 0);
sziFontBold = PDF_findfont(szPDFFile, FONTBOLD, "host", 0);
PDF_begin_page(szPDFFile, a4_width, a4_height); /* start a new page */
iPage++;
PDF_show_xy( szPDFFile, szTextT, 25, fRow -= LEAD );
PDF_setfont( szPDFFile, sziFont, FONTSIZESMALL );
}
PDF_setfont(szPDFFile, sziFontBold, FONTSIZESMALL);
PDF_show_xy(szPDFFile, szTextT,25, iRow-=LEAD);
PDF_setfont(szPDFFile, sziFont, FONTSIZESMALL);
}
HB_FUNC(HB_PDFWRITEBOLDTEXT1)
{
const char *szTextT;
szTextT=(char *) hb_parc(1);
if (iRow<=40) {
const char *szTextT;
szTextT = ( char * ) hb_parc( 1 );
iRow=800;
PDF_end_page(szPDFFile);
PDF_begin_page(szPDFFile, a4_width, a4_height); /* start a new page */
sziFont = PDF_findfont(szPDFFile, FONTNORMAL, "host", 0);
sziFontBold = PDF_findfont(szPDFFile, FONTBOLD, "host", 0);
iPage++;
if ( fRow <= 40 )
{
fRow = 800;
PDF_end_page( szPDFFile );
PDF_begin_page( szPDFFile, a4_width, a4_height ); /* start a new page */
sziFont = PDF_findfont( szPDFFile, FONTNORMAL, "host", 0);
sziFontBold = PDF_findfont( szPDFFile, FONTBOLD, "host", 0);
iPage ++;
}
PDF_setfont( szPDFFile, sziFontBold, FONTSIZEBOLD );
PDF_show_xy( szPDFFile, szTextT, 25, fRow -= LEAD );
PDF_setfont( szPDFFile, sziFont, FONTSIZESMALL );
}
PDF_setfont(szPDFFile, sziFontBold, FONTSIZEBOLD);
PDF_show_xy(szPDFFile, szTextT,25, iRow-=LEAD);
PDF_setfont(szPDFFile, sziFont, FONTSIZESMALL);
}
HB_FUNC(HB_PDFWRITETEXT)
{
const char *szTextT;
szTextT=(char *) hb_parc(1);
if (iRow<=40) {
iRow=800;
PDF_end_page(szPDFFile);
sziFont = PDF_findfont(szPDFFile, FONTNORMAL, "host", 0);
sziFontBold = PDF_findfont(szPDFFile, FONTBOLD, "host", 0);
PDF_begin_page(szPDFFile, a4_width, a4_height); /* start a new page */
iPage++;
}
const char *szTextT;
szTextT = ( char * ) hb_parc( 1 );
PDF_setfont(szPDFFile, sziFont, FONTSIZESMALL);
PDF_show_xy(szPDFFile,szTextT,25,iRow-=LEAD);
if ( fRow <= 40 )
{
fRow=800;
PDF_end_page( szPDFFile );
sziFont = PDF_findfont( szPDFFile, FONTNORMAL, "host", 0);
sziFontBold = PDF_findfont( szPDFFile, FONTBOLD, "host", 0);
PDF_begin_page( szPDFFile, a4_width, a4_height); /* start a new page */
iPage ++;
}
PDF_setfont( szPDFFile, sziFont, FONTSIZESMALL );
PDF_show_xy( szPDFFile, szTextT, 25, fRow -= LEAD);
}
HB_FUNC(HB_PDFCLOSE)
{
hb_itemRelease(pArray);
PDF_close(szPDFFile); /* close PDF document */
PDF_delete(szPDFFile); /* delete the PDF object */
szPDFFile=NULL;
sziFontBold=NULL;
sziFont=NULL;
hb_itemClear( pArray );
PDF_close( szPDFFile ); /* close PDF document */
PDF_delete( szPDFFile ); /* delete the PDF object */
szPDFFile=NULL;
sziFontBold=0;
sziFont=0;
}
HB_FUNC(HB_PDFWRITEARG)
{
const char *szTextT;
const char *szBTextT;
const char *szTextT;
const char *szBTextT;
szTextT=(char *) hb_parc(2);
szBTextT=(char *) hb_parc(1);
szTextT = ( char * ) hb_parc( 2 );
szBTextT = ( char * ) hb_parc( 1 );
if (iRow<=40) {
iRow=800;
PDF_end_page(szPDFFile);
sziFont = PDF_findfont(szPDFFile, FONTNORMAL, "host", 0);
sziFontBold = PDF_findfont(szPDFFile, FONTBOLD, "host", 0);
PDF_begin_page(szPDFFile, a4_width, a4_height); /* start a new page */
iPage++;
}
PDF_setfont(szPDFFile, sziFontBold, FONTSIZESMALL);
PDF_show_xy(szPDFFile,szBTextT,25,iRow-=LEAD);
PDF_setfont(szPDFFile, sziFont, FONTSIZESMALL);
PDF_show(szPDFFile,szTextT);
if ( fRow <= 40 )
{
fRow = 800;
PDF_end_page( szPDFFile );
sziFont = PDF_findfont( szPDFFile, FONTNORMAL, "host", 0);
sziFontBold = PDF_findfont( szPDFFile, FONTBOLD, "host", 0);
PDF_begin_page( szPDFFile, a4_width, a4_height); /* start a new page */
iPage ++;
}
PDF_setfont( szPDFFile, sziFontBold, FONTSIZESMALL );
PDF_show_xy( szPDFFile, szBTextT, 25, fRow -= LEAD );
PDF_setfont( szPDFFile, sziFont, FONTSIZESMALL );
PDF_show( szPDFFile, szTextT );
}
HB_FUNC(HB_PDFADDLINK)
{
int iPagetoGo=hb_parni(2);
const char *szLink;
int iPagetoGo = hb_parni( 2 ) - 1;
const char *szLink;
szLink=(char *) hb_parc(1);
if (iRow<=40) {
iRow=800;
PDF_end_page(szPDFFile);
sziFont = PDF_findfont(szPDFFile, FONTNORMAL, "host", 0);
sziFontBold = PDF_findfont(szPDFFile, FONTBOLD, "host", 0);
PDF_begin_page(szPDFFile, a4_width, a4_height); /* start a new page */
PDF_setfont(szPDFFile, sziFont, FONTSIZESMALL);
iPage++;
szLink = ( char * ) hb_parc( 1 );
if (fRow <= 40 )
{
fRow = 800;
PDF_end_page( szPDFFile );
sziFont = PDF_findfont( szPDFFile, FONTNORMAL, "host", 0 );
sziFontBold = PDF_findfont( szPDFFile, FONTBOLD, "host", 0 );
PDF_begin_page( szPDFFile, a4_width, a4_height ); /* start a new page */
PDF_setfont( szPDFFile, sziFont, FONTSIZESMALL );
iPage ++;
}
fCol = ( float ) fRow;
iWidth = hb_checkStringWidth( szLink );
// New Page, so curCol is 0
if ( fCurCol == 0)
{
fCurCol = 60 ;
fLastRow = ( fRow - LEADLINK );
fCurLastCol = ( fCol - LEAD );
fStartCol = 49 ;
fStartCol2 = 50 ;
}
if ( fCurCol + iWidth + 10 <= a4_width )
{
PDF_set_border_color( szPDFFile, ( float ) 1 ,( float ) 1 ,( float ) 1 );
PDF_add_locallink( szPDFFile, fStartCol, fLastRow, fCurCol + iWidth, fCol, iPagetoGo, "fitwidth");
PDF_setrgbcolor( szPDFFile, ( float ) 0, ( float ) 0, ( float ) 1 );
PDF_set_parameter( szPDFFile, "underline", "true" );
PDF_show_xy( szPDFFile, szLink, fStartCol2, fCurLastCol );
PDF_setrgbcolor( szPDFFile, ( float ) 0, ( float ) 0, ( float ) 0);
PDF_set_parameter( szPDFFile, "underline", "false");
fCurCol += 10 + iWidth;
fStartCol += iWidth;
fStartCol2 += iWidth;
if( fCurCol > a4_width )
{
fCurCol = 00 ;
fStartCol = 49 ;
fStartCol2 = 50 ;
fRow -= LEADLINK;
fCol -= LEAD;
}
}
iCol= (float) iRow;
iWidth=hb_checkStringWidth(szLink);
PDF_set_border_color(szPDFFile, (float) 1 ,(float) 1 ,(float) 1);
PDF_add_locallink(szPDFFile, 49, iRow-=LEADLINK,60+iWidth, iCol, iPagetoGo, "fitwidth");
PDF_setrgbcolor(szPDFFile, (float) 0, (float) 0, (float) 1);
PDF_set_parameter(szPDFFile, "underline","true");
PDF_show_xy(szPDFFile,szLink,50,iCol-=LEAD);
PDF_setrgbcolor(szPDFFile, (float) 0, (float) 0, (float) 0);
PDF_set_parameter(szPDFFile, "underline","false");
iWidth=0;
iWidth = 0 ;
}
HB_FUNC(HB_PDFINITBOOK)
{
PHB_ITEM pItems;
pItems=hb_param(1,HB_IT_ARRAY);
uiLen=hb_arrayLen(pItems);
if (pArray == NULL){
pArray=hb_itemArrayNew( uiLen );
PHB_ITEM pItems;
pItems = hb_param( 1, HB_IT_ARRAY );
uiLen = hb_arrayLen( pItems );
if ( !bInitArray )
{
pArray = hb_itemNew( NULL );
hb_arrayNew( pArray, 0 );
bInitArray = 1;
}
for (uiCount=1;uiCount<=uiLen;uiCount++)
{
const char *szBook = (char *) hb_arrayGetCPtr(pItems,uiCount);
int iLevel;
PHB_ITEM pTempArray=hb_itemArrayNew(2);
PHB_ITEM pTemp;
PHB_ITEM pTempDesc;
iLevel=PDF_add_bookmark(szPDFFile, szBook, 0, 0);
pTempDesc=hb_itemPutC(NULL,hb_arrayGetCPtr(pItems,uiCount)) ;
hb_itemArrayPut(pTempArray,1,pTempDesc);
hb_itemRelease(pTempDesc);
pTemp=hb_itemPutNI(NULL,iLevel);
hb_itemArrayPut(pTempArray,2,pTemp);
hb_itemRelease(pTemp);
hb_itemArrayPut(pArray,uiCount,pTempArray);
hb_itemRelease(pTempArray) ;
for ( uiCount = 1 ; uiCount <= uiLen ; uiCount++ )
{
const char *szBook = ( char * ) hb_arrayGetCPtr( pItems, uiCount );
int iLevel;
PHB_ITEM TempArray = hb_itemNew( NULL );
PHB_ITEM Temp = hb_itemNew( NULL );
hb_arrayNew( TempArray, 2 );
iLevel = PDF_add_bookmark( szPDFFile, szBook, 0, 0 );
hb_arraySetForward( TempArray, 1, hb_itemPutC( Temp, hb_arrayGetCPtr( pItems, uiCount ) ) );
hb_arraySetForward( TempArray, 2, hb_itemPutNI( Temp, iLevel) );
hb_arraySetForward( pArray, uiCount, TempArray );
hb_itemRelease( Temp );
hb_itemRelease( TempArray );
}
}
}
HB_FUNC(HB_PDFBOOKMARK)
{
const char *szBook1=(char *)hb_parc(2);
ULONG uiPos;
PHB_ITEM pTempArray;
int iParent=0;
PHB_ITEM pBlock=hb_param(3,HB_IT_BLOCK);
uiPos=hb_arrayScan(pArray,pBlock,NULL,NULL);
if (uiPos>0) {
pTempArray=hb_itemArrayGet(pArray,uiPos);
iParent=hb_arrayGetNI(pTempArray,2);
}
const char *szBook1 =( char * )hb_parc( 2 );
ULONG uiPos;
PHB_ITEM TempArray = hb_itemNew( NULL );
int iParent = 0;
PHB_ITEM pBlock = hb_param( 3, HB_IT_BLOCK );
uiPos = hb_arrayScan( pArray, pBlock, NULL, NULL, FALSE );
if ( uiPos > 0 )
{
if ( hb_arrayGet( pArray, uiPos, TempArray ) )
{
iParent = hb_arrayGetNI( TempArray, 2 );
hb_itemClear( TempArray );
}
}
PDF_add_bookmark(szPDFFile, szBook1, iParent, 0);
hb_itemRelease(pTempArray);
hb_itemRelease( TempArray );
}
HB_FUNC(HB_GETPAGE)
{
hb_retni(iPage);
}
static BOOL hb_checkRow(float iLine)
{
if (iLine<=20) {
iRow=800;
PDF_end_page(szPDFFile);
PDF_begin_page(szPDFFile, a4_width, a4_height); /* start a new page */
iPage++;
return TRUE;
}
return FALSE;
hb_retni( iPage );
}
#if 0
static BOOL hb_checkRow( float iLine )
{
if ( iLine <= 20 )
{
fRow = 800;
PDF_end_page( szPDFFile );
PDF_begin_page( szPDFFile, a4_width, a4_height); /* start a new page */
iPage ++;
return TRUE;
}
return FALSE;
}
#endif
static float hb_checkStringWidth(const char *szString)
{
float fReturn;
fReturn= PDF_stringwidth(szPDFFile,szString,sziFont,FONTSIZESMALL);
return fReturn;
float fReturn;
fReturn = PDF_stringwidth( szPDFFile, szString, sziFont, FONTSIZESMALL);
return fReturn;
}
HB_FUNC(HB_PDFTABLE)
{
PHB_ITEM pTableItem ;
PHB_ITEM pTableItem1 ;
PHB_ITEM pTableItem2 ;
PHB_ITEM pTableItem3 ;
ULONG ulPos;
PHB_ITEM pTableItem ;
PHB_ITEM pTableItem1 ;
PHB_ITEM pTableItem2 ;
PHB_ITEM pTableItem3 ;
ULONG ulPos;
pTableItem = hb_param( 1, HB_IT_ARRAY );
pTableItem1 = hb_param( 2, HB_IT_ARRAY );
pTableItem2 = hb_param( 3, HB_IT_ARRAY );
pTableItem3 = hb_param( 4, HB_IT_ARRAY );
if ( pTableItem2 != NULL)
{
bTItems = TRUE;
}
if ( pTableItem3 != NULL )
{
bFItems = TRUE;
bTItems = FALSE;
}
fRow -= LEAD;
for ( ulPos = 1 ; ulPos <= hb_arrayLen( pTableItem ) ; ulPos ++ )
{
PHB_ITEM TempArray = hb_itemNew( NULL );
PHB_ITEM TempArray1 = hb_itemNew( NULL );
fCol = fRow;
hb_arrayGet( pTableItem, ulPos, TempArray );
hb_arrayGet( pTableItem1, ulPos, TempArray1 );
if ( !bTItems && !bFItems)
{
hb_ProcessTableItem( TempArray, TempArray1, NULL, NULL);
hb_itemClear( TempArray );
hb_itemClear( TempArray1 );
}
if ( bTItems && !bFItems)
{
PHB_ITEM TempArray2 = hb_itemNew( NULL );
hb_arrayGet( pTableItem2 , ulPos, TempArray2 );
hb_ProcessTableItem( TempArray, TempArray1, TempArray2, NULL );
hb_itemClear( TempArray );
hb_itemClear( TempArray1 );
hb_itemClear( TempArray2 );
hb_itemRelease( TempArray2 );
}
if (!bTItems && bFItems)
{
PHB_ITEM TempArray2 = hb_itemNew( NULL );
PHB_ITEM TempArray3 = hb_itemNew( NULL );
hb_arrayGet( pTableItem2, ulPos, TempArray2 );
hb_arrayGet( pTableItem3, ulPos, TempArray3 );
hb_ProcessTableItem( TempArray, TempArray1, TempArray2, TempArray3 );
hb_itemClear( TempArray );
hb_itemClear( TempArray1 );
hb_itemClear( TempArray2 );
hb_itemClear( TempArray3 );
hb_itemRelease( TempArray2 );
hb_itemRelease( TempArray3 );
}
}
pTableItem =hb_param(1,HB_IT_ARRAY);
pTableItem1 =hb_param(2,HB_IT_ARRAY);
pTableItem2 =hb_param(3,HB_IT_ARRAY);
pTableItem3 =hb_param(4,HB_IT_ARRAY);
if (pTableItem2 != NULL){
bTItems=TRUE;
}
if (pTableItem3 != NULL){
bFItems=TRUE;
bTItems=FALSE;
bFItems=FALSE;
fOldPos=0;
}
iRow-=LEAD;
for (ulPos=1;ulPos<=hb_arrayLen(pTableItem);ulPos++) {
PHB_ITEM pTempArray ;
PHB_ITEM pTempArray1 ;
iCol=iRow;
pTempArray=hb_itemArrayGet(pTableItem,ulPos);
pTempArray1=hb_itemArrayGet(pTableItem1,ulPos);
if (!bTItems && !bFItems) {
/* if (ulPos<2) {
iRow-=LEAD;
}*/
hb_ProcessTableItem(pTempArray,pTempArray1,NULL,NULL);
hb_itemRelease(pTempArray);
hb_itemRelease(pTempArray1);
}
if (bTItems && !bFItems) {
PHB_ITEM pTempArray2;
pTempArray2=hb_itemArrayGet(pTableItem2,ulPos);
hb_ProcessTableItem(pTempArray,pTempArray1,pTempArray2,NULL);
hb_itemRelease(pTempArray);
hb_itemRelease(pTempArray1);
hb_itemRelease(pTempArray2);
}
if (!bTItems && bFItems) {
PHB_ITEM pTempArray2 ;
PHB_ITEM pTempArray3 ;
pTempArray2=hb_itemArrayGet(pTableItem2,ulPos);
pTempArray3=hb_itemArrayGet(pTableItem3,ulPos);
hb_ProcessTableItem(pTempArray,pTempArray1,pTempArray2,pTempArray3);
hb_itemRelease(pTempArray);
hb_itemRelease(pTempArray1);
hb_itemRelease(pTempArray2);
hb_itemRelease(pTempArray3);
}
}
bTItems=FALSE;
bFItems=FALSE;
fOldPos=0;
}
static void hb_ProcessTableItem(PHB_ITEM p1,PHB_ITEM p2,PHB_ITEM p3,PHB_ITEM p4)
static void hb_ProcessTableItem( PHB_ITEM p1, PHB_ITEM p2, PHB_ITEM p3, PHB_ITEM p4)
{
ULONG ulTempPos;
ULONG ulLen;
float fHeight;
float fI;
float iitem,iitem1,iitem2,iitem3;
ulLen=hb_arrayLen(p1);
for (ulTempPos=1;ulTempPos<=ulLen;ulTempPos++){
const char *szTemp=(char *) hb_arrayGetCPtr(p1,ulTempPos);
const char *szTemp1=(char *) hb_arrayGetCPtr(p2,ulTempPos);
float iitem, iitem1, iitem2,iitem3;
ulLen = hb_arrayLen( p1 );
for ( ulTempPos = 1 ; ulTempPos <= ulLen ; ulTempPos ++ )
{
const char *szTemp = ( char * ) hb_arrayGetCPtr( p1, ulTempPos );
const char *szTemp1 = ( char * ) hb_arrayGetCPtr( p2, ulTempPos );
if (!bTItems && !bFItems)
{
PDF_setfont( szPDFFile, sziFont, FONTSIZETABLE);
iitem = getText( szPDFFile, szTemp1, sziFont, 293, fRow, 261);
iitem1 = getText( szPDFFile, szTemp, sziFont, 27, fRow, 261);
if ( iitem < iitem1)
{
setText( szPDFFile, szTemp1, 293, fRow, iitem1, 261);
setText( szPDFFile, szTemp, 27, fRow, iitem1, 261);
fRow -= iitem1;
}
else
{
setText( szPDFFile, szTemp1, 293, fRow, iitem, 261);
setText( szPDFFile, szTemp, 27, fRow, iitem, 261);
fRow -= iitem;
}
if (!bTItems && !bFItems) {
PDF_setfont(szPDFFile, sziFont, FONTSIZETABLE);
iitem=getText(szPDFFile,szTemp1,sziFont,293,iRow,261);
iitem1=getText(szPDFFile,szTemp,sziFont,27,iRow,261);
if (iitem <iitem1) {
setText(szPDFFile ,szTemp1,293,iRow,iitem1,261);
setText(szPDFFile ,szTemp,27,iRow,iitem1,261);
iRow-=iitem1;
}
else {
setText(szPDFFile ,szTemp1,293,iRow,iitem,261);
setText(szPDFFile ,szTemp,27,iRow,iitem,261);
iRow-=iitem;
}
if (bTItems && !bFItems)
{
const char * szTemp2=( char * ) hb_arrayGetCPtr( p3, ulTempPos );
PDF_setfont( szPDFFile, sziFont, FONTSIZETABLE);
iitem = getText( szPDFFile, szTemp2, sziFont, 381, fRow, 173);
iitem1 = getText( szPDFFile, szTemp1, sziFont, 204, fRow, 172);
iitem2 = getText( szPDFFile, szTemp, sziFont, 27, fRow, 172);
if ( iitem > iitem1 && iitem > iitem2)
{
setText( szPDFFile, szTemp2, 381, fRow, iitem, 173);
setText( szPDFFile, szTemp1, 204, fRow, iitem, 172);
setText( szPDFFile, szTemp , 27, fRow, iitem, 172);
fRow -= iitem;
}
if ( iitem2 > iitem && iitem2 >iitem1)
{
setText( szPDFFile, szTemp2, 381, fRow, iitem2, 173);
setText( szPDFFile, szTemp1, 204, fRow, iitem2, 172);
setText( szPDFFile, szTemp, 27, fRow, iitem2, 172);
fRow -= iitem2;
}
if ( iitem1 > iitem && iitem1 > iitem2 )
{
setText( szPDFFile, szTemp2, 381, fRow, iitem1, 173);
setText( szPDFFile, szTemp1, 204, fRow, iitem1, 172);
setText( szPDFFile, szTemp, 27, fRow, iitem1, 172);
fRow -= iitem1;
}
}
if ( !bTItems && bFItems )
{
const char * szTemp2 = ( char * ) hb_arrayGetCPtr( p3, ulTempPos );
const char * szTemp3 = ( char * ) hb_arrayGetCPtr( p4, ulTempPos );
PDF_setfont( szPDFFile, sziFont, FONTSIZETABLE);
iitem1 = getText( szPDFFile, szTemp3, sziFont, 426, fRow, 128 );
iitem2 = getText( szPDFFile, szTemp2, sziFont, 293, fRow, 128 );
iitem = getText( szPDFFile, szTemp1, sziFont, 160, fRow, 128 );
iitem3 = getText( szPDFFile, szTemp, sziFont, 27, fRow, 128 );
if (iitem > iitem1 && iitem > iitem2 && iitem > iitem3)
{
setText( szPDFFile, szTemp3, 426, fRow, iitem, 128);
setText( szPDFFile, szTemp2, 293, fRow, iitem, 128);
setText( szPDFFile, szTemp1, 160, fRow, iitem, 128);
setText( szPDFFile, szTemp, 27, fRow, iitem, 128);
fRow -= iitem;
}
else
{
if (iitem2 > iitem && iitem2 > iitem1 && iitem2 > iitem3)
{
setText( szPDFFile, szTemp3, 426, fRow, iitem2, 128);
setText( szPDFFile, szTemp2, 293, fRow, iitem2, 128);
setText( szPDFFile, szTemp1, 160, fRow, iitem2, 128);
setText( szPDFFile, szTemp, 27, fRow, iitem2, 128);
fRow -= iitem2;
}
else
{
if ( iitem1 > iitem && iitem1 > iitem2 && iitem1 > iitem3)
{
setText( szPDFFile, szTemp3, 426, fRow, iitem1, 128);
setText( szPDFFile, szTemp2, 293, fRow, iitem1, 128);
setText( szPDFFile, szTemp1, 160, fRow, iitem1, 128);
setText( szPDFFile, szTemp, 27, fRow, iitem1, 128);
fRow -= iitem1;
}
else
{
if ( iitem3 > iitem && iitem3 > iitem2 && iitem3 > iitem)
{
setText( szPDFFile, szTemp3, 426, fRow, iitem3, 128);
setText( szPDFFile, szTemp2, 293, fRow, iitem3, 128);
setText( szPDFFile, szTemp1, 160, fRow, iitem3, 128);
setText( szPDFFile, szTemp, 27, fRow, iitem3, 128);
fRow -= iitem3;
}
else
{
setText( szPDFFile, szTemp3, 426, fRow, iitem3, 128);
setText( szPDFFile, szTemp2, 293, fRow, iitem3, 128);
setText( szPDFFile, szTemp1, 160, fRow, iitem3, 128);
setText( szPDFFile, szTemp, 27, fRow, iitem3, 128);
fRow -= iitem3;
}
}
}
}
}
}
if (bTItems && !bFItems) {
const char * szTemp2=(char *) hb_arrayGetCPtr(p3,ulTempPos);
PDF_setfont(szPDFFile, sziFont, FONTSIZETABLE);
iitem=getText(szPDFFile,szTemp2,sziFont,381,iRow,173);
iitem1=getText(szPDFFile,szTemp1,sziFont,204,iRow,172);
iitem2=getText(szPDFFile,szTemp,sziFont,27,iRow,172);
if (iitem > iitem1 && iitem >iitem2) {
setText(szPDFFile ,szTemp2,381,iRow,iitem,173);
setText(szPDFFile ,szTemp1,204,iRow,iitem,172);
setText(szPDFFile ,szTemp,27,iRow,iitem,172);
iRow-=iitem;
}
if (iitem2> iitem && iitem2>iitem1){
setText(szPDFFile ,szTemp2,381,iRow,iitem2,173);
setText(szPDFFile ,szTemp1,204,iRow,iitem2,172);
setText(szPDFFile ,szTemp,27,iRow,iitem2,172);
iRow-=iitem2;
}
if (iitem1> iitem && iitem1>iitem2 ){
setText(szPDFFile ,szTemp2,381,iRow,iitem1,173);
setText(szPDFFile ,szTemp1,204,iRow,iitem1,172);
setText(szPDFFile ,szTemp,27,iRow,iitem1,172);
iRow-=iitem1;
}
}
if (!bTItems && bFItems) {
const char * szTemp2=(char *) hb_arrayGetCPtr(p3,ulTempPos);
const char * szTemp3=(char *) hb_arrayGetCPtr(p4,ulTempPos);
PDF_setfont(szPDFFile, sziFont, FONTSIZETABLE);
iitem1=getText(szPDFFile ,szTemp3,sziFont,426,iRow,128);
iitem2=getText(szPDFFile ,szTemp2,sziFont,293,iRow,128);
iitem=getText(szPDFFile ,szTemp1,sziFont,160,iRow,128);
iitem3=getText(szPDFFile ,szTemp,sziFont,27,iRow,128);
if (iitem > iitem1 && iitem >iitem2 && iitem>iitem3) {
setText(szPDFFile ,szTemp3,426,iRow,iitem,128);
setText(szPDFFile ,szTemp2,293,iRow,iitem,128);
setText(szPDFFile ,szTemp1,160,iRow,iitem,128);
setText(szPDFFile ,szTemp,27,iRow,iitem,128);
iRow-=iitem;
}
else {
if (iitem2> iitem && iitem2>iitem1 && iitem2>iitem3){
setText(szPDFFile ,szTemp3,426,iRow,iitem2,128);
setText(szPDFFile ,szTemp2,293,iRow,iitem2,128);
setText(szPDFFile ,szTemp1,160,iRow,iitem2,128);
setText(szPDFFile ,szTemp,27,iRow,iitem2,128);
iRow-=iitem2;
}
else {
if (iitem1> iitem && iitem1>iitem2 && iitem1>iitem3){
setText(szPDFFile ,szTemp3,426,iRow,iitem1,128);
setText(szPDFFile ,szTemp2,293,iRow,iitem1,128);
setText(szPDFFile ,szTemp1,160,iRow,iitem1,128);
setText(szPDFFile ,szTemp,27,iRow,iitem1,128);
iRow-=iitem1;
}
else {
if (iitem3> iitem && iitem3>iitem2 && iitem3>iitem){
setText(szPDFFile ,szTemp3,426,iRow,iitem3,128);
setText(szPDFFile ,szTemp2,293,iRow,iitem3,128);
setText(szPDFFile ,szTemp1,160,iRow,iitem3,128);
setText(szPDFFile ,szTemp,27,iRow,iitem3,128);
iRow-=iitem3;
}
else {
setText(szPDFFile ,szTemp3,426,iRow,iitem3,128);
setText(szPDFFile ,szTemp2,293,iRow,iitem3,128);
setText(szPDFFile ,szTemp1,160,iRow,iitem3,128);
setText(szPDFFile ,szTemp,27,iRow,iitem3,128);
iRow-=iitem3;
}
}
}
}
}
}
}
float getText(PDF *p,const char *szText,int iFont,float irow,float icol,float iw)
float getText( PDF *p, const char *szText, int iFont, float frow, float fcol, float iw )
{
float h;
float w;
int c;
h=FONTSIZETABLE*2;
PDF_setfont(p, iFont, 7.0);
c=PDF_show_boxed(p, szText, irow, icol, iw, h, "justify", "blind");
while (c>0){
h+= FONTSIZETABLE;
c=PDF_show_boxed(p, szText, irow, icol, iw, h, "justify", "blind");
}
return h;
float h;
int c;
h = FONTSIZETABLE * 2;
PDF_setfont( p, iFont, 7.0);
c = PDF_show_boxed( p, szText, frow, fcol, iw, h, "justify", "blind" );
while ( c > 0)
{
h += FONTSIZETABLE;
c = PDF_show_boxed(p, szText, frow, fcol, iw, h, "justify", "blind" );
}
return h;
}
void setText(PDF *p,const char *szText,float irow,float icol,float h,float iw)
void setText( PDF *p, const char *szText, float frow, float fcol, float h, float iw )
{
PDF_show_boxed(p, szText, irow, icol, iw, h, "justify", "");
PDF_rect(p,irow,icol,iw+5,h);
PDF_stroke(p);
PDF_show_boxed( p, szText, frow, fcol, iw, h, "justify", "" );
PDF_rect( p, frow, fcol, iw + 5, h );
PDF_stroke( p );
}

31
harbour/contrib/pdflib/pdfhbdoc.ch Normal file
View File

@@ -0,0 +1,31 @@
/* Defines */
#define FONTBOLD "Courier-Bold"
#define FONTNORMAL "Courier"
#define FONTSIZEBOLD 15.0
#define FONTSIZETABLE 8.5
#define LEADLINK ( (fontSizePoints * 1.3))
#define LEADTABLE ( (fontSizePoints * 1.2))
#define a0_width 2380.0
#define a0_height 3368.0
#define a1_width 1684.0
#define a1_height 2380.0
#define a2_width 1190.0
#define a2_height 1684.0
#define a3_width 842.0
#define a3_height 1190.0
#define a4_width 595.0
#define a4_height 842.0
#define a5_width 421.0
#define a5_height 595.0
#define a6_width 297.0
#define a6_height 421.0
#define b5_width 501.0
#define b5_height 709.0
#define letter_width 612.0
#define letter_height 792.0
#define legal_width 612.0
#define legal_height 1008.0
#define ledger_width 1224.0
#define ledger_height 792.0
#define p11x17_width 792.0
#define p11x17_height 1224.0

1310
harbour/contrib/pdflib/pdfhbdocs.prg Normal file
View File

File diff suppressed because it is too large Load Diff

82
harbour/contrib/pdflib/pdflib.h
View File

@@ -49,7 +49,7 @@
#ifdef WIN32
#define PDFLIB_CALL __cdecl
#define PDFLIB_CALL __cdecl
#ifdef PDFLIB_EXPORTS
#define PDFLIB_API __declspec(dllexport) /* prepare a DLL (PDFlib-internal use only) */
@@ -57,17 +57,17 @@
#elif defined(PDFLIB_DLL)
#define PDFLIB_API __declspec(dllimport) /* PDFlib clients - import PDFlib DLL fcts. */
#else /* !PDFLIB_DLL */
#define PDFLIB_API /* */ /* default: generate or use static library */
#else /* !PDFLIB_DLL */
#define PDFLIB_API /* */ /* default: generate or use static library */
#endif /* !PDFLIB_DLL */
#endif /* !PDFLIB_DLL */
#else /* !WIN32 */
#else /* !WIN32 */
#if (((defined __IBMC__) || (defined __IBMCPP__)) && (defined __DLL__))
#define PDFLIB_CALL _Export
#define PDFLIB_API
#endif /* IBM VisualAge C++ DLL */
#endif /* IBM VisualAge C++ DLL */
#ifndef PDFLIB_CALL
#define PDFLIB_CALL
@@ -76,7 +76,7 @@
#define PDFLIB_API
#endif
#endif /* !WIN32 */
#endif /* !WIN32 */
/* Make our declarations C++ compatible */
#ifdef __cplusplus
@@ -103,11 +103,11 @@ typedef struct PDF_s PDF;
*/
/* PDFlib version number, major part */
#define PDFLIB_MAJORVERSION 3
#define PDFLIB_MAJORVERSION 3
/* PDFlib version number, minor part (must use two decimal places if != 0) */
#define PDFLIB_MINORVERSION 02
#define PDFLIB_VERSIONSTRING "3.02"
#define PDFLIB_MINORVERSION 02
#define PDFLIB_VERSIONSTRING "3.02"
/*
* ActiveX uses the Class ID;
@@ -152,7 +152,7 @@ PDF_new2(errorproc errorhandler,
PDFLIB_API void * PDFLIB_CALL
PDF_get_opaque(PDF *p);
#endif /* !SWIG */
#endif /* !SWIG */
/* Create a new PDF object. */
PDFLIB_API PDF * PDFLIB_CALL
@@ -180,7 +180,7 @@ PDF_open_fp(PDF *p, FILE *fp);
/* Open a new PDF in memory, and install a callback for fetching the data */
PDFLIB_API void PDFLIB_CALL
PDF_open_mem(PDF *p, size_t (*writeproc)(PDF *p, void *data, size_t size));
#endif /* !defined(SWIG) */
#endif /* !defined(SWIG) */
/* Get the contents of the PDF output buffer. The result must be used
by the client before calling any other PDFlib function. Must not be
@@ -211,7 +211,7 @@ PDF_end_page(PDF *p);
#define PDF_NonfatalError 11
#define PDF_UnknownError 12
#endif /* !SWIG */
#endif /* !SWIG */
/* Set some PDFlib parameter with string type */
PDFLIB_API void PDFLIB_CALL
@@ -332,7 +332,7 @@ PDF_setpolydash(PDF *p, float *dasharray, int length);
#ifndef SWIG
/* Maximum length of dash arrays */
#define MAX_DASH_LENGTH 8
#define MAX_DASH_LENGTH 8
#endif
/* Set the flatness to a value between 0 and 100 inclusive. */
@@ -536,7 +536,7 @@ PDF_close_image(PDF *p, int image);
help with preparing the thumbnail, but simply places it in the output. */
PDFLIB_API void PDFLIB_CALL
PDF_add_thumbnail(PDF *p, int im);
#endif /* PDF_THUMBNAILS_SUPPORTED */
#endif /* PDF_THUMBNAILS_SUPPORTED */
/*
* ----------------------------------------------------------------------
@@ -648,34 +648,34 @@ Acrobat 4 maximum page size: 200" = 14400 pt = 508 cm
/* The page sizes are only available to the C and C++ bindings */
#ifndef SWIG
#define a0_width (float) 2380.0
#define a0_height (float) 3368.0
#define a1_width (float) 1684.0
#define a1_height (float) 2380.0
#define a2_width (float) 1190.0
#define a2_height (float) 1684.0
#define a3_width (float) 842.0
#define a3_height (float) 1190.0
#define a4_width (float) 595.0
#define a4_height (float) 842.0
#define a5_width (float) 421.0
#define a5_height (float) 595.0
#define a6_width (float) 297.0
#define a6_height (float) 421.0
#define b5_width (float) 501.0
#define b5_height (float) 709.0
#define letter_width (float) 612.0
#define letter_height (float) 792.0
#define legal_width (float) 612.0
#define legal_height (float) 1008.0
#define ledger_width (float) 1224.0
#define ledger_height (float) 792.0
#define p11x17_width (float) 792.0
#define p11x17_height (float) 1224.0
#define a0_width (float) 2380.0
#define a0_height (float) 3368.0
#define a1_width (float) 1684.0
#define a1_height (float) 2380.0
#define a2_width (float) 1190.0
#define a2_height (float) 1684.0
#define a3_width (float) 842.0
#define a3_height (float) 1190.0
#define a4_width (float) 595.0
#define a4_height (float) 842.0
#define a5_width (float) 421.0
#define a5_height (float) 595.0
#define a6_width (float) 297.0
#define a6_height (float) 421.0
#define b5_width (float) 501.0
#define b5_height (float) 709.0
#define letter_width (float) 612.0
#define letter_height (float) 792.0
#define legal_width (float) 612.0
#define legal_height (float) 1008.0
#define ledger_width (float) 1224.0
#define ledger_height (float) 792.0
#define p11x17_width (float) 792.0
#define p11x17_height (float) 1224.0
#endif
#ifdef __cplusplus
} /* extern "C" */
} // extern "C"
#endif
#endif /* PDFLIB_H */
#endif /* PDFLIB_H */

4
harbour/contrib/pgsql/common.mak
View File

@@ -11,8 +11,8 @@ LIB_PATH = $(LIB_DIR)\$(LIBNAME)$(LIBEXT)
#
LIB_OBJS = \
$(OBJ_DIR)\tpostgre.obj \
$(OBJ_DIR)\postgres.obj
$(OBJ_DIR)\tpostgre$(OBJEXT) \
$(OBJ_DIR)\postgres$(OBJEXT)
all: \
$(LIB_PATH) \

2
harbour/contrib/pgsql/make_b32.bat
View File

@@ -4,7 +4,7 @@ rem $Id$
rem
rem ---------------------------------------------------------------
rem IMPORTANT: You'll need MySQL sources and this envvar
rem IMPORTANT: You'll need PostreSQL sources and this envvar
rem to be set to successfully build this library:
rem set C_USR=-IC:\postgresql-8.2.5\src\include
rem ---------------------------------------------------------------

2
harbour/contrib/pgsql/make_vc.bat
View File

@@ -4,7 +4,7 @@ rem $Id$
rem
rem ---------------------------------------------------------------
rem IMPORTANT: You'll need MySQL sources and this envvar
rem IMPORTANT: You'll need PostreSQL sources and this envvar
rem to be set to successfully build this library:
rem set C_USR=-IC:\postgresql-8.2.5\src\include
rem ---------------------------------------------------------------

6
harbour/contrib/rdd_ads/common.mak
View File

@@ -11,9 +11,9 @@ LIB_PATH = $(LIB_DIR)\$(LIBNAME)$(LIBEXT)
#
LIB_OBJS = \
$(OBJ_DIR)\ads1.obj \
$(OBJ_DIR)\adsfunc.obj \
$(OBJ_DIR)\adsmgmnt.obj
$(OBJ_DIR)\ads1$(OBJEXT) \
$(OBJ_DIR)\adsfunc$(OBJEXT) \
$(OBJ_DIR)\adsmgmnt$(OBJEXT)
all: \
$(LIB_PATH) \

16
harbour/contrib/samples/common.mak
View File

@@ -11,14 +11,14 @@ LIB_PATH = $(LIB_DIR)\$(LIBNAME)$(LIBEXT)
#
LIB_OBJS = \
$(OBJ_DIR)\environ.obj \
$(OBJ_DIR)\date.obj \
$(OBJ_DIR)\dbf.obj \
$(OBJ_DIR)\gauge.obj \
$(OBJ_DIR)\num.obj \
$(OBJ_DIR)\stack.obj \
$(OBJ_DIR)\status.obj \
$(OBJ_DIR)\time.obj
$(OBJ_DIR)\environ$(OBJEXT) \
$(OBJ_DIR)\date$(OBJEXT) \
$(OBJ_DIR)\dbf$(OBJEXT) \
$(OBJ_DIR)\gauge$(OBJEXT) \
$(OBJ_DIR)\num$(OBJEXT) \
$(OBJ_DIR)\stack$(OBJEXT) \
$(OBJ_DIR)\status$(OBJEXT) \
$(OBJ_DIR)\time$(OBJEXT)
all: \
$(LIB_PATH) \

34
harbour/contrib/tip/common.mak
View File

@@ -11,24 +11,24 @@ LIB_PATH = $(LIB_DIR)\$(LIBNAME)$(LIBEXT)
#
LIB_OBJS = \
$(OBJ_DIR)\base64x.obj \
$(OBJ_DIR)\encmthd.obj \
$(OBJ_DIR)\utils.obj \
$(OBJ_DIR)\base64x$(OBJEXT) \
$(OBJ_DIR)\encmthd$(OBJEXT) \
$(OBJ_DIR)\utils$(OBJEXT) \
\
$(OBJ_DIR)\cgi.obj \
$(OBJ_DIR)\client.obj \
$(OBJ_DIR)\credent.obj \
$(OBJ_DIR)\encb64.obj \
$(OBJ_DIR)\encoder.obj \
$(OBJ_DIR)\encqp.obj \
$(OBJ_DIR)\encurl.obj \
$(OBJ_DIR)\ftpcln.obj \
$(OBJ_DIR)\httpcln.obj \
$(OBJ_DIR)\mail.obj \
$(OBJ_DIR)\popcln.obj \
$(OBJ_DIR)\smtpcln.obj \
$(OBJ_DIR)\thtml.obj \
$(OBJ_DIR)\url.obj \
$(OBJ_DIR)\cgi$(OBJEXT) \
$(OBJ_DIR)\client$(OBJEXT) \
$(OBJ_DIR)\credent$(OBJEXT) \
$(OBJ_DIR)\encb64$(OBJEXT) \
$(OBJ_DIR)\encoder$(OBJEXT) \
$(OBJ_DIR)\encqp$(OBJEXT) \
$(OBJ_DIR)\encurl$(OBJEXT) \
$(OBJ_DIR)\ftpcln$(OBJEXT) \
$(OBJ_DIR)\httpcln$(OBJEXT) \
$(OBJ_DIR)\mail$(OBJEXT) \
$(OBJ_DIR)\popcln$(OBJEXT) \
$(OBJ_DIR)\smtpcln$(OBJEXT) \
$(OBJ_DIR)\thtml$(OBJEXT) \
$(OBJ_DIR)\url$(OBJEXT) \
all: \
$(LIB_PATH) \

10
harbour/contrib/win32/common.mak
View File

@@ -11,12 +11,12 @@ LIB_PATH = $(LIB_DIR)\$(LIBNAME)$(LIBEXT)
#
LIB_OBJS = \
$(OBJ_DIR)\tprinter.obj \
$(OBJ_DIR)\w32_ole.obj \
$(OBJ_DIR)\w32_prn.obj \
$(OBJ_DIR)\tprinter$(OBJEXT) \
$(OBJ_DIR)\w32_ole$(OBJEXT) \
$(OBJ_DIR)\w32_prn$(OBJEXT) \
\
$(OBJ_DIR)\w32_tole.obj \
$(OBJ_DIR)\w32_tprn.obj \
$(OBJ_DIR)\w32_tole$(OBJEXT) \
$(OBJ_DIR)\w32_tprn$(OBJEXT) \
all: \
$(LIB_PATH) \