[D5] - Tester si une librairie (dll) est installée sur le PC
Bonjour,
Je cherche à tester si la librairie SQLDMO dont j'ai le GUID (LIBID_SQLDMO) est bien installée sur la machine sur laquelle j'exécute mon application, qui utilise cette librairie.
Code:
1
2
3
4
5
6
7
| function SQLDMO_est_installe:boolean;
Var ObjetCOM : IUnknown;
begin
Result:=Succeeded(CoCreateInstance(LIBID_SQLDMO, nil, CLSCTX_INPROC_SERVER or
CLSCTX_LOCAL_SERVER, IUnknown, ObjetCOM));
end; |
J'ai pris ce code dans la FAQ ici http://delphi.developpez.com/faq/?page=ole, mais je crois que ça ne correspond pas à mon besoin, c'est pour tester la présence d'un objet COM.
Merci pour vos réponses
David
