Einzelnen Beitrag anzeigen

Benutzerbild von LoewenZahn
LoewenZahn

Registriert seit: 10. Okt 2013
22 Beiträge
 
Delphi 10.2 Tokyo Professional
 
#1

TCheckBox.OnClick extern aufrufen

  Alt 19. Feb 2014, 16:00
Hallo,

ich habe folgendes Problem:

IST:
Auf einer Form ist eine ganze Horde von Checkboxen angegliedert. Diese haben jeweils eigenes OnClick Event. Nun kann der Benutzer mit den Steuerelementen hantieren und dadurch verschiedene Elemente (Kopfbereich, Bilder, Tabellen, ... ) auf einem Report ein/-ausblenden.

SOLL:
Ich möchte beim OnShow der Form, alle OnClick Events der Checkboxen einmal ausführen. Dadurch sollen die Elemente des Reports, unabhängig der zuletzt gespeicherten Einstellungen, das anzeigen, was die Checkboxen beim Start anzeigen.

VERSUCHT:
Ich habe gedacht, ich könnte einfach wie bei einem Button, das Event via "Button1.click;" aufrufen, geht leider nicht.

Delphi-Quellcode:
  
//Starte das OnClick-Event aller Checkboxen die mit dem Namen cb_dm_ beginnen:
For i:=0 to self.ComponentCount-1 do
    if ( self.Components[i] is TCheckbox )
    and ( Pos('cb_dm_', self.Components[i].Name) = 1 ) then
    begin
      (self.Components[i] as TAdvofficeCheckbox).Click;
    end;
Jemand eine Idee / einen Tipp / Lösungsvorschläge?

Gruß
L.
Tim
  Mit Zitat antworten Zitat