Numérotation automatique du rapport

Question

Je cherche un code dans Delphi 7 qui aide à générer une numérotation automatique d'un rapport rapide lorsqu'un utilisateur imprime ou affiche le rapport. Mon idée principale est d'utiliser le code dans un rapport comme un reçu qui montre combien de reçus ont été utilisés ou imprimés. J'apprécierais sur toute information sur la façon d'écrire le code en utilisant un rapport rapide. QuickReports ne prend pas en charge la numérotation automatique comme vous le demandez.

Answer 1

(Il prend en charge la numérotation automatique des pages, mais pas le suivi du dernier numéro de quelque chose imprimé pour être utilisé la prochaine fois, comme un reçu ou un numéro de facture.)

Vous devrez garder une trace du dernier numéro utilisé quelque part, dans une base de données, fichier INI, ou tout ce qui convient le mieux à vos besoins. Lorsque vous imprimez un reçu, vous lisez la dernière valeur utilisée à partir de ce stockage, le mettez à jour, l'écrivez dans le stockage, puis affectez ce nouveau numéro à une étiquette sur votre reçu (vous pouvez utiliser l'événement QRLabel.OnPrint pour cela - il suffit d'utiliser Value := IntToStr(NewReceiptNumber);, où NewReceiptNumber est la variable contenant le numéro de reçu).