Handle und Klassen - Um welche Klasse handelt es sich?

[MisterNiceGuy]

Hey Toms, genial Mit deinem Programm lässt sich das machen, was ich will! Gehe ich auf die Komponente (SysListView32) und klicke auf Control Text... steht da das, was ich haben will! *freu*
Kannst du mir sagen wie du den Text ausgiebst? Wäre klasse!!

Edit:
Das müsste doch hiermit gehen (Tut es aber nicht )

Code:

procedure TForm1.Button1Click(Sender: TObject);
var
  FoundWindow,F2: HWND;
  WindowText: array[0..255] of char;
begin
   F2 := FindWindow('wxWindowClassNR',nil);
  {Find a TButton child window}
  FoundWindow := FindWindowEx(F2, 0, 'SysListView32', nil);
  {Get its text}
  GetWindowText(FoundWindow, WindowText, 255);
  {Display it}
  label1.Caption := WindowText;
end;