TFrBarcodeType
Hi,
I want to change properties of a TFrBarCode object by native code delphi. In particualr, I want to change the type of this BarCode.
I have a combo with all type of barcode, and I want change this type before print report (event TFrReport.BeforePrint
).
The problem is:
- How can I use the properties TFrBarCodeView.Param.cBarType?
- Which unit I must uses for use the TFrBarcodeType Typed?
I read the help of Fast Report 2.51, but I don't have find nothing
Thanks, an sorry for my poor English
I want to change properties of a TFrBarCode object by native code delphi. In particualr, I want to change the type of this BarCode.
I have a combo with all type of barcode, and I want change this type before print report (event TFrReport.BeforePrint
).The problem is:
- How can I use the properties TFrBarCodeView.Param.cBarType?
- Which unit I must uses for use the TFrBarcodeType Typed?
I read the help of Fast Report 2.51, but I don't have find nothing
Thanks, an sorry for my poor English
Comments
procedure TForm1.Button5Click(Sender: TObject);
var
B:tfrview;
bcv: tfrBarCodeView;
begin
frreport4.Clear;
frreport4.LoadFromFile(wpath+'bctest.frf');
b:= frReport4.FindObject('Bar1');
b.Prop:= '[Table1."Species No"]';
// above way to access most props
// below way to access params of barcode
//*** add frbarcod to uses unit of interface section
// if you take a look at the unit you will find all
// available barcode types and the types of the other params
bcv := TfrBarcodeView(frReport4.FindObject('Bar1'));
if bcv <> nil then
begin
bcv.Param.cBarType := bcCode128A;
bcv.Param.cRatio:= 2.0; // zoom
end;
frreport4.ShowReport;
end;
regards