Q&A

  • 레코드 삽입시 dbgrid의 row 색상 결정하기
하나의 레코드가 삽입되면서 row의 배경색도 결정하여
조건에 따라 레코드와 함께 입력받는 값이 1이면 배경을 빨간색,
2이면 배경을 노란색 이렇게 하고 싶은데요
어떻게 해야되요

검색해 봐도 없어서리

1  COMMENTS
  • Profile
    nilriri™ 2002.05.15 02:24
    procedure TForm.dbg_1DrawColumnCell(Sender: TObject;
      const Rect: TRect; DataCol: Integer; Column: TColumn;
      State: TGridDrawState);
    var
        tw : integer;
        setValue : String;
    begin
        if rs.fieldbyname('컬럼').asString = '비교값' then
            begin
            with DBG_1.Canvas do
            begin
                setValue := Column.Field.AsString;
                Font.Color := clWhite;
                Brush.Color := clBlue;

                FillRect(Rect);
                TW := TextWidth(setValue);
                TextOut((Rect.Left + Rect.Right - TW) div 2, Rect.Top+2, setValue);
            end;
        end;
    end;