Gibt es denn eine derartige Komponente o.ä., das ich in ein Delphi Programm einbauen kann? Was ich eigentlich brauche, sind nicht Info über beliebige Programme, sondern über mein Delphiprogramm, das gerade läuft. Es ist historisch gewachsen und sehr komplex und umfangreich. Und es enthält viele Formulare, die einander sehr ähneln. Wenn ich die Möglichkeit hätte, bei Klick auf die Form oder auf Controls deren Namen zu erfahren, würde mir das beim Auffinden der jeweiligen
Unit helfen.
In der TActionList einer immer vorhandenen Form (oder
Vcl.Forms.TApplication.OnShortCut) einen Shortcut anzulegen, der einfach den Einzeiler
ShowMessage(Application.ActiveForm.ClassName)
ausführt, wäre zu einfach? Außerdem kann man Application.ActiveForm.Components iterieren und bei allen TControls darunter mit
Vcl.Controls.TControl.BoundsRect.Contains(
Vcl.Controls.TControl.ScreenToClient(
Vcl.Controls.TMouse.CursorPos)) prüfen, es unter dem Mauszeiger ist.