Интеграция с Delphi при помощи COM-технологии

AutoMarshal Recar2

Интеграция с Delphi при помощи COM-технологии

Пример интеграции расположен в каталоге %ProgramData%\Mallenom\Automarshal.SDK\Samples\recar2.sample.delphi.

Данный пример работает только с Ядром распознавания разрядностью x86.

Для интеграции Ядра распознавания в ПО, создаваемое в среде разработки Delphi (XE4) необходимо выполнить следующие шаги:

  • Установить требуемые Пререквизиты.

  • Зарегистрировать компонент Ядра распознавания как описано в [91c5f10f-1ac8-457c-ac1d-c27ba5ba5296].

  • Создать новый проект или открыть уже существующий.

  • Из меню среды разработки отрыть диалоговое окно Component/Import component....

  • Выбрать в окне пункт Import a Type Library.

    delphi.com 01

    Нажать кнопку Next.

  • В списке зарегистрированных компонентов выбрать Recar2.Core.

    delphi.com 02

    Если такого компонента нет, то нажать кнопку Add. В окне Register OLE Control выбрать файл %ProgramFiles(x86)%\Recar2\binaries\recar2.com.tlb:

    delphi.com 03

    Нажать кнопку Next.

  • Установить галочку Generate Component Wrappers:

    delphi.com 04

    Нажать кнопку Next.

  • Выбрать пункт Create Unit:

    delphi.com 05

    Нажать кнопку Finish.

    После чего будет создан файл recar2_TLB.

  • Открыть файл recar2_TLB, и найти в нем описание процедуры NumberRecognized.

    delphi.com 06

    Скопировать значение dispid (выделено на рисунке).

  • Найти в файле recar2_TLB описание процедуры TVideoCoreCom.InvokeEvent. Раскомментировать тело процедуры и вставить вместо -1 значения скопированного dispid:

    delphi.com 07
  • Подключить модуль recar2_TLB в раздел uses того модуля, где будет использоваться ядро распознавания.

    Создать объект типа TVideoCoreCom. Использование описано в примере.