Olá Pessoal. Alguém já trabalhou com dois checkbox na mesma GRID? Tenho duas colunas com checkbox, mas quando seleciono um checkbox outro tbém é checado. Estou usando a propriedade SelectedIndex para alternar entre checado e não checado, mas no evendo DrawnColumnCell ele seleciona tudo, vejam se está correto:
DBGrid2.DefaultDrawDataCell(Rect, DBGrid2.columns[datacol].field, State); if (Column.FieldName = 'XENVIO') or (Column.FieldName = 'XRETORNO') then begin Self.DBGrid2.Canvas.FillRect(Rect); CheckBoxRectangle.Left := Rect.Left + 2; CheckBoxRectangle.Right := Rect.Right - 2; CheckBoxRectangle.Top := Rect.Top + 2; CheckBoxRectangle.Bottom := Rect.Bottom - 2; if (DBGrid2.SelectedIndex = 5) then begin if (DM.cdsConsultaNFe.FieldByName('XENVIO').AsString = '1') then DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, DFC_BUTTON, CtrlState[True]) else DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, DFC_BUTTON, CtrlState[False]); end; if (DBGrid2.SelectedIndex = 6) then begin if (DM.cdsConsultaNFe.FieldByName('XRETORNO').AsString = '1') then DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, DFC_BUTTON, CtrlState[True]) else DrawFrameControl(Self.DBGrid2.Canvas.Handle, CheckBoxRectangle, DFC_BUTTON, CtrlState[False]); end; end; Márcio Ricardo Alves da Silva Programador Pleno [EMAIL PROTECTED] *** Antes de imprimir, pense em seu compromisso com o Meio Ambiente *** Config Informática Ltda Av. Eng. Luis Carlos Berrini, 801 - 7º andar Brooklin Novo - São Paulo - SP CEP: 04571-010 - Fone (11) 5501-8300 - www.config.com.br [As partes desta mensagem que não continham texto foram removidas]