Читаю показания трм138 (пишу на Delphi) c использованием родной DLL - всё нормально:

for hh:=0 to 7 do
begin
res:=ReadIEEE32(16+hh,0,'rEAd',val,tm,-1);
if(res>=0) then array_temp[hh]:=val;
end;

Как только ставлю в поток (THread) res= -2
// попытка использовать неинициализированный ресурс (например неоткрытый порт) ERR_NO_RESOURCE: integer = -2;

Где копать?