OK, wo ist denn jetzt mein Denkfehler? Dami bekomme ich zu viele Einträge.
Delphi-Quellcode:
var MyHandle: THandle;
begin
MyHandle:=GetWindow(
Handle, GW_HWNDFIRST);
If MyHandle > 0
then
begin
postinLV(InttoStr(MyHandle),'
Taskleiste');
while MyHandle > 0
do
begin
MyHandle:= GetWindow(MyHandle, GW_HWNDNEXT);
If (IsWindowVisible(MyHandle))
or(IsIconic(MyHandle))
then postinLV(InttoStr(MyHandle),'
Taskleiste');
end;
end;