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.