初学者请教怎样在FR里面实现条码打印？

[李志林HZ]

如题，有例子则最好，任务比较急。先谢谢各位了！

[DongXF]

1.在DataModal上放一个TfrBarCodeObject控件, 或Use一下FR_BarC
2.在frReport里面放个TBarCodeView控件,双击它,设定Type Of BarCode和Code,
运行时可以改变DataField为你的BarCode值

很简单吧

[DongXF]

用Memo属性更方便

frReport1.FindObject('Bar1').Memo.Text := '234567890-00';
frReport1.PrepareReport;
frReport1.ShowPreparedReport;

[李志林HZ]

请问MEMO这个方法里面的Bar1是TfrBarCodeObject控件吗？

[zwb666]

frReport1.FindObject('Bar1').Memo.Text := '234567890-00';
frReport1.PrepareReport;
frReport1.ShowPreparedReport;

[李志林HZ]

由于本人对DELPHI和FASTREPORT都是比较生疏，希望可以提供一个可以使用的简单例子，谢谢！如参与的人多，另开贴谢谢各位。---斑竹手下留情：）

[李志林HZ]

因为直接用FR的控件打印出来的条码不能被条码枪正确的识别，所以请各位给点意见。