Alle Fenster in der Taskleiste finden

[SirThornberry]

GetWindow ist eine aus der Unit Windows

Delphi-Quellcode:

var
  lHwnd : Cardinal;
  lClassname: Array[0..255] of Char;
begin
  lHwnd := FindWindow(nil, nil);
  while (lHwnd <> 0) do
  begin
    if IsWindowVisible(lHwnd) and (GetWindow(lHwnd, GW_OWNER) = 0) then
    begin
      GetWindowText(lHwnd, @lClassName, 255);
      ListBox1.Items.Add(lClassName);
    end;
    lHwnd := GetWindow(lHwnd, GW_HWNDNEXT);
  end;
end;

die Taskleiste muss hier noch gefiltert werden und Popupfenster müssen auch noch raus gefiltert werden. Dann klappts aber.