what happende when zoom:=1.5

xnium

hi
all of here
i used TfrxBarCodeView in fastreport 4.7.3+delphi 7,
when i set barcode type to EAN13 ,and zoom :=1.5,what happend?
look this


it look's strange ...
this is my demo ,
demo
hope someone give me a help
thanks all

xnium

is it a bug?
plealse give me a help
thannks

gordk

3 things
first
have no idea what you are trying to show.
2 have you tried the latest build 4.7.88 to see if your problem has been resolved.
3. if it does not suggest you take out a support ticket.

xnium

thank you gordk!
1. i want to show EAN13 barcode on my report,
2.v4.7.88 have no change with barcode EAN13
3. unfortunately , i did not have a ticket for support ,
so , what i could do ?
just laughing at my cat...

gordk

go to the product page click on support on the support page click on Online support form

xnium

yes
i get it myself
edit source/frxBarcod.pas

procedure OutText;
......
case FTyp of
bcCodeEAN8: // 8 digits, 4+4
begin
TextOutR(3, 3, 30, Copy(FText, 1, 4));
TextOutR(35, 35, BarWidth - 4, Copy(FText, 5, 4));
end;
bcCodeEAN13: // 13 digits, 1+6+6 or 12 digits, 6+6
begin
//if FText[1] <> '0' then
TextOutR(-8, -8, -2, Copy(FText, 1, 1));
TextOutR(3, 3, 44, Copy(FText, 2, 6));
// TextOutR(49, 49, BarWidth - 4, Copy(FText, 8, 6));// before etid
TextOutR(49, 49, BarWidth - 5, Copy(FText, 8, 6));
end;
......


it works well ,
thank you gordk !