Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Delphi [игнор отключен] [закрыт для гостей] / TStringList&TCheckBox / 5 сообщений из 5, страница 1 из 1
22.01.2003, 11:24
    #32094465
TStringList&TCheckBox
У меня проблема, уважаемые господа. Нужно сделать грид, у которого
один столбец будет содержать CheckBox. Подскажите, плиз...
...
Рейтинг: 0 / 0
22.01.2003, 11:26
    #32094468
hDrummer
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TStringList&TCheckBox
был бы тигра, сказал бы - EhLib
...
Рейтинг: 0 / 0
22.01.2003, 11:46
    #32094493
LexusR
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TStringList&TCheckBox
согласен с предыдущим постингом
что лучшее решение TDBGridEh
но если нужно решать стандартными средствами
то можно на событие dbgColumnCell самому рисовать
птичку или плюсик(минус) в зависимости от условия
и текущего значения поля тем самым имитируя CheckBox
соответственно при клике изменять значение поля
заставляя тем самым инвертироваться отрисовку вашего
CheckBox-а
...
Рейтинг: 0 / 0
22.01.2003, 12:48
    #32094544
Moonspell13
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TStringList&TCheckBox
А вот есть я и скажу, что лучше dxDBGrid от DevExpress.
==
А вот был бы тру делфист он сказал бы например:

procedure TForm.DBGridDrawDataCell(Sender: TObject; const Rect: TRect; Field: TField; State: TGridDrawState);
begin
if (gdFocused in State) then
begin
if (Field.FieldName = DBCheckBox.DataField) then
begin
DBCheckBox.Left := Rect.Left + RxDBGridPrihod.Left + 1;
DBCheckBox.Top := Rect.Top + RxDBGridPrihod.top + 2;
DBCheckBox.Width := Rect.Right - Rect.Left;
DBCheckBox.Height := Rect.Bottom - Rect.Top;
DBCheckBoxYes.Visible := True;
end;
end;
end;
и т.д.п.

с таким же успехом можно поместить все, что хочешь.
...
Рейтинг: 0 / 0
22.01.2003, 12:49
    #32094546
Moonspell13
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
TStringList&TCheckBox
В стринг гриде также
...
Рейтинг: 0 / 0
Форумы / Delphi [игнор отключен] [закрыт для гостей] / TStringList&TCheckBox / 5 сообщений из 5, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]