delphi 7用codesoft
每次delphi 用codesoft 列印, 列印出上一次的列印,必印的候,才能列印出正的,求助~ codesoft delphi
[解决办法]
调用codesoft不是把数据传过去再打印吗？
BarDoc:=BarApp.ActiveDocument;
BarVars:=BarDoc.Variables;
BarDoc.Open(GetCurrentDir+'\TCL.Lab');
BarDoc.Variables.Item('L1').Value:= edt_bin.Text;
BarDoc.Variables.Item('T1').Value:='/'+edt_part.Text+'/'+B1;
//BarDoc.Variables.Item('T2').Value:='/'+edt_part.Text+'/'+B2;
//BarDoc.Variables.Item('T3').Value:='/'+edt_part.Text+'/'+B3;
// BarDoc.Variables.Item('T4').Value:='/'+edt_part.Text+'/'+B4;
BarDoc.Variables.Item('C1').Value:=edt_code.Text+b1;
// BarDoc.Variables.Item('C2').Value:=edt_code.Text+b2;
// BarDoc.Variables.Item('C3').Value:=edt_code.Text+b3;
// BarDoc.Variables.Item('C4').Value:=edt_code.Text+b4;
Bardoc.Printlabel(1);
BarDoc.FormFeed;