DBGrid에서 메모필드 보이게 하기

procedure TfrmList.gridCategoryGroupDrawColumnCell(Sender: TObject;
const Rect: TRect; DataCol: Integer; Column: TColumn;
State: TGridDrawState);
var  
sTemp : String;
begin
case Column.Field.DataType of
  ftMemo:
    begin
      with TDBGrid(Sender).Canvas do
      begin        
        sTemp := Column.Field.Value;
        FillRect(Rect);          
        // 위치를 3 : 3 만큼 이동했지유~
        TextOut(Rect.Left + 3 , Rect.Top + 3, sTemp);      
      end;
    end;
end;
end;