随笔 - 7  文章 - 0 评论 - 0 阅读 - 1749
< 2025年3月 >
23 24 25 26 27 28 1
2 3 4 5 6 7 8
9 10 11 12 13 14 15
16 17 18 19 20 21 22
23 24 25 26 27 28 29
30 31 1 2 3 4 5

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);
复制代码

 

posted on   Rube's Delphi Blog  阅读(91)  评论(0编辑  收藏  举报
相关博文:
阅读排行:
· TypeScript + Deepseek 打造卜卦网站:技术与玄学的结合
· Manus的开源复刻OpenManus初探
· AI 智能体引爆开源社区「GitHub 热点速览」
· 三行代码完成国际化适配,妙~啊~
· .NET Core 中如何实现缓存的预热?
点击右上角即可分享
微信分享提示