Forum: Win32/Win64 API (native code)
Delphi
by bitsetter,
21. Feb 2008
Weil du die Funktion EnumWinProc im private Abschnitt des Formulars deklariert hattest.
Forum: Win32/Win64 API (native code)
Delphi
by bitsetter,
20. Feb 2008
Genau, du brauchst echt nur noch den Code per Copy und Paste hinzufügen. :roll: function EnumWinProc(Wnd: THandle; Lbx: TListBox): Boolean; stdcall;
var
WinCaption : string;
Len: integer;
begin
Result := True;
Len := GetWindowTextLength(Wnd);
SetLength(WinCaption, Len);
GetWindowText(Wnd, PChar(WinCaption), Len + 1);
if Trim(WinCaption) <> '' then