Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: Общие вопросы > CheckBox на Grid'e (как String-,так и DBGrid'e)


Автор: varra 13.10.2003, 06:50
имеем БД MS Access 2000, доступ - через ADO.

сначала нужно занести в одну из таблиц текстовые данные(StringGrid ?), потом в другом модуле считать их же(DBGridEh ?). и в том, и в другом случае необходимо наличие checkbox'ов в grid'e для каждой записи. отдельного поля в таблице под это дело не предусмотрено(если бы было, то в DBGridEh это бы легко реализовывалось ).

с использованием такого кода создается только один CheckBox (рисуется в последней строке stringgrid'a):

Код

const
cell_x = 2;//номер столбца с checkbox-oм
...
procedure TForm1.FormCreate(Sender: TObject);
begin
CheckBox1:=TCheckBox.Create(Panel1);
CheckBox1.Parent:=Panel1;
end;
...
procedure TForm.StringGrid1DrawCell(Sender: TObject; ACol,
 ARow: Integer; Rect: TRect; State: TGridDrawState);
var
r:trect;
begin
if (acol=cell_x) and (arow=i) then
 begin
  r:=stringgrid1.CellRect(cell_x,i);
  r.Left:=r.left+stringgrid1.left+20;
  r.right:=r.right+stringgrid1.left+2;
  r.top:=r.top+stringgrid1.top+2;
  r.bottom:=r.bottom+stringgrid1.top+2;
  CheckBox1.BoundsRect:= r;
  CheckBox1.Color := clWhite;
  inc(i);
 end;
end;


наверное, сломаю голову, пока найду решение sad.gif

Автор: x77 13.10.2003, 07:02
да просто руками рисуй его в ondrawcell и всё. я вот только не пойму, почему ввод данных - TStringGrid, а отображение - TDbGrid. если бы наоборот - ещё как-то понятно.

Автор: varra 13.10.2003, 07:26
Цитата
да просто руками рисуй его в ondrawcell


можно пример?

Автор: x77 13.10.2003, 09:04
нельзя. мне лень, да и времени сейчас нет, сорри smile.gif. но смысл такой: ты пытаешься создать TCheckBox для каждой записи. Вместо этого можно просто рисовать его в какой-нить пустой колонке (которую можно создать в DbGrid'е с помощью Columns, а в StringGrid'е - и подавно). Если ты не работаешь с данными напрямую через DbGrid, то вместо стринггрида лучше использовать TListView, у него есть свойство (ShowCheckboxes или что-то типа), которое само нарисует тебе чекбокс перед каждой строкой. Тебе останется только начитать в листвью данные. В общем, вариантов много, тв расскажи поподробнее, что тебе нужно в конечном итоге.

Автор: Unregistered 14.10.2003, 09:20
ок, конкретизирую.
мне нужно сначала вносить данные( причем заранее неизвестно, сколько записей будет в итоге) и предоставлять для каждой записи возможность отметить ее "галочкой"в checkbox'e (это нужно для того, чтобы идентификатор отмеченной записи занести в др. таблицу), а потом считывать их и предоставлять другому пользователю выбор верной из этих записей(опять же с помощью checkbox'a).

Автор: Cashey 14.10.2003, 10:14
Такие вещи делаются через "закладки", а выделение в DBGrid'е делается одновремнным нажатием Cntrl+mbLeft, при включенном Мультиселекте.

Автор: Cashey 14.10.2003, 10:21
А чекбоксами (точнее плюсиками) у нас только дос-программисты с такой целью пользуются smile.gif

Автор: varra 14.10.2003, 13:29
to Cashey:
представьте, что перед вами вопрос теста с вариантами ответа на него. как вы должны отметить правильный? мне думалось,"галочкой"...

Автор: varra 14.10.2003, 13:31
может, CheckListBox мне поможет?

Автор: Cashey 14.10.2003, 14:11
Ответ теста в Gride? Тяжело себе представить. smile.gif Это как же, в одном гриде вопрос, а в другом ответы, и при выборе другого вопроса пересоздается грид(таблица) с ответом, или все ответы в куче?

Что вы хотите? Решить какую-то конкретную задачу (тогда изложите ее и мы поможем ее решить) или принципмально воткнуть chekbox в grid, тогда вы должны сами создать свой компонент.

Автор: varra 14.10.2003, 15:04
Цитата
изложите ее и мы поможем ее решить


задача такая: один пользователь создает тест, другой садится и выполняет его. Т.е. сначала мы вносим вопросы и ответы к ним, не забывая отметить ("галочкой" там али еще как?) правильный вариант, а потом предъявляем их тестируемому пользователю. ну вот как же лучше их отобразить и в том, и в другом случае?

Автор: Dayana 14.10.2003, 15:15
varra, создай в гриде еще одну колонку, как сказал x77, и на событие OnDrawColumnCell прорисовывай там картинку ввиде галочки. Т.е., например, поле, которое может быть 0 или 1 (False или True). Если False, то пусто, если True, то рисуется галочка... ну примерно так..

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)