Добрый день,dmitry_kz.
В С++ не очень силен да и нету под рукой его, чтобы дать дельный совет.
В Delphi всё делается так:
1. утилитой tlibimp.exe создаёшь TLB-файл из msmddo80.dll. Там будут классы обертки для вызовов COM-вских классов.
2. в свой проект кидаешь ссылку на TLB.
3. содаешь объекты и пишешь свою консоль Analysis Manager :-))
з.ы. TLB-файл не всегда получается идеальным, очень часто приходится дописывать/править его, чтобы получить требуемую реализацию.
подробности смотри на MS,
здесь или лучше
здесь
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
'Пример на VB:
Private Sub ListBases()
Dim dsoServer As New DSO.Server
Dim dsoDB As DSO.MDStore
dsoServer.Connect "LocalHost"
For Each dsoDB In dsoServer.MDStores
Debug.Print "DATABASE: " & dsoDB.Name & " - " & _
dsoDB.Description
Next
End Sub
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
//а вот на Delphi(разницы особой вроде нет):
procedure ListBases;
var
dsoServer: TServer;
dsoDB: TMDStore;
i: integer;
begin
ComboBox1.Items.Clear;
dsoServer := TServer.Create(Self);
dsoDB := TMDStore.Create(self);
dsoServer.Connect1('LocalHost');
for i := 1 to dsoServer.MDStores.Count do begin
dsoDB.ConnectTo(IDispatch(dsoServer.MDStores.Item(i)) as _MDStore);
ComboBox1.Items.Add(dsoDB.Description);
end;
dsoServer.Free;
dsoDB.Free;
end;
В С++ всё примерно тоже самое.
