Listando todas as janelas (ou controles) filhas a partir do handle de uma janela pai

BOOL EnumChildWindows(          
  HWND hWndParent,
  WNDENUMPROC lpEnumFunc,

// Função de Callback usada para listar todas as janelas
// filhas a partir do handle de uma janela pai
function EnumChildProc(wnd: HWND; Memo: TMemo): BOOL; stdcall;
var
  buf, caption: array[0..255] of char;
  id_control: Integer;
begin
  // vamos obter o nome da classe da janela filha
  GetClassName(wnd, buf, SizeOf(buf) - 1);

  // vamos obter o título da janela filha
  SendMessage(wnd, WM_GETTEXT, 256, Integer(@Caption));

  // vamos obter o ID da janela (ou controle) filha
  id_control := GetDlgCtrlID(wnd);

  // vamos adicionar as informações ao TMemo
  Memo.Lines.Add('ID: ' + IntToStr(id_control) + ' - ' +
    ' Classe: ' + buf + ' - Caption: ' + caption);