Архив форумов ЦИТФорума

[Spartak]

Народ! Подскажите как можно изменить цвет фона и текста объекта CListBox. А заодно, как сделать его autoscroll при добавлении новых строк.

[Shurick V]

Вот такой вот примерчик есть там...
(C++ Builder 5)
Here is a typical handler for an OnDrawItem event. In the example, a list box with the lbOwnerDrawFixed style draws a bitmap to the left of each string.

void __fastcall TForm1::ListBox1DrawItem(TWinControl *Control, int Index, TRect &Rect, TOwnerDrawState State)

{
Graphics::TBitmap *pBitmap; // temporary variable for item’s bitmap
int Offset = 2; // default text offset width
// note that we draw on the listbox’s canvas, not on the form
TCanvas *pCanvas = ((TListBox *)Control)-Canvas;
pCanvas-FillRect(Rect); // clear the rectangle
pBitmap = (Graphics::TBitmap *)((TListBox *)Control)-Items-Objects[Index];

if (pBitmap)
{
pCanvas-BrushCopy(Bounds(Rect.Left + Offset, Rect.Top, pBitmap-Width, pBitmap-Height), pBitmap, Bounds(0, 0, pBitmap-Width, pBitmap-Height), clRed); // render bitmap
Offset += pBitmap-Width + 4; // add four pixels between bitmap and text
}
// display the text
pCanvas-TextOut(Rect.Left + Offset, Rect.Top, ((TListBox *)Control)-Items-Strings[Index]);
}