Einzelnen Beitrag anzeigen

Benutzerbild von Lannes
Lannes

Registriert seit: 30. Jan 2005
Ort: Münster
745 Beiträge
 
Delphi 3 Professional
 
#7

Re: StringGrid: eine Zeile markieren?

  Alt 2. Jan 2006, 22:00
Hallo,

OnDrawCell
was machst Du darin?

Mit dem Code funktioniert es aus den verschiedenen Aufrufmöglichkeiten.
Wobei nur beim Buttonklick alle Zellen markiert(blau) werden,
bei Aufruf aus Menü oder im onClick des StringGrids
ist die erste Zelle der Zeile nur mit einem Focusrahmen versehen.
Delphi-Quellcode:
var aRow,aFixCols : Integer;
begin
  aRow := StringGrid1.Row;
  aFixCols := StringGrid1.FixedCols;
  //erste Zelle markieren
  StringGrid1.Selection := TGridRect(Rect(aRow,aFixCols,aRow,aFixCols));
  StringGrid1.SetFocus;
  //jetzt sozusagen eine Selectierung von hinten nach vorne
  StringGrid1.Selection := TGridRect(Rect(StringGrid1.ColCount-1,
                                          aRow,
                                          aFixCols,
                                          aRow));
Was besseres fällt mir jetzt nicht ein
MfG Lannes
(Nichts ist nicht Nichts) and ('' <> nil ) and (Pointer('') = nil ) and (@('') <> nil )
  Mit Zitat antworten Zitat