Einzelnen Beitrag anzeigen

Benutzerbild von Helmi
Helmi

Registriert seit: 29. Dez 2003
Ort: Erding, Republik Bayern
3.312 Beiträge
 
Delphi XE2 Professional
 
#10

Re: StringGrid: eine Zeile markieren?

  Alt 2. Jan 2006, 22:31
Zitat von Lannes:
Hallo,

in Deiner OnDrawCell-Behandlungs-Routine werden selectierte Zellen wie normale gezeichnet.
Füge mal die markierte Zeile in die Prozedur ein,
dann klappt erst mal die Selectierung.
Delphi-Quellcode:
//...
begin
  with (Sender as TStringGrid), Canvas do
    if not (gdSelected in State) then//<----------- !!!
    begin
    //...
Dann die Procedur zu OnDrawCell erweitern
und selectierte Zellen entsprechnend Deinen Wünschen zeichnen.
Danke für deinen Tip.

Ich hab jetzt folgendes gemacht:
Delphi-Quellcode:
begin
  with (Sender as TStringGrid), Canvas do
    if not (gdSelected in State) then
      begin
        { ... }
      end
    else
      begin
        //NEUER PART
    
        Canvas.Brush.Color := clBlue;

        TextRect(Rect, Rect.Left + 2, Rect.Top + 2, cells[acol, arow]);
        FrameRect(Rect);
      end;
Jetzt kann ich nur noch hoffen, dass die Markierungsfarbe immer clBlue ist
mfg
Helmi

>> Theorie ist Wissen, dass nicht funktioniert - Praxis ist, wenn alles funktioniert und keiner weiss warum! <<
  Mit Zitat antworten Zitat