fastreport 4 et delphi 2010

Salut mes amis , je suis entrain de préparer une application Delphi 2010 en utilisant fast report 4 , et je suis vraiment bloqué , comment transmettre mes montants chiffres en lettres , je savais qu'il fallait des procédures dans le fast report mais , j'ai rien trouvé , je vous demande de laide c'est urgent .

Bonjour,

première solution : Coté Delphi
Avoir une fonction delphi qui va transformer les montants, je ne vais pas fournir de code je crois qu'une recherche dans le forum peut suffire ( par exemple la solution de Charly910) , et utiliser un champ de type string calculé dans le dataset.

seconde solution : Coté état
mettre le code de cette même fonction que vous allez retrouver dans le forum dans votre état (au dessus du begin)

Code:

---

1 2 3 4 5 6 7 8 9 10

#language PascalScript   function NumberToLetter(Number : currency): String; begin .... Result := ... end;   begin end.

---

inconvénient, une autre état avec la même fonctionnalité vous êtes obligé de ré-écrire

troisième solution : un mix
Créer une unité contenant la fonction qui pourra donc être utilisable avec delphi comme fastreport avec quelques ajustements
une unité delphi qui contient la fonction et
dans fastreport

Code:

---

1 2 3 4 5 6 7

#language PascalScript   uses 'MyNumberToText.pas';   begin end

---

pour utiliser [NumberToLetter(<MyQry."Montant">)]

Je vous laisse peaufiner le tout

Merci sergio apres avoir répondu , la troisième est magnifique , mais je suis étonné , toujours j'avait ce genre d'erreur :
" begin expected "
--------------------------------------
uses 'unit1.pas';

begin
end.

Bonjour,

je ne comprend pas trop cette dernière remarque.
Du coup, qu'en est-il exactement, résolu ou non ? et surtout si c'est le cas il serait bon de faire profiter à tous de la solution complète : c'est une peu le principe du forum.
Même si par la suite cette discussion sera certainement déplacée vers le forum dédié