How can I do inverse selection in AdvStringGrid?
Question
How can I do inverse selection in AdvStringGrid (TMS)?
Solution
Assuming, that NGLN is right, you'll need to set the proper Disjunct...Select option in Grid.MouseActions to select the kind of selection you'll allow, and then you can call this procedure:
PROCEDURE InvertSelection(Grid : TAdvStringGrid);
VAR
C,R : Cardinal;
BEGIN
IF Grid.MouseActions.DisjunctCellSelect THEN
FOR R:=Grid.FixedRows TO PRED(Grid.RowCount) DO FOR C:=Grid.FixedCols TO PRED(Grid.ColCount) DO Grid.SelectedCells[C,R]:=NOT Grid.SelectedCells[C,R]
ELSE IF Grid.MouseActions.DisjunctRowSelect THEN
FOR R:=Grid.FixedRows TO PRED(Grid.RowCount) DO Grid.RowSelect[R]:=NOT Grid.RowSelect[R]
ELSE IF Grid.MouseActions.DisjunctColSelect THEN
FOR C:=Grid.FixedCols TO PRED(Grid.ColCount) DO Grid.ColSelect[C]:=NOT Grid.ColSelect[C]
END;
This will make all unselected rows/columns/cells selected and vice-versa.
Licensed under: CC-BY-SA with attribution
Not affiliated with StackOverflow