How can I find all programs names on the taskbar?

I don't want to find all process names.
Only names of showing application on taskbar.
How can I get?
simawbAsked:
Who is Participating?
 
bernaniConnect With a Mentor Commented:
Put a button and a memo on a form and test this:

function EnumWindowsProc (Wnd: HWND; LParam: LPARAM): BOOL; stdcall;
var
Title : PChar;
begin
  Result := True;
  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
    Title:=StrAlloc(255);
    GetWindowText(Wnd,Title,255);
    Form1.Memo1.lines.add(StrPas(Title));
    StrDispose(Title);
  end;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
  EnumWindows(@EnumWindowsProc,0);
end;
0
 
simawbAuthor Commented:
thank you so much bernani !
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.