New samples/invoice.prg for next FWH build !

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

New samples/invoice.prg for next FWH build !
Posted: Fri Jun 03, 2011 06:41 PM

regards, saludos

Antonio Linares
www.fivetechsoft.com

TimStone

Posts: 3022

Joined: Fri Oct 07, 2005 01:45 PM

Re: New samples/invoice.prg for next FWH build !
Posted: Fri Jun 03, 2011 06:45 PM

That is interesting.

I am assuming that you are demonstrating functions we can use to create the invoices.

The samples are always helpful.

Tim Stone
http://www.MasterLinkSoftware.com
http://www.autoshopwriter.com
timstone@masterlinksoftware.com
Using: FWH 23.10 with Harbour 3.2.0 / Microsoft Visual Studio Community 2022-24 32/64 bit

ukservice

Posts: 417

Joined: Tue Feb 23, 2010 03:09 PM

Re: New samples/invoice.prg for next FWH build !
Posted: Fri Jun 03, 2011 07:08 PM

Thank you.

Does it include a visual designer or just prints the invoice?.

FWH 11.11, Harbour 3.1 and Borland C++ 5.82

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: New samples/invoice.prg for next FWH build !
Posted: Sat Jun 04, 2011 07:49 AM

Just prints it :-)

regards, saludos

Antonio Linares
www.fivetechsoft.com

kajot

Posts: 357

Joined: Thu Nov 02, 2006 06:53 PM

Re: New samples/invoice.prg for next FWH build !
Posted: Sat Jun 04, 2011 09:04 PM

when I compiling \samples\invoices.prg , got error

Type: C >>>xlink.exe -NOEXPOBJ -MAP -FORCE:MULTIPLE -NOIMPLIB -subsystem:windows -UNMANGLE -LIBPATH:"S:\lib" -LIBPATH:"R:\lib" -LIBPATH:"R:\c_lib" -LIBPATH:"R:\c_lib\win" "invoices.obj" "s:\xhb2.obj" "xhb3.obj" "s:\obj\texplbar.obj" "FiveHCM.lib" "FiveHMX.lib" "OptG.lib" "xhb.lib" "dbf.lib" "nsx.lib" "ntx.lib" "cdx.lib" "rmdbfcdx.lib" "ct3comm.lib" crt.lib kernel32.lib user32.lib winspool.lib ole32.lib oleaut32.lib odbc32.lib odbccp32.lib uuid.lib wsock32.lib ws2_32.lib wininet.lib advapi32.lib shlwapi.lib msimg32.lib mpr.lib OleDlg.lib version.lib comctl32.lib comdlg32.lib gdi32.lib shell32.lib winmm.lib lz32.lib Netapi32.lib -out:"invoices.exe"<<<

Creating object: invoices.EXP
Creating library: invoices.LIB
xLINK: error: Unresolved external symbol '_HB_FUN_DRAWTRANSPARENT referenced from (texplbar.obj)'.
xLINK: fatal error: 1 unresolved external(s).

Type: C >>>Couldn't build: invoices.exe<<<
Type: C >>>TMAKEPROJECT<<<
Type: C >>>TMAKEPROJECT:REFRESH<<<
Type: N >>> 1423<<<

best regards

kajot

Antonio Linares

Posts: 44158

Joined: Thu Oct 06, 2005 05:47 PM

Re: New samples/invoice.prg for next FWH build !
Posted: Sun Jun 05, 2011 04:01 AM

Kajot,

Code (fw): Select all Collapse

// (c) FiveTech Software 2010, all rights reserved

// Similar functions to DrawBitmap( hDC, hBmp, nRow, nCol )
// but using certain painting effects
#define TRANSPARENT         0x1   //1
//----------------------------------------------------------------------------//

function DrawTransparent( hDC, hBmp, nRow, nCol )

   local hDCMem 
   local hBmpOld 
   local nZeroZeroClr

   hDCMem = CreateCompatibleDC( hDC )      
      
   // we can not get nZeroZeroClr from hDC is possible hDC are locked by other SelectObject
   // An application cannot select a bitmap into more than one device context at a time.   
   hBmpOld      = SelectObject( hDCMem, hBmp )
   nZeroZeroClr = GetPixel( hDCMem, 0, 0 )

   SelectObject( hDCMem, hBmpOld )
   DeleteDC( hDCMem )

   TransBmp( hBmp, nBmpWidth( hBmp ), nBmpHeight( hBmp ),;
             nZeroZeroClr, hDC, nCol, nRow, nBmpWidth( hBmp ), nBmpHeight( hBmp ) )

return nil

//----------------------------------------------------------------------------//

regards, saludos

Antonio Linares
www.fivetechsoft.com

FiveTech Support Forums

Continue the discussion