Forum: Object-Pascal / Delphi-Language
Delphi
by toms,
17. Sep 2008
oder ohne FindComponent (dieses ist nicht so performant):
procedure TForm1.Button1Click(Sender: TObject);
var
i, l : Integer;
begin
l := 0 ; // Bei Listbox Item 0 beginnen, also beim ersten Item
for i := 0 To ControlCount - 1 do // Durch alle Control der Form gehen
if Controls is TGroupBox then // Falls das Control eine TGroupBox, dann
begin
Forum: Object-Pascal / Delphi-Language
Delphi
by toms,
17. Sep 2008
Wie viele GroupBoxen hast du denn?
Forum: Object-Pascal / Delphi-Language
Delphi
by toms,
17. Sep 2008
Wäre eine Möglichkeit. Doch dann sollte sein Code funktionieren, außer das ist anders zu interpretieren:
Forum: Object-Pascal / Delphi-Language
Delphi
by toms,
17. Sep 2008
Punkt 2 ist weiterhin gültig
Forum: Object-Pascal / Delphi-Language
Delphi
by toms,
17. Sep 2008
Hallo
Der Fehler liegt hier:
Groupbox.Caption
1. Groupbox würde immer nur einer Groupbox die Caption zuweisen.
2. Eine Groupbox kann man nicht so ansprechen -> Eine Möglichkeit wäre mit FindComponent.