How can I do inverse selection in AdvStringGrid?
Domanda
How can I do inverse selection in AdvStringGrid (TMS)?
Soluzione
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.
Autorizzato sotto: CC-BY-SA insieme a attribuzione
Non affiliato a StackOverflow