Discussion :

[lotfi.lahcene]

Bonjour l'équipe,

tjrs avec l'image dans une table (Base de données SQLIte) composant utilisé (UNIDAC)
Delphi Tokyo en mode FMX.

Objectif :
Lors de l'enregistrement d'un nouvel enregistrement dans la table ou même modification il y a parmi les champs un de Type BLOB qui va contenir des images,
j'aimerai avoir un ProgressBar qui se lance lorsque l’événement Onclick du button enregistrer est enclenché .
le ProgressBar affichera la progression du chargement de l'image dans la table...

code du button enregistrer OnClick :

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
 
 try
    with datamodule3 do begin
      if abn1.State in [dsInsert,dsedit] then begin
 
         abn1.Post;
 ( c'est ici ou l'operation doit se passer )
           if MostrarMsg('Confirmation','Mis à jour enregistré avec succès','OK','','')=1 then
            begin
             abn1.Refresh;
 
           end;
 
      end;
    end;
 except

J'attend vos suggestions....Merci

[tourlourou]

Bonjour,
Je ne pense pas qu'il y ait d'événement lié à la progression d'un enregistrement. SQLite gère le déclenchement de ProgressHandlers ; la notion d'intervalle de x bytecodes internes le permet pê cependant, si c'est permis par tes composants d'accès aux données.

[SergioMaster]

Bonjour,

Je ne pense pas qu'il y ait d'événement lié à la progression d'un enregistrement

ce n'est pas tant le temps d'enregistrement que le temps de chargement de l'image dans le blob que lotfi.lahcene semble vouloir "tracer"

le ProgressBar affichera la progression du chargement de l'image dans la table

Déjà je ne suis pas un grand fan de charger des images dans une bdd (en cause, surtout les sauvegardes) , j'y préfère le chemin vers une image, mais puisqu'il s'agit de SQLite je pourrais faire une exception (j'ai lu, je ne sais plus où, que SQLite était plus rapide par rapport au gestionnaire de fichier Microsoft pour accéder à des images)

La question cachée (non indiqué dans le code) est plutôt comment charger un fichier dans un blob ? La réponse en est : en passant par des Streams (memoryStream pour lire le fichier image, blobstream pour enregistrer dans SQLite). Du coup la piste se trouve dans les manipulations de stream un petit coup de avec les mots clés 'Delphi+ProgressBar+Stream' fournira des solutions
par exemple celle-ci