谁有Barcode 控件 for Qreport 3?(100分)

如题.

忘了email : weisian@yahoo.com
谢谢

Barcode 控件 我昨天剛做
適用任何版本Qreport
在程序員大本營2000 的光盤上找到的 Barcode1
void __fastcall TFPrint:rintBeforePrint(TCustomQuickRep *Sender,
bool &PrintReport)
{
QRImage1->Canvas->Brush->Color=clWhite;
QRImage1->Canvas->TextOut(40,Barcode1->Height+1,Barcode1->Text);
// Barcode1->DrawTextA(QRImage1->Canvas);
Barcode1->Top=0;
Barcode1->Left=0;
Barcode1->Angle=0;
Barcode1->Typ= bcCode39;
Barcode1->DrawBarcode(QRImage1->Canvas);
}

富翁称号 上次来访
weisian 2001-3-28
还是结束了罢！