Einzelnen Beitrag anzeigen

Benutzerbild von markus5766h
markus5766h

Registriert seit: 5. Mär 2009
Ort: Hamburg
569 Beiträge
 
Delphi XE8 Professional
 
#1

TCheckBox.Checked per Schleife

  Alt 21. Apr 2011, 19:15
Delphi-Version: 7
Hallo,

kann mir jemand verraten, warum folgender Konstrukt nicht läuft ? :

Code:
procedure TfrmHost.FormShow(Sender: TObject);
var
  i : Integer;
begin
  for i := 1 to 26 do
   if frmDetect.HddHost[i] then cbHost[i].Checked := True;
   // HddHost[i] : array[1..26] of Boolean
   // cbHost[i] : array[1..26] of TCheckBox
es wird nur der erste zutreffende Wert in HddHost umgesetzt,
bei
Code:
for i := 26 downto 1 do
. . .
entsprechend nur der letzte

HddHost[i] enthält 8 Werte = True, 18 Werte = False

ich steh' irgendwie auf dem Schlauch


. . . Problem gelöst (siehe Post #8), weiß allerdings nicht wodurch . . .
Markus H.

Geändert von markus5766h (21. Apr 2011 um 21:39 Uhr) Grund: Problem gelöst
  Mit Zitat antworten Zitat