Bonjour,
Au sein de ma base de données, j'utilise une table dans laquelle je stocke des paramètres pour l'affichage de mes données (police, couleur de fond...).
j'ai besoin d'un accès fréquent et surtout rapide.
J'ai fait des essais, en utilisant un TADQuery, mais j'ai des problèmes de rapidité.
Mon code est du style
A la place du Refresh, j'ai essayé différents méthodes (ReSync, FetchAll...). Mais sans grand résultat.
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 procedure TParametre.Initialization; begin ... with FADquery do begin Connection := maConnection; SQL.Add('SELECT param1, param2...FROM table_parametre WHERE param_id = :param_id'); ParamByName('param_id').DataType := ftInteger; Open; end; ... end; procedure TParametre.GetParametre(ParamId: integer); begin with FADQuery do begin ParamByName('param_id').AsInteger := ParamId; Refresh; end; end;
Est-ce que vous avez une idée, pour avoir des temps de réponses correctes.
Merci
Partager