Przyklejenie do pulpitu(POD ikonami...)

Witam!

Czytałem już jak 'przykleić' formę do pulpitu. Tylko teraz jest mały problem: Jak zrobić, żeby forma była nawet pod ikonami?
A do przyklejenia uzywam:

Function Pulpit:THandle;
Begin
  Result:=FindWindow('Progman',Nil);
  Result:=FindWindowEx(Result,0,'SHELLDLL_DefView',Nil);
  Result:=FindWindowEx(Result,0,'SysListView32',Nil);
End;

Procedure TForm1.FormCreate;
Begin
  Windows.SetParent(Self.Handle,Pulpit);
End;