Bonjour,
J'écris un programme dans le fichier .DPR de mon projet et j'ai une procédure qui doit créer un composant dynamique "TADOConnection" :

uses
ADODB, DB;
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
 
var
  Connection : TAdoConnection;
begin
  Connection := TADOConnection.Create(nil);
  Connection.ConnectionString := ConnStrProvider + ConnStrData + PathApp + ConnStrInfo;
  Connection.Open;
....
  Connection.Free;
Lorsque j'arrive sur le "Connection := TADOConnection.Create(nil);
", Delphi me génère une erreur d'exception "Exception EOleSysError dans le module Test.exe dans 0006242D.
CoInitialize n'a pas été appelé."

Il est a noter que si je fais ça dans une UNIT standard de Delphi, cela fonctionne parfaitement...

Alors, qu'est-ce qui ne va pas ?

Merci de votre aide