Auslesen eines treeviews

[toms]

Delphi-Quellcode:

var 
  wnd: HWND; 
begin 
  wnd := FindWindow('#32770','283-185-098'); 
  wnd := FindWindowEx(wnd, 0, 'SysTreeView32', nil); 
  if wnd <> 0 then 
  begin 
     GrabTreeView(TreeView1, wnd); // Funktion von Link (oben)
  end; 
end.