Регистрация com-объекта через командную строку

[Riota]

Нужно зарегистрировать com объект через командную строку,сom объект выполнен в виде exe файла,если бы это был dll то через команду regsvr32 можно зарегистрировать компонент в системе,а как exe файл регистрируется в системе,через delphi (run-activex register не подходит),причем на delphi7 все работает,а на xe2 нет

[Stilet]

то через команду regsvr32

EXE так же четко будет регистрироваться, если он действительно СОМ сервер.

причем на delphi7 все работает,а на xe2 нет

Рассказывай как пробовал.

[Riota]

[QUOTE=Stilet;1076258]EXE так же четко будет регистрироваться, если он действительно СОМ сервер.

пробовала,новый созданный com как (automation object) не регистрируется через команду regsvr32,зарегился через команду хххх.regserver,проблема в том что он должен автоматически регистрироваться через командную строку вот код

procedure ServerRegister;
var
  stGUID: string;
begin
  try
    CoInitialize(nil);
    stGUID := GUIDToString(CLASS_SferaAppServer);
    with TRegistry.Create do
    try
      RootKey := HKEY_CLASSES_ROOT;
      if not OpenKey('\CLSID\' + stGUID, True) then
        exit;
      WriteString('AppID', stGUID);
      CloseKey;
      if not OpenKey('\AppID\' + stGUID, True) then
        exit;
      WriteString('', 'Sfera Application Server');
      WriteString('RunAs', 'Interactive User');
      CloseKey;
    finally
      Free;
    end;
    if CreateComponentCategory(ID_SFERACAT, 'OPC Daten Server V2.0') <> 0 then exit;
    if RegisterCLSIDInCategory(CLASS_SferaAppServer, ID_SFERACAT) <> 0 then exit;
    ToLog('Регистрация сервера выполнена');
    MessageBox(0, 'Регистрация сервера выполнена', 'Sfera Application Server', 0);
  except
    ErrorHandler(Exception(ExceptObject).Message, 'ServerRegister');
  end;
end;

вот почему он на xe2 не работает загадка,может из-за платформы win была 32 стала 64 рассмотрела как и куда записываются гуиды у com сервера http://blog.not-a-kernel-guy.com/2007/04/18/173 не помогло

[OCTAGRAM]

http://docwiki.embarcadero.com/RADSt...g_a_COM_Object

Out-of-Process Server

* To register an out-of-process (EXE) server, run the server with either:
o The /regserver command-line option
o The /RegServerPerUser command-line option

* To unregister an out-of-process (EXE) server, run the server with either:
o The /unregserver command-line option
o The /UnregServerPerUser command-line option

Если проект COM сервера создан штатным механизмом, при запуске командная строка проверяется на наличие этих параметров.

В Delphi 7 была автоматическая регистрация сервера при запуске без параметров. В Delphi 2007 её убрали.

[Stilet]

была 32 стала 64

Печалька... Про 64-ку ничего не скажу, не пробовал.

не регистрируется через команду regsvr32

Стоп! А что выдает? Какое сообщение?

[Riota]

Если проект COM сервера создан штатным механизмом, при запуске командная строка проверяется на наличие этих параметров.

В Delphi 7 была автоматическая регистрация сервера при запуске без параметров. В Delphi 2007 её убрали.[/QUOTE]
Я не поняла какие параметры,можно поподробней пожалуйста

[Riota]

ничего не выдает,просто команда выполняется но com не вызывается из другого приложения,либо когда я его зарегила через delphi(run-activeX server-register) и разрегила через командную строку все равно вызывается.

[OCTAGRAM]

Сообщение от Riota

Я не поняла какие параметры,можно поподробней пожалуйста

/regserver для регистрации и /unregserver для обратного эффекта

[Riota]

это я в курсе =),проблема в том что не срабатывает процедура регистрации из кода,через командную строку регистрирует и разрегистрирует com server,а вот через код нет,хотя этот код работает в delphi7

[Аватар]

win была 32 стала 64

Насчет XP64 не в курсе, а в WIN7 права админа нужны при регистрации