Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Checkbox in TGrid reagiert nicht (https://www.delphipraxis.net/199384-checkbox-tgrid-reagiert-nicht.html)

paul.kunig 19. Jan 2019 17:01

Checkbox in TGrid reagiert nicht
 
Hallo zusammen,

ich beschäftige mich mit dem TGrid in Delphi 10 Seattle.

Ich habe folgende drei Spalten angelegt:
1.CheckColumn(TcheckColumn)
2.ImageColumn(TImageColumn)
3.StringColumn(TStringColumn)

Wenn ich nun die Anwendung starte, werden mir auch drei Spalten angezeigt.

Die Checkboxen in der ersten Spalte lassen sich allerdings nicht aktivieren bzw. der Status lässt sich nicht ändern.

Wer kann weiterhelfen.

Gruß
Paul

hoika 20. Jan 2019 07:44

AW: Checkbox in TGrid reagiert nicht
 
Hallo,
gibt es vielleicht ein Event OnCanEdit ?

paul.kunig 25. Jan 2019 13:47

AW: Checkbox in TGrid reagiert nicht
 
Hallo hoika,

danke für deine Antwort.
Das Grid kann nicht direkt editiert werden, da es lediglich als Anzeigekomponente verwendet werden kann. Die Änderungen müssen also im Hintergrund erfolgen und dann auf die Komponente übertragen oder eingetragen werden.

Gruß
Paul

hoika 25. Jan 2019 14:01

AW: Checkbox in TGrid reagiert nicht
 
Hallo,
dann zeig mal etwas Code (DFM und PAS).

Minimal-Bsp.:
https://stackoverflow.com/questions/...ey-application

Harry Stahl 25. Jan 2019 15:01

AW: Checkbox in TGrid reagiert nicht
 
Ergänze es wie folgt:

Delphi-Quellcode:
procedure TForm1.Grid1CellClick(const Column: TColumn; const Row: Integer);
begin
  if Column is TCheckColumn then begin
    Grid1.BeginUpdate;
    Grid1.EndUpdate;
  end;
end;

paul.kunig 2. Feb 2019 16:40

AW: Checkbox in TGrid reagiert nicht
 
Hallo hoika,

was meinst du genau?

@ Herr Stahl:
Ein Ereignis "Grid1CellClick" gibt es bei der Grid-Komponente unter Delphi 10 Seattle anscheinend noch nicht.


Gruß
Paul

Harry Stahl 3. Feb 2019 12:13

AW: Checkbox in TGrid reagiert nicht
 
Liste der Anhänge anzeigen (Anzahl: 2)
Ja, sorry, stimmt, in Delphi Seattle gab es das Event noch nicht.

Davon abgesehen, scheint das TGrid in der Seattle-Version mit diversen Problemen behaftet zu sein. Z.B., dass ein Klick zu keinem Event führt (egal ob click, mousedown), wenn direkt zuvor schon mal ein Klick auf die gleiche Zelle gemacht wurde. Das ist natürlich gerade für eine Checkbox, wo Werte von Klick zu Klick umgeschaltet werden müssen, ziemlich problematisch...

Außer einen direkten Eingriff in den Source des TGrids, sehe hier derzeit als WorkAround nur den Weg, in die TCheckColum ein TLayout einzufügen (alClient, Hittest auf true), dann das Mousedownevent beim Klick auf das TLayOut an das Grid weiterzuleiten und dort dann den Wert für den Checkstatus zu ändern und danach ein Update des Grids zu bewirken (ziemlich umständlich, ich weiß, falls jemand was einfacheres hat, her damit).

Da das sicher nicht so einfach nachzuvollziehen ist, habe ich in der Anlage mal ein Beispiel beigefügt (siehe auch Screenshot), in dem Memo ist die "Datenbank" für den Status der Checkboxen, die dann jeweils nach Klick auf die Checkbox (bzw. das Layout) angepasst werden, wobei hier auch die Checkboxen im Grid richtig aktualisiert werden.

paul.kunig 3. Feb 2019 12:47

AW: Checkbox in TGrid reagiert nicht
 
Hallo,

genau das sind die vorherrschenden Probleme.

Was die Funktionalität der Checkbox angeht, wäre meiner Meinung nach das Problem bereits gelöst, wenn man den Fokus der beim Klick auf die Checkbox an die Checkbox übergeben wird, zum Beispiel beim Loslassen der linken Mousetaste, zurücksetzen könnte.


Gruß
Paul


Alle Zeitangaben in WEZ +1. Es ist jetzt 06:21 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz