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/)
-   -   Delphi Array durchlaufen und Werte rauslesen (https://www.delphipraxis.net/84235-array-durchlaufen-und-werte-rauslesen.html)

3_of_8 13. Jan 2007 19:31

Re: Array durchlaufen und Werte rauslesen
 
Ein Zeiger auf eine CheckBox oder ein Instanzenpointer einer CheckBox? Wenn ersteres, dann würde ich ihn explizit dereferenzieren, das hilft der Lesbarkeit.

Helmi 13. Jan 2007 19:42

Re: Array durchlaufen und Werte rauslesen
 
der komplette Code schaut so aus:
Delphi-Quellcode:
  Wert := 0;

  for i := 1 to 8 do
    begin
      //ALeds nach CheckBox-Zustände anzeigen
      S := 'CheckBox_Ausgang_%d';
      dummy_CheckBox := FindComponent(Format(S, [i])) as TCheckBox;

      S := 'ALed_Ausgang_%d';
      dummy_ALed     := FindComponent(Format(S, [i])) as TALed;

      dummy_ALed.Checked := dummy_CheckBox.Checked;

      //
      Wert := Wert + (Integer(dummy_CheckBox.Checked) * (1 shl Pred(i)));
    end;
aber denkt ihr nicht, dass wir allmählich ot werden?

3_of_8 13. Jan 2007 19:52

Re: Array durchlaufen und Werte rauslesen
 
Also ist es der Instanzenpointer einer Checkbox. Oder einfacher gesagt: Eine Checkbox.

EDIT: Achja übrigens, FindComponent/FindControl ist relativ schlechter Stil.


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