USB-IO関連

Delphiから例のdll使ってうまくできた

function uio_out(Port:integer;OutDat:integer;p3:integer):integer;stdcall; external 'vbausbio.dll';
function uio_inp(var InpDat:byte;Port:integer;p3:integer):integer;stdcall; external 'vbausbio.dll';
function uio_find:integer;stdcall; external 'vbausbio.dll';
function uio_free:integer;stdcall; external 'vbausbio.dll';
function uio_getdevs:integer;stdcall; external 'vbausbio.dll';
function uio_seldev(p1:integer):integer;stdcall; external 'vbausbio.dll';

定義部分をちょこっと変えたら動いた
よかった良かった！