안녕하세요



디비그리드에서 특정레코드에 색을 변경시키는 것을 찾아보니 아래와 같이

있었으나 불행하게도 아래 코드는 디비그리드를 컬럼Edit 하지 않은 상태

에서만 실행이 되더군요...



컬럼edit로 편집된 디비그리드에서 특정레코드에서 색을 변경할수 없는지

궁금합니다.



고수님의 고견을 부탁합니다.



그럼 즐거운 하루되시길 바랍니다.



procedure TForm1.DBGrid1DrawDataCell(Sender: TObject; const Rect: TRect;

Field: TField; State: TGridDrawState);

var FieldValue : Double;

begin

Fieldvalue := Field.DataSet.FieldByName('CustNo').AsFloat ;

if (FieldValue = 1351) then

begin

(Sender as TDbGrid).canvas.brush.Color := clRed;

(Sender as TDbGrid).canvas.FillRect(Rect) ;

(Sender as TDbGrid).canvas.TextOut(Rect.Left,Rect.Top,Field.Text );

end

else

begin

(sender as TDbGrid).DefaultDrawDataCell(Rect,Field,State) ;

end ;

end;