In StringGrid-Zeilen mit einem Balken navigieren

**marabu**

Die vermeintlichen Änderungen sind bei mir so von D7 vorgegeben - du musst natürlich die von D3 vergebene Signatur benutzen. Ich wollte nur zeigen, wie die Bedingung formuliert werden muss um den von dir gewünschten gelben Balken zu erhalten. Bei D3 scheint der Header wegen der Überdeckung der Eigenschaften Col und Row mit den gleichnamigen Parametern noch nicht korrigiert worden zu sein. Du kannst die aktuellen Werte zwischenspeichern:

zusammenfalten · markieren

Delphi-Quellcode:

			procedure TFRechn.StringGridRedatDrawCell(Sender: TObject;

  Col, Row: Integer; Rect: TRect; State: TGridDrawState);

var

  aCol, aRow: Integer;

begin

  aCol := Col;

  aRow := Row;

  with Sender As TStringGrid do

  begin

    if (ARow = Row) and (ACol >= FixedCols)

      then Canvas.Brush.Color := clYellow

      else Canvas.Brusch.Color := clWhite;

    Canvas.FillRect(Rect);

  end;

end;

Immernoch beschleicht mich das Gefühl, dass du Spalten und Zeilen verwechselst. Du schreibst 8 feste Titelspalten und jede weitere Zeile...

marabu

In StringGrid-Zeilen mit einem Balken navigieren

Re: In StringGrid-Zeilen mit einem Balken navigieren

Forumregeln