Переписать программу с С++ на Delphi 7 (импорт библиотек)

[at0104]

Имеется программа
Требуется сделать аналог на Delphi. С COM не работал. Помогите или подскажите хотя бы где искать, как это сделать?


#import "libid:E79FD100-5A05-4772-9E42-EAE8FC7BC4FE" // импортируем либу
плагина
#import "libid:7AA02C95-0B4A-43aa-92D8-BA40511A7F3F"
rename("RemoveDirectory", "GrymRemoveDirectory") // импортируем либу
дубльгиса

int main()
{
CoInitializeEx(NULL, COINIT_MULTITHREADED);// выполняем
инициализацию com
GuidePathLib::IPluginImpl* pGuidePlugin = NULL; // указатель
где будет храниться наш плагин

GrymCore::IGrymPtr pIGrym;
pIGrym.CreateInstance(__uuidof (GrymCore::Grym)); // создаем
экземпляр дубль гиса
GrymCore::IBaseViewThreadPtr pIBaseViewThread =
pIGrym->GetBaseView(pIGrym->BaseCollection->FindBase(OLESTR("Иркутск")),
TRUE, FALSE);// Это мы выбираем город

GrymCore::IGrymPluginPtr pPlugin =
pIBaseViewThread->GetPluginManager()->GetPlugin(L"2GISPlugins.GuidePathS erver");//
получаем наш плагин
HRESULT hr =
pPlugin->QueryInterface(__uuidof(GuidePathL ib::IPluginImpl),
(void**)&pGuidePlugin);// запрашиваем наш интерфейс
_bstr_t str = pGuidePlugin->getNearObject(52.276894,
104.305395); // вызываем метод


return 0;
}

[at0104]

Вопрос решен.