Ergänze nach dem Click einfach wie folgt:
Delphi-Quellcode:
for L := AdvStringGrid1.ColCount-1 downto AdvStringGrid1.FixedCols
do AdvStringGrid1.Col := L;
Das funktioniert sowohl mit dem StringGrid als auch mit dem TMS-AdvStringGrid
Würde da nicht einfach nur
AdvStringGrid1.Col := AdvStringGrid1.FixedCols
reichen?
Da FixedCols ja die Anzahl der fixierten Spalten ist, würde diese Zahl als Index verwendet immer die erste Zelle innerhalb der Zeile selektieren. Warum erst von größten Spalte runterzählen?