Discussion :

[dzconception]

Bonjour,

Je suis sur un projet de calcul de paye. Les rubriques de paye sont soit un taux, soit une valeur fixe, un calcul ...

Je veux que l'utilisateur de l'application lui-même entre la formule de calcul.

Exemple :

indemnitex = 25% du salaire de base

Il y a quelques idées svp ?

Salutations

[der§en]

C'est quoi la question ?

[free07]

Bonjour,

Si j'ai bien compris son message, il y a eu des réponses sur cette problématique voir ci-dessous:

https://www.developpez.net/forums/d5...xique-formule/

[SergioMaster]

Bonjour
La version de Delphi a aussi son importance, pour des expressions simples, avec les versions de Delphi proposant les LiveBindings on peut utiliser ceci

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
 
unit Parser;
 
interface
 uses
  System.Rtti,
  System.Bindings.EvalProtocol,
  System.Bindings.Evaluator,
  System.Bindings.EvalSys,
  System.SysUtils;
 
 function CalcExpr(Expression : String) : Double; cdecl; export;
 
implementation
 
function CalcExpr(Expression : String) : Double;
Var
  LScope : IScope;
  LCompiledExpr : ICompiledBinding;
  LResult : TValue;
begin
  LScope:= BasicOperators;
  LCompiledExpr:= Compile(Expression, LScope);
  LResult:=LCompiledExpr.Evaluate(LScope, nil, nil).GetValue;
  if not LResult.IsEmpty then Result:=LResult.AsExtended
                         else Result:=1;
end;
end.

reste donc avant à faire les remplacements nécessaires dans la formule saisie
par exemple:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
 formule:='SALAIREBASE * 25%';
 Formule:=StringReplace(Formule,'%','/100',[rfReplaceAll]);
 Formule:=StringReplace(Formule,'SALAIREBASE','1200.00',[rfReplaceAll, rfIgnoreCase]);
 indemnitex := CalcExpr(Formule);

ATTENTION à l'ordre de priorité des opérateurs dans les formules quand même !

[dzconception]

merci et si j'ai des calcules complexe avec des tests ?

[Charly910]

Bonjour,
je suppose que tous les paramètres variables de formules ne sont à changer que rarement (une fois par an ?). Sont ils variables pour chaque personne, ou communs à tous ? s'ils sont variables pour chaque personne, alors, faut les stocker en BD.

Si les paramètres variables des formules sont communs à tous, et si les formules ont toujours la même structure, pourquoi ne pas rentrer les paramètres variables dans une Fiche, les sauver dans un fichier ini ou dans la base de registre et faire tous les calculs et tests dans le programme après extraction des données de la BD, avant d'afficher ou d'imprimer la fiche de paye ?

A+
Charly