Форум: "Базы";
Текущий архив: 2003.09.29;
Скачать: [xml.tar.bz2];
ВнизПомогите не пойму Найти похожие ветки
← →
DelphiM (2003-09-08 13:44) [0]Помогите
Вот обработчик события dbgrid-a
procedure TForm1.dbgrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
if Column.Field.DataType = ftBoolean then begin
with TDBGrid(Sender).Canvas do begin
TDBGrid(Sender).Canvas.FillRect(Rect);
if Column.Field.Text = "True" then
ImageList.Draw(TDBGrid(Sender).Canvas,Rect.Left,Rect.Top,0 );
End;
Но проблема когда ячейка в режиме редактирования то текст всеравно виден как ‘True’ или ‘False’ а не как кортинка
как избавится от этого ????
← →
stud (2003-09-08 13:46) [1]тогда надо еще и state обрабатывать
← →
stud (2003-09-08 13:48) [2]к тому же нет дефолтной прорисовки при невыполнении условия
> if Column.Field.Text = "True" then
← →
Vlad (2003-09-08 13:56) [3]на OnColEnter написать следующее:
if DBGrid.SelectedField=Нужное_Поле then
DBGrid.Options:=DBGrid.Options-[dgEditing];
else
DBGrid.Options:=DBGrid.Options+[dgEditing];
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2003.09.29;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.008 c