OnCellChanging

Cell이 변경되었을때 작업을 한다. 원래 여기에다 realGrid에서 했던 것처럼 Edit여부를 조정하려고 헀더니, 그리드가 깜빡거린다.. 
그래서 edit조정여부는 OnCanEditCell를 찾아서 했다.

procedure TfrmYSSimsa.sgdDatCellChanging(Sender: TObject; OldRow, OldCol,
  NewRow, NewCol: Integer; var Allow: Boolean);
begin
    case NewCol of
        cDDATODRCOD :
        begin
            if Copy(GlobalFunc.gsSimsaOp, 35, 1) = '1' then
                sgdDat.DefaultEditor    := edUpperCase
            else
                sgdDat.DefaultEditor    := edNormal;
        end
        else
        begin
            sgdDat.DefaultEditor    := edNormal;
        end;
    end;
end;