Com
От: BestRomantic  
Дата: 15.12.03 23:46
Оценка:
Мужики Помагите. Задача:
Дано
Com сервер, (exe-шник), GUID. у него есть процедура которая позволяет менять Caption на сервере на строку которая должна передоваться в качестве параметра.
Надо
Создать клиента который могбы вызвать эту процедуру.При отсутствующем TBL файле (IDL).
Мне удалось только коннектится к серваку, (при этом сервак запускается), и получить указатель на IUnknown

procedure TClientForm.ConnectButtonClick(Sender: TObject);
var
g: TGUID;
inter: IUnknown;
begin
g:=StringToGUID('{567EA485-F975-43D0-9FE8-56CCD0E88ED7}');
inter := CreateComObject(g);
end;
[email][/email]
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.