embarcadero delphi 12 и компас sdk v20. 21.

[alex-219 0]

Собственно subj. Последний раз писал в delphi 8 и компас 5. чего-то там. Никаких особых проблем не было. Делаешь по хелпу и все. 

Тут же даже не могу просто подключить библиотеку. Пробовал и просто dll делать, и rtw только с libraryentry и со всеми тремя описанными. Пробовал просто dll. Пробовал копировать step 1 из samples.  Пробовал делать телодвижения  из Компиляция библиотек.doc и создание библиотек из sdk.chm, Результат 0. в Компасе и через конфигуратор и через добавить приложение ничего не добавляется.  Впал в ступор...

ЗЫ. сама libraryentry из rtw из внешней программы выполняется.

[sabahs 22]

Нет там никаких проблем, под какую разрядность компилировали?

[alex-219 0]

32

[alex-219 0]

library FirstDllProject;

uses

  vcl.dialogs,
  System.SysUtils,
  System.Classes;

Function LibraryName:PAnsiChar; Pascal;
  Begin
    result:='test';
  End;

function LIBRARYID: Cardinal; pascal;
begin
  Result := 100;
end;

procedure LIBRARYENTRY(command: WORD); Pascal;
  begin
            showmessage('test')
  end;

Exports
  LibraryName name 'LIBRARYNAME',    LibraryId name 'LIBRARYID',
  LibraryEntry name 'LIBRARYENTRY';

{$R *.res}

{$E *.rtw}

begin
end.

 

Ну вот например. Тут даже ничего компасовского нет. Компилирую. Копирую в lib. Добавляю. ничего не происходит. Как dll без LibraryEntry подключать.

[sabahs 22]

Вы серьёзно?

LibraryName, LibraryId и LibraryEntry - это чьи функции?

Компилируете и в конфигураторе добавляете.

Да и не хватает модуля LibTool.

[sabahs 22]

Нормально всё подключается и работает.

STEP1.zip

[alex-219 0]

Разобрался. При Target Platforms Windows 32-bit скомпилированная библиотека к компасу не подключается. При Windows 64-bit все нормально. Дельфи по умолчанию делает 32, Если добавить 64 и скомпилировать все ОК.

 

Thnx. 

[sabahs 22]

Всё правильно, если Компас-3D 64-разрядный, новые версии уже 32-разрядными и не делают.