如何控制打印单据次数?

Question

例如:
一张采购单只能打印一次正本,以后要打这张单据就必须显示副本!
请问如何实现?

Answer 1

我用FastReport增加个Memo判断那个字段，如果是第一次则不显示。否则显示副本。

Answer 2

在数据表中增加一个字段，0表示未打印，1表示记忆打印过了！
在fisrtreport的code中写
procedure MasterData1OnBeforePrint(Sender: TfrxComponent);
begin
  if   <frxDBMaterial."你的字段外">>=0   then
  begin
    Memo2.Text:='正本';
   end
  else
  begin
    memo2.Text:='副本';
  end;
end;
begin
end.
如果用的是quickreport
入一lable,在打印前if dataset.fieldbyanem('你的标记').assinteger=0 then 
   quicklable.capion:='正本'
else 
 ...