Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi ControlCount (https://www.delphipraxis.net/184298-controlcount.html)

Sugar 16. Mär 2015 10:39

Delphi-Version: 5

ControlCount
 
Hallo Forum,

ich bin kurz vorm verzweifeln. Ich möchte alle Controls vom Typ TButton auf einer GroupBox mit Beschriftungen aus einer Tabelle versehen. Ich verwende folgenden Code um die GroupBox zu "durchlaufen", allerdings wird der TRY-Block auch durchlaufen wenn gar kein TButton betroffen ist.

GroupBox1.ControlCount gibt korrekterweise die richtige Anzahl Buttons auf der Box wieder (es sind nur TButton darauf),

for I := 0 to GroupBox1.ControlCount -1 do
begin
if GroupBox1.Controls[I] is TButton then
begin
try
btn := TButton(Controls[I]);
K := btn.Name;

mkinzler 16. Mär 2015 10:44

AW: ControlCount
 
Delphi-Quellcode:
btn := TButton(GroupBox1.Controls[I]);
Wenn es nur Buttons gibt, für welchen anderen gilt das dann?


Alle Zeitangaben in WEZ +1. Es ist jetzt 19:59 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