Listview1.SelectAll
procedure select_all(tt :tlistview);var i:integer;begin tt.Items.BeginUpdate; for i := 0 to tt.Items.Count-1 do tt.Items[i].Selected:=true; tt.Items.EndUpdate; tt.setfocus;{set focus for next ctrl-C. Somehow it is lost}end;
Yes, in my test it was set true. Once in the OI and once in code, to be sure, to be sure.
Compiling cocoawscomctrls.pasCompiling cocoatabcontrols.pascocoatabcontrols.pas(161,3) Note: Local variable "r" not usedcocoatabcontrols.pas(242,3) Note: Local variable "x" not usedcocoatabcontrols.pas(242,5) Note: Local variable "y" not usedcocoatabcontrols.pas(251,3) Note: Local variable "v" not usedcocoatabcontrols.pas(437,3) Note: Local variable "idx" not usedcocoatabcontrols.pas(480,3) Note: Local variable "r" not usedAssembling (pipe) ../../units/x86_64-darwin/cocoa/cocoatabcontrols.s<stdin>:51526:10: warning: section "__datacoal_nt" is deprecated.section __DATA, __datacoal_nt, coalesced ^ ~~~~~~~~~~~~~~<stdin>:51526:10: note: change section name to "__data".section __DATA, __datacoal_nt, coalesced ^ ~~~~~~~~~~~~~~<stdin>:51575:10: warning: section "__datacoal_nt" is deprecated.section __DATA, __datacoal_nt, coalesced ^ ~~~~~~~~~~~~~~<stdin>:51575:10: note: change section name to "__data".section __DATA, __datacoal_nt, coalesced ^ ~~~~~~~~~~~~~~cocoawscomctrls.pas(639,3) Note: Local variable "lTitle" not usedcocoawscomctrls.pas(818,13) Warning: Range check error while evaluating constants (9223372036854775807 must be between -2147483648 and 2147483647)cocoawscomctrls.pas(896,3) Note: Local variable "lOldTabStyle" is assigned but never usedcocoawscomctrls.pas(909,3) Note: Local variable "lOldTabStyle" is assigned but never usedcocoawscomctrls.pas(1305,3) Warning: Case statement does not handle all possible casescocoawscomctrls.pas(1559,3) Fatal: Syntax error, ";" expected but "ELSE" foundFatal: Compilation abortedmake[3]: *** [../lcl.ppu] Error 1make[2]: *** [cocoa_all] Error 2make[1]: *** [interfaces] Error 2make: *** [lcl] Error 2trev@macmini6 [/Users/trev/lazarus-src] $