Форум: "Основная";
Текущий архив: 2004.04.11;
Скачать: [xml.tar.bz2];
ВнизКакой использовать компонент? Найти похожие ветки
← →
Tornado © (2004-04-20 09:02) [0]Мне нужно отобразить данные которые содержаться в динамическом массиве в виде таблицы, для этого неплохо бы подошел CheckListBox но там все придется записывать в строчку, а мне нужно примерно вот так:
| От | Кому | Тема | Размер | # |
|sssss | wwwww | ккккк | 120 | CheckBox |
|eeeee | еееее | ggggg | 80 | CheckBox |
можно и в StringGrid засунуть но мне нужны CheckBox-ы
← →
Tornado © (2004-04-20 09:02) [0]Мне нужно отобразить данные которые содержаться в динамическом массиве в виде таблицы, для этого неплохо бы подошел CheckListBox но там все придется записывать в строчку, а мне нужно примерно вот так:
| От | Кому | Тема | Размер | # |
|sssss | wwwww | ккккк | 120 | CheckBox |
|eeeee | еееее | ggggg | 80 | CheckBox |
можно и в StringGrid засунуть но мне нужны CheckBox-ы
← →
begin...end © (2004-04-20 09:15) [1]TListView?
← →
begin...end © (2004-04-20 09:15) [1]TListView?
← →
Stvaffniy © (2004-04-20 09:20) [2]StringGrid, DBGrid?
← →
Stvaffniy © (2004-04-20 09:20) [2]StringGrid, DBGrid?
← →
Tornado © (2004-04-20 09:33) [3]да TListView похоже подойдет, спасибо
← →
Tornado © (2004-04-20 09:33) [3]да TListView похоже подойдет, спасибо
← →
Silver Alex © (2004-04-20 09:52) [4]procedure TForm1.StringGridDrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
var
r: Trect;
i:integer;
begin
if StringGrid.Cells[ACol,ARow]<>EmptyStr then
begin
StringGrid.Canvas.FillRect(Rect);
r:=Rect;
InflateRect(r,-20,-20);
if boolean(StrToInt(StringGrid.Cells[ACol,ARow])) then
I := DFCS_BUTTONCHECK + DFCS_CHECKED
else
I := DFCS_BUTTONCHECK;
DrawFrameControl(StringGrid.Canvas.Handle,r, DFC_BUTTON, i );
end;
end;
← →
Silver Alex © (2004-04-20 09:52) [4]procedure TForm1.StringGridDrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);
var
r: Trect;
i:integer;
begin
if StringGrid.Cells[ACol,ARow]<>EmptyStr then
begin
StringGrid.Canvas.FillRect(Rect);
r:=Rect;
InflateRect(r,-20,-20);
if boolean(StrToInt(StringGrid.Cells[ACol,ARow])) then
I := DFCS_BUTTONCHECK + DFCS_CHECKED
else
I := DFCS_BUTTONCHECK;
DrawFrameControl(StringGrid.Canvas.Handle,r, DFC_BUTTON, i );
end;
end;
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2004.04.11;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.045 c