Inhalte aus EnumWindow vergleichen!

[jAcK oRsEn]

Hi,

ich benutze folgenden Code um alle aktiven Programme zu listen...

Delphi-Quellcode:

function EnumWindowsProc (Wnd: HWND; LParam: LPARAM): BOOL; stdcall;
var Bezeichnung  : Array[0..200] of Char;
begin
  if (IsWindowVisible(Wnd) or IsIconic(wnd)) and
     ((GetWindowLong(Wnd, GWL_HWNDPARENT) = 0) or
     (GetWindowLong(Wnd, GWL_HWNDPARENT) = GetDesktopWindow)) and
     (GetWindowLong(Wnd, GWL_EXSTYLE) and WS_EX_TOOLWINDOW = 0) then begin
      GetWindowText(Wnd, Bezeichnung, 256);
    Form1.listbox1.Items.Add(Bezeichnung);
  end;
end;


procedure TForm1.Timer1Timer(Sender: TObject);
begin
EnumWindows(@EnumWindowsProc, 1);
end;

Wie kann ich nun schauen ob die Einträge die hinzugefügt werden schon in der liste sind...
So das nur die Programme hinzugefügt werden die noch nicht gelistet sind.

[Vjay]

Delphi-Quellcode:

  GetWindowText(Wnd, Bezeichnung, 256); 
  if Form1.ListBox1.Items.IndexOf( Bezeichnung) = -1 then
   Form1.listbox1.Items.Add(Bezeichnung);