ArcGIS 10, Delphi and licensing

Question

Hello developer,

we have an standalone application, written in Delphi, which must get a ArcView or a ArcEditor-Licence, to write data in a Geodatabase over COM and ArcObjects.

A license for ArcView exist on the pc

With ArcGIS 9.3.1 we have had no problems to check the active license with

isProductCodeAvailable

and then we initialize the specific product.

But with ArcGIS 10 we always get "0" as return-value (which is not defined by any constant of esriLicenseStatus) for the function isProductCodeAvailable.

I think, we have to bind our Delphi-ComObjects to ArcGIS 10?
But how we can do so, because in our generated .pas Files from the COM-Dll's we find no function for this!

Pehaps there is a developer, who uses Delphi 6 or 7 and can give us a hint for the initial steps to get a licensed ArcObject Connection?

Thanks a lot for any hint,

Marcus

IlyaNenashev · Answer

One more hint for future searchers: 
If not use VersionManager like described in previous message in this thread, any call to CoCreateInstance or other COM initialization function for ArcGIS classes like MapControl or even LicenseControl will be fail with very ugly error CLASS_E_CLASSNOTAVAILABLE = $80040111 = -2147221231

Thanks a lot, gazuko, for You code snippet!

MarcusThorand · Answer

Hi Max,

your last hint was the key!
Now it work's perfect.

Only one little hint: I found the DLL "ArcGISVersion.dll" in "c:\Program Files\Common Files\ArcGIS\bin"

But thank's a lot for your help!

Marcus

MaxGazuko · Answer

Hi, Marcus!

You must import "ArcGISVersion 1.0 Type Library" (Project->Import Type Library) (ArcGIS\bin\ArcGISVersion.dll)

In imported "ArcGISVersionLib_TLB" you will find class "TVersionManager" and interface "IArcGISVersion".

LoadVersion is function of IArcGISVersion interface.

WBR, Max.