Einzelnen Beitrag anzeigen

Benutzerbild von 3_of_8
3_of_8

Registriert seit: 22. Mär 2005
Ort: Dingolfing
4.129 Beiträge
 
Turbo Delphi für Win32
 
#24

Re: Anstatt ID den Namen verwenden?

  Alt 12. Jul 2006, 22:59
Delphi-Quellcode:
function EnumProc(StHandle: HWND; lines: TStrings): boolean; stdcall;
const
  MAXLENGTH: Integer = 200;
var
  buffer, desc: array[0..MAXLENGTH] of char;
begin
  GetClassname(StHandle, buffer, MAXLENGTH);
  GetWindowText(StHandle, desc, MAXLENGTH);
  lines.add(format('ID: %d, Class: %s, Text: %s', [GetDlgCtrlID(StHandle), buffer, desc]));
  EnumChildWindows(StHandle, @EnumProc, Integer(Lines));
  Result := true;
end;
Manuel Eberl
„The trouble with having an open mind, of course, is that people will insist on coming along and trying to put things in it.“
- Terry Pratchett
  Mit Zitat antworten Zitat