çalışan bir exenin başlığını nasıl bulurum?

[nitro]

mesela not defteri çalışıyor. tepesinde not defteri yazıyor.
not defteri minimize edilmiş de olabilir.
arka planda çalışan bir exe de olabilir.
bana başlığı lazım. nasıl bulabilirim?
saygılarımla

[lazio]

Kod: Tümünü seç

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);
    ShowMessage(StrPas(Title));
    StrDispose(Title);
  end;
end;

Kod: Tümünü seç

EnumWindows(@EnumWindowsProc, 0);

[heskin35]

Olay budur Eyvallah Lazio kardeş benimde işime yarar bu.

[nitro]

EnumWindows(@EnumWindowsProc, 0);
kullanımındaki
@EnumWindowsProc yerine ne yazacağız?