1. Запускаю программу поддержки вольтметра (поставляется производителем), подключаю в ней нужные режимы работы,
и сворачиваю её в трей.
2. Запускаю свою функцию поиска данных:
var
data:hwnd;
str:string;
asd:array[0..255]of char;
function TForm1.PoiskdataUSB:HWND;//поиск данных окна USB
var
i:integer;
b:byte;
begin
for i:=0 to 100000 do begin
GetWindowText(i,asd,255);
if (asd[1]='.') or (asd[2]='.') then begin
Timer1.Enabled:=true;
result:=i;break;
end;
end;
end;
// в таймере пишем GetWindowText(data,asd,255);
//str:=asd; - в str - текст от вольтметра (преобразуй и используй)
