Получение всех компонентов чужого окна

[Winexcel]

Написал программу которая получает один любой дочерний компонент, и выводит его класс в listbox:

var
	ParentWnd, ChildWnd: HWND;
	Buff:array[0..255] of Char;
begin
	ParentWnd:=FindWindow(nil,'FormToCall');
	Edit1.Text:= IntToStr(ParentWnd);
	ChildWnd:= GetWindow(ParentWnd, gw_child);
	edit2.Text:= IntToStr(ChildWnd);
	GetClassName(ChildWnd,Buff,SizeOf(Buff));
	ListBox1.Items.Add(StrPas(buff));
end;

В моем случае форма у которой вывожу все компоненты выглядит так:


Получаю в листбоксе следующее:
TEdit

А как ещё получить TButton?
Ну в моём случае..

[Stilet]

Рекомендую: http://yandex.ua/yandsearch?text=enu...m.ru&rnd=59686