Discussion :

[Rayek]

Version de delphi ?
Version de ton OS (windows) ?
Les MDAC sont ils à jour ? Le jet engine aussi ? (sinon faut les mettre à jour via le site de microsoft)

[RodEpsi]

Version de delphi ?
Version de ton OS (windows) ?
Les MDAC sont ils à jour ? Le jet engine aussi ? (sinon faut les mettre à jour via le site de microsoft)

WinXP Pro SP2
Delphi 7 Entreprise
Euh à mon avis tout est à jour mais je vais jeter un oeil

[RodEpsi]

Une petite question, comment savoir la version des MDAC et des Jet Engine installés sur mon système ?

[Rayek]

Pour le Jet engine c'est facile, il suffit d'ajouter une connexnio ODBC, et tu as le numéro de version à coté du drivers ACCESS (en general avec xp on est à jour)

Pour le MDac, fait une recherche dans la base de registre (Regedit puis faire une recherche sur MDAC) tu tomberas rapidement sur la version du MDAC. (J'ai aps trouvé d'autres méthodes sous XP pour savoir sa version.

[RodEpsi]

Alors je pense que je suis à jour car
pour le Microsoft Access Driver j'ai le 4.00.6304.00
pour le MDAC j'ai le 2.81

c'est bon ?

[Rayek]

Alors je pense que je suis à jour car
pour le Microsoft Access Driver j'ai le 4.00.6304.00
pour le MDAC j'ai le 2.81

c'est bon ?

Oui, enfin moi j'ai moins à jour que toi j'ai que MDAC 2.80

As tu changé des paramètres du AdoQuery autre que ceux que je t'ai demandé de modifier ?

[RodEpsi]

Non non j'ai rien touché, j'avais jamais modifié les paramètre d'un ADOQuery encore

[Rayek]

As tu mis à jour ton delphi 7 ? (si je me souviens bien ca corrige des bugs d'ado )

[RodEpsi]

Euh pas sûr que je puisse le faire si tu vois ce que je veux dire ...

[Rayek]

Tu sais y a turbo delphi qui est gratuit et qui permet d'utiliser les base de données directement (mais on ne peut plus installer de composants externe)

[abdouinf]

il faut ajouter un Repaint à la barre de progression

Code :

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

1
2
3
4
5
6
7
8
9
10
11
          ProgressBar1.Min:=0;
          ProgressBar1.Max:=limite //c'est une variable que j'ai défini
          ProgressBar1.Step := 1;
          ProgressBar1.Repaint;
          MaRequete.open;
          While not (MaRequete.Eof) do 
               Begin
                  MaRequete.next;
                  ProgressBar1.StepIt;  
                  Application.ProcessMessage; 
               end;