Posts by Frans WInes • 47 points
3 posts
-
0
votes3
answers572
viewsA: Barcode Generation - FPDF
<% Sub fbarcode(valor_barras,xPos,p201) Dim f, f1, f2, i Dim texto Dim p11 p11=12 'Altura do codigo de barras Const fino = 0.3 Const largo = 0.6 Dim BarCodes(99) if isempty(BarCodes(0)) then…
-
3
votes3
answers572
viewsA: Barcode Generation - FPDF
In the standard 2 of 5 the number must be even. So the function puts another zero
-
0
votes3
answers572
viewsA: Barcode Generation - FPDF
Sub fbarcode(valor_barras,xPos,p201) Dim f, f1, f2, i Dim texto Dim p11 p11=12 'Altura do codigo de barras Const fino = 0.3 Const largo = 0.6 Dim BarCodes(99) if isempty(BarCodes(0)) then…