Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Info über Programm / Controls (https://www.delphipraxis.net/211651-info-ueber-programm-controls.html)

himitsu 21. Okt 2022 09:59

AW: Info über Programm / Controls
 
Bei TestComplete kann man mal schauen.

normal gehen die auch über WindowsHandles, aber auch über Debuginfos und eventuell RTTI.
z.B. um bei DevExpressGrids an den Inhalt zu kommen, da es für Windows nur eine große Leinwand ist, wo die Columns/Rows/Zellen draufgemalt werden (abgesehn vom InEdit-Feld, welches als echtes Control über seine Zelle gelegt wird)

Redeemer 22. Okt 2022 21:43

AW: Info über Programm / Controls
 
Zitat:

Zitat von knochen (Beitrag 1513579)
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 Delphi-Referenz durchsuchenVcl.Forms.TApplication.OnShortCut) einen Shortcut anzulegen, der einfach den Einzeiler
Delphi-Quellcode:
ShowMessage(Application.ActiveForm.ClassName)
ausführt, wäre zu einfach? Außerdem kann man Application.ActiveForm.Components iterieren und bei allen TControls darunter mit Delphi-Referenz durchsuchenVcl.Controls.TControl.BoundsRect.Contains(Delphi-Referenz durchsuchenVcl.Controls.TControl.ScreenToClient(Delphi-Referenz durchsuchenVcl.Controls.TMouse.CursorPos)) prüfen, es unter dem Mauszeiger ist.

knochen 25. Okt 2022 07:18

AW: Info über Programm / Controls
 
Danke euch, die Lösung mit Screen.ActiveForm funktioniert am besten für meine Zwecke. Mann, da hätte ich auch selbst drauf kommen können.:cyclops:


Alle Zeitangaben in WEZ +1. Es ist jetzt 21:21 Uhr.
Seite 2 von 2     12   

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz