Как вызвать процедуру из чужого ЕХЕ файла

{codecitation class=»brush: pascal; gutter: false;» width=»600px»}

Автор: Шевелев Дмитрий

Проблема такая : на сервере стоит ЕХЕ-файл, написан на FoxPro. И как класс зарегистрирован в системном реестре. Есть описание его процедур ( название, параметры). Существует ли возможность на Delphi обратиться к процедурам и заставить их сработать.

Видимо речь идет о сервере OLE, написанном на FoxPro (первый раз про такое слышу). Если так, то используй его как обычный OLE-сервер:

Var

vMyServer : OLEVariant;

Begin

vMyServer := CreateOLEObject(«имя CLSID»);

vMyServer.Имя_метода(…);

…

vMyServer := Null;

End;

{/codecitation}