delphi - レポートの自動採番

Question

ユーザーがレポートを印刷または表示するときにクイックレポートの自動番号付けを生成するのに役立つ Delphi 7 のコードを探しています。私の主なアイデアは、使用または印刷された領収書の数を示す領収書としてレポート内のコードを使用することです。クイックレポートを使用してコードを記述する方法に関する情報をいただければ幸いです。

Answer 1

あなたが求めているように、QuickReportsは自動番号付けをサポートしていません。(自動ページ番号付けをサポートしていますが、領収書や請求書番号など、次回使用するために印刷されたものの最後の番号などは追跡しません。)

自分のどこか、データベース、INI ファイル、またはニーズに最も適したもので、最後に使用された番号を追跡する必要があります。

レシートを印刷するときは、そのストレージから最後に使用された値を読み取り、それを更新してストレージに書き戻し、その新しい番号をレシートのラベルに割り当てます (QRLabel.OnPrintそのためにイベントを使用できますValue := IntToStr(NewReceiptNumber);。ここNewReceiptNumberで、 は領収書番号を保持する変数です)。