Forum: Win32/Win64 API (native code)
Delphi
by robert23,
16. Aug 2006
Ich habe mir jetzt noch folgend alle Top-Level Fenster angesehen:
EnumWindows(@EnumWindowsProc,Integer(ListBox1));
...
function EnumWindowsProc(wHandle: HWND; lb: TListBox): Bool; stdcall; export;
var
Title, ClassName: array of char;
begin
Forum: Win32/Win64 API (native code)
Delphi
by robert23,
16. Aug 2006
Also, ich habe das jetzt mal folgend getestet
childHandle := getWindow(myHandle, GW_CHILD);
GetClassName(childHandle, buf, Sizeof(buf)-1);
SendMessage(childHandle, WM_GETTEXT, 256, Integer(@Caption));
ListBox2.Items.Add(Format('ID: %d, ClassName: %s, Caption: %s',
));
Wenn kein Fenster geöffnet ist bekomme ich folgendes ausgegeben