Показать сообщение отдельно
  #5  
Старый 04.10.2013, 10:07
Smallboy Smallboy вне форума
Прохожий
 
Регистрация: 16.07.2013
Сообщения: 18
Версия Delphi: Delphi XE4
Репутация: 10
По умолчанию

Цитата:
Сообщение от Bargest
[extrasence mode on]
DLLMain кривой.
[extrasence mode off]
Подсказка: нужно БОЛЬШЕ кода в постах.

код только по загрузке длл. На него и ругается.
Код:
  LoadErrorCodes;
  HandlePinPad := 0;
     HandlePinPad := LoadLibrary('xxx.dll');

  if HandlePinPad <> 0 then
  begin
    SetComParams := GetProcAddress(HandlePinPad, 'CAPS_SetComParams');
    Test := GetProcAddress(HandlePinPad, 'CAPS_Test');

    if (@SetComParams <> nil)
      and (@Test <> nil)
 
Ответить с цитированием