![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Нужен нестандартный компонент [D5, D6, Win2k]
slgeo © (2002-11-26 11:40:00)Народ, не подскажете, что использовать?
Нужен CheckListBox но не с одним, а с двумя "check"-ами.
down (2002-11-26 15:20:00) [1]В предпоследней строчке явно что-то не так, нужно исправить на DrawFrameControl(Sender.Canvas.Handle, ...), ибо Sender.Handle - это дескриптор окна, а нам надо дескриптор канвы.
slgeo (2002-11-26 14:50:00) [2]to down
Никак не могу добиться, чтобы отображался CheckBox, что здесь не так:
procedure T_fmNewGroup.ListView1CustomDrawItem(Sender: TCustomListView;
Item: TListItem; State: TCustomDrawState; var DefaultDraw: Boolean);
var
Rect : TRect;
begin
Rect.Left := 50;
Rect.Right := 50;
Rect.Top := 50;
Rect.Bottom := 50;
Rect.TopLeft.X := 0;
Rect.TopLeft.Y := 0;
DrawFrameControl(Sender.Handle,Rect,DFC_BUTTON,DFCS_BUTTONCHECK);
end;
slgeo (2002-11-26 12:29:00) [3]Спасибо всем
down (2002-11-26 12:12:00) [4]TListView, OnDrawItem, DrawFrameControl - вот рецепт щастья
Слесарь Матерящийся (2002-11-26 11:57:00) [5]Фрейм, на нём динамически создавать массив CheckBоx-ов.
Marcus (2002-11-26 11:45:00) [6]Как вариант можно заюзать какой-нить продвинутый DBGrid (который умеет булевые поля отображать в виде чеков) в совокупности с TRxMemoryData. Тогда число чекбоксов будет ограничено только твоей фантизией...