Discussion :

[softkey]

Bonjour, je recherche comment je pourrais optimiser le bout de code suivant. Pour vous mettre dans le contexte, j'ai une application qui, par le biais d'un SDK, donne accès à sa base de donnée. Je développe une applications tiers qui lit dans cette base de donnée et qui met les informations dans un DBGrid. Par contre, avec environ 10 000 records, cette opération prend environ 10 secondes ce qui est beaucoup trop long. Y'a-t-il moyen d'accélérer cette opération?

Merci beaucoup pour votre aide!

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
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
procedure TForm5.LoadProductList;
var
  //Déclaration de l'interface
  ProductData : Product;
  //Déclaration des variables
  Error        : Longint;
  Compteur     : Longint;
  i            : Longint;
  Acomba       : AcombaX;
begin
 
  Acomba := CoAcombaX.Create;
 
  //Initialisation de CustomerData
  ProductData := CoProduct.Create;
 
  //Déterminer le nombre total de fiches de client
  Error := Acomba.NumCards(ProductData, Compteur);
 
  ClientDataSet1.DisableControls;
 
  if Error = 0 then
  begin
    //Consulter les fiches une à une dans le fichier des clients
    for i := 1 to Compteur do
    begin
      Error := Acomba.GetCard(ProductData, i);
      if Error = 0 then
      begin
        //Affichage des clients actifs seulement
        if ProductData.PrActive <> 0 then
        begin
          ClientDataSet1.InsertRecord([ProductData.PrNumber, ProductData.PrDescription[1], ProductData.PrProductGroupNumber, ProductData.PrSortKey[1], ProductData.PrSortKey[2], '', '', '', ProductData.PrQtyOnHand, ProductData.PrQtyOrdered, ProductData.PrQtyPurchasing, ProductData.PrUnique]);
        end;
      end
      else
        ShowMessage('Erreur: ' + Acomba.GetErrorMessage(Error));
    end;
  end
  else
    ShowMessage('Erreur: ' + Acomba.GetErrorMessage(Error));
 
  ClientDataSet1.EnableControls;
  DBGrid1.DataSource.DataSet.First();
end;

[philnext]

Je ne suis pas sur d'avoir compris ton appli. mais je pense que ton
DBGrid1 a comme DataSet ton ClientDataSet1 non ?
Si c'est la cas tu peux essayer d'affecter ClientDataSet1 à ton DBGrid1 à la fin seulement de la boucle dans ton code.

[softkey]

Bonjour, tout dabord, merci pour la réponse!

En fait, j'ai un DBGrid1 qui a comme DataSource: DataSource1 et le datasource et lié à mon dataset (ClientDataSet1).

J'ai essayé en n'affectant le ClientDataSet1 seulement qu'après la boucle, mais sa semble aussi long. Est-ce que j'utilise les bon composants? Sont-il lié de la bonne manière?

Merci

[Rayek]

Vu que tu fais

Code :

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

1
2
 
if ProductData.PrActive <> 0 then

Cela veut dire que dans tes 10 000 enregistrements une partie ne sont pas à traiter.
Si tu veux gagner un peu de temps, il serait bon de filtrer cette entrée de manière à ne traiter que les cas qui t'interesse.
Ca fera des

Code :

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

1
2
 
Error := Acomba.GetCard(ProductData, i);

En moins pour le traitement.

[softkey]

Bonjour Rayek, merci pour la réponse. Je ne peut malheureusement pas filtrer cette requête car le SDK ne me le permet pas. Sur la liste des 10 000 produits, il y a peut-être 10 produits qui sont inactif, donc je ne croit pas que le problème vient de ceci. Je vais tout de même essayé d'auter cette vérification voir si la vitesse sera mieux. Je suis sur qu'il est possible que cette liste s'ouvre très rapidement (moins que 1 secondes, à compararer au 10 secondes que sa prend présentement) car j'ai vu des applications utilisant ce SDK le faire très rapidement.

Encore une fois, merci de m'aider!

[Aka Guymelef]

Bonjour,

pour moi le problème est que tu fais un aller-retour client/server pour chacune de tes lignes de produits, et pour 10000 produits c'est sûr que tu plombe tes temps de réponses de même que ton réseau par la même occasion. Je pense qu'il faudrait plutôt que tu t'orientes à rechercher dans ton SDK s'il ne permet pas de ramener une liste de produit directement plutôt que de devoir aller chercher élément par élément.