找到桌面子窗口句柄

找出桌面子窗口句柄
我想找出桌面所有子窗口（一级）的句柄。怎么找
我原先想，先找出一个，然后求出父窗口（桌面）句柄，再求父窗口的一个一个子窗口，直到句柄为0，但结果不对。
请教各位

[解决办法]

Delphi(Pascal) code

var  H: HWND;begin  Memo1.Clear;  H := 0;  repeat    H := FindWindowEx(GetDesktopWindow, H, nil, nil);    if H <> 0 then      if IsWindowVisible(H) then        Memo1.Lines.Add(IntToStr(H));  until H = 0;end;