# SpreadSheet写入

发布时间 2023-03-28 14:06:13作者: Rube's Delphi Blog

dxSpreadSheet

 1 var
 2   AView: TdxSpreadSheetTableView;
 3 begin
 4   AView := dxSpreadSheet1.ActiveSheetAsTable;
 5 
 6   AView.CreateCell(0, 0).AsInteger := 1;
 7   AView.CreateCell(1, 0).AsInteger := 2;
 8   AView.CreateCell(2, 0).AsInteger := 3;
 9 
10   AView.CreateCell(0, 1).AsInteger := 4;
11   AView.CreateCell(1, 1).AsInteger := 5;
12   AView.CreateCell(2, 1).AsInteger := 6;
13 
14   AView.CreateCell(0, 2).SetText('=A1+B1', True);
15 
16   AView.Selection.SelectCell(0, 2);