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/)
-   -   Delphi TListView mit Checkboxen Problem.... (https://www.delphipraxis.net/33701-tlistview-mit-checkboxen-problem.html)

Kedariodakon 11. Nov 2004 13:38


TListView mit Checkboxen Problem....
 
So habe ein TListView und Checkboxes auf True...

wenn ich nun auf eine Checkbox klicke, wechselt nicht der Focus auf den Eigentümer der Checkbox :gruebel: ...
Ich will das aber so haben und bekomm das irgendwie überhaupt nicht hin...

Hab zwar rowSelect an, aber das beinhaltet scheinbar nicht die Checkboxen... :wall:

Hat wer Rat?

Bye

MathiasSimmack 11. Nov 2004 13:42

Re: TListView mit Checkboxen Problem....
 
Guckst du mal hier in den Anhang? Da müsste das drin sein.

Kedariodakon 11. Nov 2004 14:03

Re: TListView mit Checkboxen Problem....
 
Du fragst da über die Mausposition ab, richtig?
Was ist wenn ich die Tastatur benutz?

Das was ich bräuchte, ist ein Event für das Ändern der Checkboxen, um halt Aktionen auszuführen, bzw. zu stoppen und halt das row auszuwählen... :gruebel:


Bye

Christian Seehase 11. Nov 2004 21:43

Re: TListView mit Checkboxen Problem....
 
Moin Christian,

schau Dir mal ganz genau die Parameter vom OnChange Ergeignis des ListViews an.

Kedariodakon 12. Nov 2004 08:58

Re: TListView mit Checkboxen Problem....
 
Laut Delphi-Referenz durchsuchenOnChange (Ereignis von TCustomListView)
Delphi-Quellcode:
type TLVChangeEvent = procedure(Sender: TObject; Item: TListItem; Change: TItemChange) of object;
Ja und? Nun unterscheide mal zwischen Items die zur Laufzeit reingepackt werden oder bei dennen nur die Checkbox per Klick drauf verändert wird... :gruebel:

Ich bekomm das gar nicht gebacken....

Bye

Christian Seehase 12. Nov 2004 18:27

Re: TListView mit Checkboxen Problem....
 
Moin Christian,

meintest Du das so:

Delphi-Quellcode:
procedure TForm1.ListView1Change(Sender: TObject; Item: TListItem; Change: TItemChange);

var
  oTemp : TLVChangeEvent;

begin
  if Change = ctState then begin
    if Item.Checked then begin
      oTemp := ListView1.OnChange;
      ListView1.OnChange := nil;
      Item.Selected := true;
      ListView1.OnChange := oTemp;
    end;
  end;
end;
?


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