TO NAGES: XBROWSE and BArcode

[Silvio.Falconi]

How I can show a graphics barcode into xbrowse ?

[nageswaragunupudi]

You first generate a bitmap of barcode, using your favorite library, and then paint the bitmap in xbrowse like any other bitmap.

[Silvio.Falconi]

to show a barcode of the product into xbrowse I must create an image foreach
product and insert it ?
Gulp!...
perhaps you not understood ...
please see it

[nageswaragunupudi]

Mr Silvio

perhaps you not understood ...

You are right. I did not understand.
Now I understood.

In my next post I shall provide solution for this. We also realize we need to make this much easier for our users and we shall do that in the next version.

Meanwhile please tell me how did you do this in the screen shot you posted.

[nageswaragunupudi]

Please try this:

Code: Select all  Expand view

oColBarCode:bPaintText := { |oCol,hDC,cData,aRect| PaintBarCode( oCol, hDC, cData, aRect ) }
oColBarCode:lBmpTransparent := .f.

.......
........

function PaintBarCode( oCol, hDC, cData, aRect )

   local hBmp  := YourBarCodeFunction( ... )

   oCol:oBrw:SayPalBmp( hBmp, aRect, oCol:lBmpTransparent )

   DeleteObject( hBmp )

return nil
 

[Silvio.Falconi]

it is not mine
it is an application I see on Internet (www.monami3000.it)

I wish realize this

[Silvio.Falconi]

I understood bu I not Know How make it
I have

ARCODE 4 C
ARDESC 30 C
ARCATEG 30 C
ARSUCAT 30 C
ARUM 2 C
ARBARCODE 16 C