ich hab ein Problem, ich lese bestimmte Dateien aus und schreibe diese in einen ListView mit dem ViewStyle 'vsReport'.
Nun versuche ich je nach Eintrag die Zeilen im ListView mit einer bestimmten Farbe zu schreiben! Aber es klappt nicht. Die Farbanderungen versuche ich mit den Befehlen:

//Hintergrund
ListView->Canvas->Brush->Color = clFarbe;
//Schrift
ListView->Canvas->Font->Color = clFarbe;

zu ändern. Kann mir vielleicht jemand sagen, warum es nicht klappt und wie es dann geht?

schau dir mal folgenden code an:

void __fastcall TF_Ausgang::ListViewObjektDrawItem(TCustomListView *Sender, TListItem *Item, TRect &Rect, TOwnerDrawState State)
{
  int index = Item->Index;

  // markierter eintrag
  if (State.Contains(odSelected))
  {
    ListViewObjekt->Canvas->Font->Color  = clHighlightText;
    ListViewObjekt->Canvas->Brush->Color = clHighlight;
  }

  // normaler eintrag
  else
  {
    ListViewObjekt->Canvas->Brush->Color = clRed;
    ListViewObjekt->Canvas->Font->Color  = ListViewObjekt->Font->Color;
  }

  ListViewObjekt->Canvas->FillRect((TRect) Rect);

  int width   = Item->Left;
  Rect.Left  += 2;

  DrawText(ListViewObjekt->Canvas->Handle, Item->Caption.c_str(),
           -1, &Rect, DT_SINGLELINE | DT_VCENTER | DT_LEFT);

  Rect.Right = width;
  int left   = Rect.Left - 2;

  for (int col = 0; col < Item->SubItems->Count; col++)
  {
    left += ListViewObjekt->Columns->Items[col]->Width;

    Rect.Left  = left;
    Rect.Right = left + ListViewObjekt->Columns->Items[col + 1]->Width;

    if (col > 2)
    {
      Rect.Right -= 2;
      DrawText(ListViewObjekt->Canvas->Handle, Item->SubItems->Strings[col].c_str(),
               -1, &Rect, DT_SINGLELINE | DT_VCENTER | DT_RIGHT);
    }
    else
    {
      if (col > 0)
      {
        DrawText(ListViewObjekt->Canvas->Handle, Item->SubItems->Strings[col].c_str(),
                 -1, &Rect, DT_SINGLELINE | DT_VCENTER | DT_CENTER);
      }
      else
      {
        Rect.Left  += 2;
        DrawText(ListViewObjekt->Canvas->Handle, Item->SubItems->Strings[col].c_str(),
                 -1, &Rect, DT_SINGLELINE | DT_VCENTER | DT_LEFT);
      }
    }
  }
}

-junix

Was muss am Code noch verändert werden, dass Icons aus einer ImageList angezeig werden können? Durch das Owner-Draw werden die nämlich erstmal nicht mehr dargestellt ...

[ Dieser Beitrag wurde am 15.01.2003 um 10:39 Uhr von F98 editiert. ]

Ne im ernst.. wenn keiner weiss was du modifiziert hast, kann auch keiner sagen was schiefläuft. Schonmal mit dem Debugger durgesteppt?

-junix

Original erstellt von <Bernie>:
nicht mal die SubItems werden dargestellt

Die entsprechenden Columns hast du aber eingerichtet!?

Kann sein, dass ich das TRect Rect am Anfang falsch initialisiere!
Wie initialisiert man es denn am besten(richtig)?

void __fastcall TForm1::ListViewColorLine(TListItem *Item, TRect &Rect, int Auswahl)
{
  switch(Auswahl)
  {
   case 0:
   {
     ListView->Canvas->Brush->Color = clWhite;
     ListView->Canvas->Font->Color  = clBlack;
     break;
   }
   case 1:
   {
     ListView->Canvas->Brush->Color = clWhite;
     ListView->Canvas->Font->Color  = clBlack;
     break;
   }
   case 2:
   {
     ListView->Canvas->Brush->Color = clWhite;
     ListView->Canvas->Font->Color  = clFuchsia;
     break;
   }
   case 3:
   {
     ListView->Canvas->Brush->Color = clYellow;
     ListView->Canvas->Font->Color  = clBlack;
     break;
   }
   case 4:
   {
     ListView->Canvas->Brush->Color = clRed;
     ListView->Canvas->Font->Color  = clBlack;
     break;
   }
   default:
   {
     ListView->Canvas->Brush->Color = clWhite;
     ListView->Canvas->Font->Color  = clBlack;
   }
 }

 ListView->Canvas->FillRect(Rect);

 int width   = Item->Left;
 Rect.Left  += 2;

 DrawText(ListView->Canvas->Handle, Item->Caption.c_str(), -1, &Rect, DT_SINGLELINE); // | DT_VCENTER | DT_LEFT

 Rect.Right = width;
 int left   = Rect.Left - 2;

 for (int z = 0; z < Item->SubItems->Count; z++)
 {
   left += ListView->Columns->Items[z]->Width;

   Rect.Left  = left;
   Rect.Right = left + ListView->Columns->Items[z + 1]->Width;

   if(z > 2)
   {
     Rect.Right -= 2;
     DrawText(ListView->Canvas->Handle, Item->SubItems->Strings[z].c_str(), -1, &Rect, DT_SINGLELINE);// | DT_VCENTER | DT_RIGHT
   }
   else
   {
     if(z > 0)
     {
       DrawText(ListView->Canvas->Handle, Item->SubItems->Strings[z].c_str(), -1, &Rect, DT_SINGLELINE);// | DT_VCENTER | DT_CENTER
     }
     else
     {
       Rect.Left  += 2;
       DrawText(ListView->Canvas->Handle, Item->SubItems->Strings[z].c_str(), -1, &Rect, DT_SINGLELINE);// | DT_VCENTER | DT_LEFT
     }
   }
 }

}

Sunday's Code:

void __fastcall TF_Ausgang::ListViewObjektDrawItem(TCustomListView *Sender, TListItem *Item, TRect &Rect, TOwnerDrawState State)
{
...
}

Dein Code:

void __fastcall TForm1::ListViewColorLine(TListItem *Item, TRect &Rect, int Auswahl)
{
...
}

Die Übergabeparameter an die Funktion stimmen nicht überein.

Lösung:

In der Objektinspektor-Ansicht Deines ListViews unter Ereignisse "OnDrawItem" doppelklicken und Deinen Quellcode in den so erstellten Funktionsrumpf reinkopieren. Oder besser: erstmal den von Sunday reinbasteln und dann modifizieren.

Was muss am Code noch verändert werden, dass Icons aus einer ImageList angezeigt werden können? Im Beispiel werden die nämlich erstmal nicht mehr dargestellt ...

Mit CustomDrawItem. Hier muß man nichtmal OwnerDraw auf true stellen!
Funktioniert bestimmt.

void __fastcall TForm1::ListViewCustomDrawItem(TCustomListView *Sender,
      TListItem *Item, TCustomDrawState State, bool &DefaultDraw)
{
   TColor BackgroundColor;
   TColor PencilColor;

   //Farben übergeben i ist z.B ein IntegerWert
   switch(i)
   {
     case 0:
     {
       BackgroundColor = clRed;
       PencilColor = clBlack;
       break;
     }
     case 1:
     {
       BackgroundColor = clBlue;
       PencilColor = clYellow;
       break;
     }
     default:
     {
       DefaultDraw = true;
       return;
     } 
   }

   //Zeilen mit gewünschter Farbe
   Sender->Canvas->Brush->Color = BackgroundCol;
   Sender->Canvas->Font->Color = PencilCol;
}

Hoff das hilft dem nächsten, der sich mit sowas auseinandersetzen muß!

Ich möchte gern immer die Zeile andersfarbig unterlegen, welche selektiert wurde, so das wenn der Focus des ListView verloren geht, man weiterhin sieht welche Zeile zuletzt ausgewählt war.

if (Item->Selected)
    {
        ListView1->Canvas->Brush->Color = 0x00C56A31;
        ListView1->Canvas->Font->Color = clWhite;
    }

Trotzdem wäre es ganz Interessant zu wissen wie man bestimmte Zeilen farbig setzt.

Wie zeichnet man denn nur die 3. Zeile farbig (RowSelect=true)?
Oder anders gefragt, wie komme ich an das Rect der dritten Zeile ran?

Mit dem selben Event. Nur eben die Bedingung ist anders, als State auf Selected zu überprüfen.

Zum Beispiel haben die Items des ListViews die Eigenschaft Index, anhand du die Nummer des aktuellen Items auswerten kannst

bis bald
akari