Discussion :

[JeanNoel53]

bonjour,
Suite à la discussion ouverte sur le connect qui échoue, j'ai regardé les condition d'ouverture du CoInitialize.
J'ai rebooté l'ordinateur; j'ai arrêté toutes les applications de fond y compris l'antivirus, et j'ai relancé mon application
Le premier CoInitialize retourne false, comme si l'application était déjà lancé, J'ai vériifé que il y avait aucun autre appel dans mon application en recherchant dans mon référentiel l'appel de cette méthode.
J'ai vérifié que il n'y avait pas d'effet de bord entre CoInitialize et IBPP qui gère la base de donné en utilisant le framework Borland SqlExpr.hpp et avant de modifier la BDD je n'avais pas ce problème.
Le seul effet de bord est entre CoInitialise et Connect
Si quelqu'un a déjà eu des difficultés avec CoInitialize, je suis preneur de tous conseil.
à+

[totoche76]

Hello,

D'après MSDN, si CoInitialize renvoie S_FALSE, c'est qu'elle a déjà été appelée dans le thread en cours. Si ce n'est pas dans ton code, c'est peut-être quelque part ailleurs dans la VCL....
En fait, ce n'est pas un problème (relis bien l'aide)... Tout ce que tu dois faire, c'est t'assurer que pour chaque CoInitialize présent dans ton code, tu as un CoUninitialize en correspondance. Et dans le bon ordre: d'abord CoInit, puis à la fin un CoUninit.

[ddrmax]

Pour le S_False, c'est simple, si tu utilise la VCL avec une TForm, le Coinitialise et appelée au lancement du programme qui appelle

Code :

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

Application->Initialize();

Pour cela tu va dans le cpp de ton projet (si ton application se nomme toto.exe, c'est donc dans toto.cpp que tu devras mettre Application->Initialize(); en commentaire.
Sinon, je te propose une méthode plus simple, que j'avais vu dans le forums de codegear du style:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
#define _WIN32_DCOM //dans le .h ou au debut du .cpp après vcl.h pour CoInitializeEx uniquement.
 
 
CoUninitialize();
//et
CoInitialize();
//ou
CoInitializeEx(0, COINIT_MULTITHREADED);
//ou
CoInitializeEx(0, COINIT_APARTMENTTHREADED);//Equivalent CoInitialize

Pour plus d'informations, utilise l'aide de borland ou la msdn pour CoInitializeEx, qui est pour moi plus intéresant que CoInitialize.
Sinon pour ton cas ce ne serait pas mieux d'utiliser CoInitializeSecurity?
car moi pour les problèmes (venant surtout de windows server 2003), j'utilise:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
hres =  CoInitializeSecurity(
        NULL,   // Peut être remplacé par un SECURITY_DESCRIPTOR mais faut être assez calé sur la question
        -1,      // COM negotiates service
        NULL,    // Authentication services
        NULL,    // Reserved
        RPC_C_AUTHN_LEVEL_DEFAULT,    // authentication
        RPC_C_IMP_LEVEL_IMPERSONATE,  // Impersonation
        NULL,             // Authentication info
        EOAC_NONE,        // Additional capabilities
        NULL              // Reserved
        );

[JeanNoel53]

Bonjour

D'abord merci à tous ceux qui m'ont répondu leurs réponses m'ont permis d'avancer.
D'abord une petite information sur la cause du problème
Il y a certainement un effet de bord entre le lien Ole de Word et le code d'IBPP qui gère la base de donnée. En effet en mettant l'initialise de word avant d'appeler IBPP::FactoryDatabase, le code marche et pas après le FactoryDatabase

ensuite le code conforme au premier conseil

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
 
    ErrorCode = CoInitialize(NULL);
    if( ErrorCode == INIT_NO_ERROR)
    {
       m_pWordApplication = new WORDVER::TWordApplication(NULL);
       m_pWordApplication->InitServerData();
       if( m_pWordApplication != NULL)
       {
          m_pWordApplication->Connect( );
          bIsConnected = true;
       }
       else
          bIsConnected = false;
    }
    else if( ErrorCode == S_FALSE)
    {  // False signifie déjà ouvert, on va faire comme si le lien était ouvert
       m_pWordApplication = new TWordApplication(NULL);
       m_pWordApplication->InitServerData();
       if( m_pWordApplication != NULL)
       {
          m_pWordApplication->Connect();
          ErrorCode = 0;
          bIsConnected = true;
       }
       else
          bIsConnected = false;
    }
    else if( ErrorCode == E_INVALIDARG)
       bIsConnected = false;
    else if( ErrorCode == E_UNEXPECTED)
       bIsConnected = false;
  }

Ces codes fonctionnant, en route pour de nouvelles aventures, c'est

J'ai bien noté vos dernières suggestions que je garde en tète pour de nouvelles aventures