AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

Info über Programm / Controls

Ein Thema von knochen · begonnen am 18. Okt 2022 · letzter Beitrag vom 25. Okt 2022
Antwort Antwort
Seite 2 von 2     12   
Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
43.136 Beiträge
 
Delphi 12 Athens
 
#11

AW: Info über Programm / Controls

  Alt 21. Okt 2022, 09:59
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)
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat
Redeemer

Registriert seit: 19. Jan 2009
Ort: Kirchlinteln (LK Verden)
1.017 Beiträge
 
Delphi 2009 Professional
 
#12

AW: Info über Programm / Controls

  Alt 22. Okt 2022, 21:43
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 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.
Janni
2005 PE, 2009 PA, XE2 PA
  Mit Zitat antworten Zitat
knochen

Registriert seit: 26. Aug 2009
81 Beiträge
 
Delphi 2006 Professional
 
#13

AW: Info über Programm / Controls

  Alt 25. Okt 2022, 07:18
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.
A fool with a tool remains a fool.
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 2 von 2     12   


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 10:57 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz