Control-Names/Captions/Texts/Hints aus Fremdprogramm auslese

[Mackhack]

Hallo,

ich muss ein Tool schreiben das mir aus einem fremden Programm die Namen, Caption/Text und Hints aus allen Controls ausliest. Ich habe mir gedacht ich hole mit FindWindow das Handle und pack alles in einen Record um es dann mit TStringList in eine File zu speichern.

So sieht mein record aus

Delphi-Quellcode:

type
  TOutTransRec = record
    FormClass: string;
    ObjClass: string;
    ObjectName: string;
    Caption: string;
    Hint: string;
  end;

Jedoch weis ich jetzt nicht wie ich mit einer Schleife an alles ran komme wie MainMenue, Buttons, Labels. Kann mir da bitte jemand n Denkanstoss geben oder so?

Vielen lieben Dank!