Получить данные с ListView чужого приложения

[BarsDG]

Доброе время суток уважаемые знатоки!
Требуется Ваша помощь в работе с чужим приложением. У меня есть программа "Roughness Analysis" - для замеров. Мне необходимо получить значения результатов замеров (те, что указаны на картинке).

Вот код нахождения Хендела конечного элемента "ListView20WndClass" (по классу):

procedure TForm1.Button1Click(Sender: TObject);
var
 ListView,H,h1,H2,H3: THandle;
 begin
h := findwindow(nil, 'Roughness Analysis');
if h <> 0 then
SetWindowPos(h, HWND_BOTTOM, 0, 0, 20, 20, swp_nosize);
 H2:=GetDlgItem(H, $00000001);
 H3:=GetDlgItem(H2, $00000042);
 ListView := FindWindowEx(H3, 0, 'ListView20WndClass', nil);

Edit1.Text:=IntToStr(H);
Edit2.Text:=IntToStr(H2);
Edit3.Text:=IntToStr(H3);
Edit4.Text:=IntToStr(ListView);
end;

Вопрос: Как выдернуть значения (выделенные красным цветом) например в Memo или ListBox

[Aliens_wolfs]

почитай похожая тема там есть примеры http://www.programmersforum.ru/showthread.php?t=161381

[BarsDG]

Спасибо ОГРОМНОЕ, это - то, что надо!!!