X
xmailer
следующий код никогда не находит уже запущенный 1С, соответственно нельзя подключится к запущенному. Т.к. 1С = v77l - локальная версия, то запуск нового приводит к ошибке инициализации. Как быть?
Спасибо.
Код:
var
HR : HResult;
HUnknown : IUnknown;
begin
HR:=GetActiveObject(ProgIDToClassID('v77l.application'), nil, HUnknown);
if (HR = MK_E_UNAVAILABLE) then ShowMessage("Нужен новый запуск")
else ShowMessage("1С сервер запущен")
end;
Спасибо.