Использование dll

← →
Grover © (2007-02-06 10:21) [0]

День добрый!
Я в Delphi новичок.
У меня такой вопрос:
Есть несколько файлов в формате .dll - библиотки.
Есть исходник использования этих библиотек в Visual Basic 6.0 мне очень надо использовать эти-же библиотеки только в Deplhi !!! Как функции библиотек прописать в Delphi.

??????
Помогите !

← →
Сергей М. © (2007-02-06 10:22) [1]

> Как функции библиотек прописать в Delphi ?

Смотря как они прописаны в VB

← →
Grover © (2007-02-06 11:05) [2]

Declare Function ibask32 Lib "Gpib-32.dll" Alias "ibask" (ByVal ud&, ByVal opt&, sstr As Any) As Long
Declare Function ibbna32 Lib "Gpib-32.dll" Alias "ibbnaA" (ByVal ud&, sstr As Any) As Long
Declare Function ibcac32 Lib "Gpib-32.dll" Alias "ibcac" (ByVal ud&, ByVal v%) As Long
Declare Function ibclr32 Lib "Gpib-32.dll" Alias "ibclr" (ByVal ud&) As Long
Declare Function ibcmd32 Lib "Gpib-32.dll" Alias "ibcmd" (ByVal ud&, sstr As Any, ByVal cnt&) As Long

Вот несколько функций из многих.

← →
Сергей М. © (2007-02-06 11:17) [3]

function ibask32(ud, opt: ULong; var sstr): ULong; stdcall;
function ibbna32(ud: ULong; var sstr): ULong; stdcall;
function ibcac32(ud: ULong; v: UShort): ULong; stdcall;
function ibclr32(ud: ULong): ULong; stdcall;
function ibcmd32(ud: ULong; var sstr; cnt: ULong): ULong; stdcall;

> из многих.

Остальные портируй сам, по аналогии

← →
Grover © (2007-02-06 11:21) [4]

Спасибо!
А как система поймет из какой библиотеки функцию вызывать?
В VB видно (... Lib "Gpib-32.dll" ...), а в Delphi ?

← →
Сергей М. © (2007-02-06 11:24) [5]

см. стандартную справку Делфи по теме "External declarations", там все написано и примеры имеются

function ibcmd32(ud: ULong; var sstr; cnt: ULong): ULong; stdcall; external "Gpib-32.dll"

Спасибо огромное буду пробывать!

Использование dll Найти похожие ветки