Подключение DLL в Делфи

[Denis_Gul]

Драйвер WinIo.dll содержыт функцию SetPortVal, хочу ее использовать:
Подключаю библиотеку в Делфи
type
TMyProc = function(wPortAddr:word;dwPortVal:i nteger; bSize:byte):boolean ;
var
Form1: TForm1;
Handle:THandle ;
Port:TMyProc;
...................

begin
Handle:=LoadLibrary('WinIo');
if Handle>=32 then { if <=32 - error ! }
begin
Port:=GetProcAddress(Handle,'SetPor tVal');
if Port<>nil then
Label1.Caption:=Port(188;34;2); {using imported procedure}
end;
FreeLibrary(Handle);
end;

Выдает ошибку:[Error] Unit1.pas(31): Cannot assign to a read-only property.
Подскажите пожалуста в чем проблема, очень надо!
Спасибо!

[Stilet]

Label1.Caption:=Port(188;34;2);

Во-первых перечисление параметров через запятые а не через точки-запятые, во-вторых попробуй подключи статически:

function SetPortVal(wPortAddr:word;dwPortVal:integer; bSize:byte):boolean external "WinIo";

[0nni]

Подозреваю, что функцию еще надо объявить как stdcall.

[Stilet]

0nni

Ну да ну да... Забыл написать, видать спать хотелось )))