Вверх ↑
Администрация
Ответов: 15295
Рейтинг: 1519
#1: 2010-07-01 12:12:21 ЛС | профиль | цитата
библиотека должна выглядеть так

mlmaster.dpr

#pas
library mlmaster;
uses SysUtils, Classes;
{{$R *.res}

function libLogin(Login, Pass, Admin, AdminsPass:PChar):PChar;
begin
// ....
end;

exports
libLogin;

begin
end.

использование в hiasm
InlineCode

#pas
...
function libLogin(Login, Pass, Admin, AdminsPass:PChar):PChar; external 'mlmaster.dll';

procedure THiAsmClass.ActionResult(var Data:TData; index:word);
begin
data.data_type := data_str;
data.sdata := libLogin(...);
end;
...
карма: 26
1
Голосовали:milan_bomb