Форум: "Базы";
Текущий архив: 2003.06.09;
Скачать: [xml.tar.bz2];
ВнизКак вставить Checkbox в DBGrid ??? Найти похожие ветки
← →
Альф (2003-05-19 11:50) [0]Собственно и весь вопрос :)
← →
ghg (2003-05-19 12:08) [1]http://www.sources.ru/delphi/gui/tcheckbox_in_tstringgrid.shtml
← →
Альф (2003-05-19 12:22) [2]2ghg © (19.05.03 12:08)
Большое спасибо :) - идея достаточно оригинальна.
Но для DBGrid-а - где размеры выборки могут достигать тысяч строк создание такого кол-ва TCheckBox-ов достаточно проблематично :(
← →
ghg (2003-05-19 12:28) [3]можно добавлять тока один checkbox, тока в активной ячейке
остальные все-равно не видны пока ячейка не в фокусе
ща поищу коды этого
← →
ghg (2003-05-19 12:30) [4]procedure Tvibor_signal.StringGrid1SelectCell(Sender: TObject; ACol,
ARow: Integer; var CanSelect: Boolean);
var R: TRect;
begin
if ((ACol = 2) AND (ARow <> 0)) then
begin
R := StringGrid1.CellRect(ACol, ARow);
R.Left := R.Left + StringGrid1.Left;
R.Right := R.Right + StringGrid1.Left;
R.Top := R.Top + StringGrid1.Top;
R.Bottom := R.Bottom + StringGrid1.Top;
ComboBox2.Left := R.Left + 1;
ComboBox2.Top := R.Top + 1;
ComboBox2.Width := (R.Right + 1) - R.Left;
ComboBox2.Height := (R.Bottom + 1) - R.Top;
ComboBox2.Visible := True;
combo_tek_show(arow);
ComboBox2.SetFocus;
end;
CanSelect := True;
end;
← →
Альф (2003-05-19 12:31) [5]Ну да - добавишь - а с остальными что делать ?
← →
ghg (2003-05-19 12:33) [6]с кем осатльными?
← →
ghg (2003-05-19 12:38) [7]в общем так
на stringgrid"e лежит тока один checkbox
его и перемещаешь по stringgrid в зависимости от того какая ячейка в фокусе
← →
NAlexey (2003-05-19 13:08) [8]Зачем все усложнять. Уже тема поднималась и не раз. :
http://delphimaster.net/view/3-1052155404/
Плюс
http://delphimaster.net/view/3-1052155404/
← →
Amoeba (2003-05-19 17:37) [9]А надо ли изобратать очередной велосипед? Используй TDBGridEh из библиотеки EhLib (бесплатно, с исходниками). Там это уже давно сделано.
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2003.06.09;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.008 c