表格文档中，如何为不同类型单元格赋值

little-fish

表格文档仅仅是一种表现，修改单元格的值分三种情况：
       
1、如果是字段单元格，那么直接控制数据集的相应字段值就可以。（http://bbs.justep.com/forum.php?mod=viewthread&tid=3622 ）
DSBrokerDDLR.DataSet.FieldByName('bz').AsString:='1';

2、如果表达式单元格，表现的是一个参数，那么直接修改业务参数的值就可以（具体参考业务参数赋值 http://bbs.justep.com/forum.php?mod=viewthread&tid=3492 ）

3、如果标准单元格，那么可以代码来控制该单元格的值

john

方法一：
Business.Model.TSheetDoc(DocViewSL.Doc).Sheet.Values[3,2] := '表格演示';
       
方法二：
Business.Model.TSheetDoc(DocViewSL.Doc).Values[3,2] := '表格演示';
       
方法三：
Business.Model.TSheetDoc(DocViewSL.Doc).Cells[3,2].Value := '表格演示';

方法四：
Business.Model.TSheetDoc(DocViewSL.Doc).Cells[3,2].AsString := '表格演示';


其中，[3,2]是单元个的坐标，这个表示第四列第三行（如果有单元格合并，那么以合并后的坐标为准）。

更改单元格的值后，需要刷新文档，文档的刷新需要关闭再打开，不支持使用Refresh，代码参考如下：
DocViewSL.Doc.Close;
DocViewSL.OpenView(TDocMode.dmEdit, DocViewSL);

atiger

参考代码：
Var
  lSheet: Business.Model.TSheetDoc;
begin
  lSheet := TSheetDoc(DocView1.Doc);
  lSheet.Cells[4,3].Font.Size := 15;  //设置字体大小
  lSheet.Cells[4,3].Font.Color := Graphics.clRed; //设置字体颜色
  lSheet.Cells[4,3].AsString := '变成红色';  //给单元格赋值
  DocView1.Doc.Close;
  DocView1.OpenView(TDocMode.dmEdit);
end;