XBrowse - QRCodes - Unicode languages

[nageswaragunupudi]

Next version of FWH:

Code: Select all  Expand view  RUN

#include "fivewin.ch"

REQUEST FWZEBRA

function Main()

   FW_SetUnicode( .t. )

   XBROWSER "CUSTOMER.DBF" ;
      COLUMNS ;
      "TRIM( FIRST - CRLF() - LAST )", ;
      "TRIM( STREET - CRLF() - CITY - CRLF() - STATE - '-' - ZIP )", ;
      "TRIM( FIRST - CRLF() - LAST - CRLF() - STREET - CRLF() - CITY - CRLF() - STATE - '-' - ZIP )" ;
      SETUP ( ;
      oBrw:nRowHeight := 150, ;
      oBrw:cHeaders  := { "NAME", "ADDRESS", "CODE" }, ;
      oBrw:nWidths   := { 200, 300, 150 }, ;
      oBrw:aCols[ 3 ]:BarCodeType := "QR" )

return nil

function crlf(); return CRLF
 

[Silvio.Falconi]

Nice...
but only Qr ?

[nageswaragunupudi]

Nice...
but only Qr ?

Code: Select all  Expand view  RUN

oBrw:aCols[ 3 ]:BarCodeType := "QR"

Here the programmer can specify what barcode he wants.
The programmer is also expected to know what is the valid data for what barcodes and specify the data and barcode type accordingly.

[AntoninoP]

Pretty cool, but does it export in Excel? How? create an image in clipboard and paste?

[Silvio.Falconi]

Nages a question...
I wanted ask ...
the code can be different from record to another ?
sample :
oBrw:aCols[ 3 ]:BarCodeType:= articles->typebar_code or each column as I can see here : ( from a school application)



often an article ( product ) has two or three different bar codes