Программирование: RegisterTypeLibrary

Прототип

procedure RegisterTypeLibrary(const Is64Bit: Boolean; const Filename: String);

Описание

Регистрирует библиотеку типов с указанным именем файла Filename. Если для параметра Is64Bit указано значение True, то файл библиотеки будет зарегистрирован в 64-разрядном процессе. В случае неудачи будет вызвано исключение.

Пример

begin
  // Регистрация stdole2.tlb, находящейся в каталоге System.
  RegisterTypeLibrary(Is64BitInstallMode, ExpandConstant('{sys}\stdole2.tlb'));
end;

В примере выше, первым параметром мы указали функцию Is64BitInstallMode. Таким образом, если программа установки будет запущена в 64-разрядной системе, то функция зарегистрирует файл как 64-разрядную библиотеку типов в 64-разрядном каталоге System. В противном случае файл будет зарегистрирован как 32-разрядная библиотека типов в 32-разрядном каталоге System.