oPainter:setBrush( Qt_SolidPattern )
oPainter:setPen( Qt_NoPen )
nX := 150
For i := 1 To 228 Step 2
nW := IIf( aBarcode[i], BARWIDE, BARNARROW )
oPainter:drawRect( QRectF( nX, 2780, nW, 130 ) )
nX += nW + IIf( aBarcode[i + 1], BARWIDE, BARNARROW )
Next