Einzelnen Beitrag anzeigen

bernhard_LA

Registriert seit: 8. Jun 2009
Ort: Bayern
1.123 Beiträge
 
Delphi 11 Alexandria
 
#12

AW: VCL TCheckListBox -> FMX ?????

  Alt 24. Nov 2018, 10:42
sieht schon mal gut aus , der Class Helper Ansatz kompiliert und ich kann die Komponente Installieren.


In der VCL Variante gab eine funktion um auf einen Tastendruck zu reagieren


Delphi-Quellcode:
procedure TCheckListBoxEXT.KeyPress( var Key : Char );
  var
    Shift : TShiftState;
    Matchpattern : String;
  begin
    if Key = ^A
    then
      begin
        checkall;
        Key := #0;
      end;

    if Key = ^U
    then
      begin
        uncheckall;
        Key := #0;
      end;
     ....

Wie lautet hier die entsprechende FMX Variante ?
  Mit Zitat antworten Zitat