Форум: "Основная";
Текущий архив: 2002.12.05;
Скачать: [xml.tar.bz2];
ВнизНужен нестандартный компонент Найти похожие ветки
← →
slgeo (2002-11-26 11:40) [0]Народ, не подскажете, что использовать?
Нужен CheckListBox но не с одним, а с двумя "check"-ами.
← →
Marcus (2002-11-26 11:45) [1]Как вариант можно заюзать какой-нить продвинутый DBGrid (который умеет булевые поля отображать в виде чеков) в совокупности с TRxMemoryData. Тогда число чекбоксов будет ограничено только твоей фантизией...
← →
Слесарь Матерящийся (2002-11-26 11:57) [2]Фрейм, на нём динамически создавать массив CheckBоx-ов.
← →
down (2002-11-26 12:12) [3]TListView, OnDrawItem, DrawFrameControl - вот рецепт щастья
← →
slgeo (2002-11-26 12:29) [4]Спасибо всем
← →
slgeo (2002-11-26 14:50) [5]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;
← →
down (2002-11-26 15:20) [6]В предпоследней строчке явно что-то не так, нужно исправить на DrawFrameControl(Sender.Canvas.Handle, ...), ибо Sender.Handle - это дескриптор окна, а нам надо дескриптор канвы.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.12.05;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.01 c