Zeile in StringGrid mit rechter Maustaste markieren ?

[ibp]

Zitat von Lannes:

Hallo,

wenn fixierte Zeilen oder Spalten vorhanden sind, zusätzlich noch eine Markierung derselben verhindern,
sonst kommt das Grid ein wenig durcheinander:

Delphi-Quellcode:

if (aGridCoord.y >= StringGrid1.FixedRows) and (aGridCoord.x >= StringGrid1.FixedCols) then
  //jetzt markieren

... nicht nur das man muss auch noch auf den äusseren rand testen sonst gibbets nen prob....

Delphi-Quellcode:

..
    if    (aGridCoord.y >= stringgrid1.FixedRows)
      and (aGridCoord.y <  stringgrid1.RowCount)
      and (aGridCoord.x >= stringgrid1.FixedCols)
      and (aGridCoord.x <  stringgrid1.ColCount) then
    begin
      // zelle markieren
..

... oder besser man testet auf ist agridcoord <> -1

Delphi-Quellcode:

..
    if    (aGridCoord.y >= stringgrid1.FixedRows)
      and (aGridCoord.y >  -1)
      and (aGridCoord.x >= stringgrid1.FixedCols)
      and (aGridCoord.x >  -1) then
    begin
      // zelle markieren
..