学用 TStringGrid [1] - ColCount、RowCount、Cells

本例功能:
1、获取 StringGrid 的行数、列数;
2、给单元赋值.

运行效果图:

//示例代码:
unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls, ExtCtrls, Grids;typeTForm1 = class(TForm)StringGrid1: TStringGrid;Panel1: TPanel;Button1: TButton;Button2: TButton;procedure Button1Click(Sender: TObject);procedure Button2Click(Sender: TObject);end;varForm1: TForm1;implementation{$R *.dfm}{显示列数与行数}
procedure TForm1.Button1Click(Sender: TObject);
varcCount,rCount: Integer;
begincCount := StringGrid1.ColCount; {获取总列数}rCount := StringGrid1.RowCount; {获取总行数}Text := Format('总列数: %d; 总行数: %d', [cCount, rCount]); {显示在标题}
end;{给每个单元赋值}
procedure TForm1.Button2Click(Sender: TObject);
varc,r: Integer;
beginfor c := 0 to StringGrid1.ColCount - 1 dofor r := 0 to StringGrid1.RowCount - 1 doStringGrid1.Cells[c,r] := Format('%d,%d', [c,r]);
end;end.

转载于:https://www.cnblogs.com/del/archive/2008/03/04/1090799.html

学用 TStringGrid [1] - ColCount、RowCount、Cells相关推荐

学用 TStringGrid [7] - ColWidths[0]、RowHeights[0]、GridLineWidth
本例效果图: unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, F ...
博客总目录(2007.11.12 - 2010.4.25)
如果我的学习记录和历程能对你有所帮助, 我非常高兴; 但是 -- "万一" 不是高手.更不是大师, 只是利用工作之余学点东西, 并感觉学得挺吃力. 内容都是写时才会, 难免稚嫩, ...
linux new date差8个小时,new date() 在Linux下引起的时间差问题
java工程部署到Linux时,使用new date()获取的时间出现时间差,通过查阅资料,发现有可能是服务器时间设置问题,JVM问题,jdk问题: 1.服务器时间设置问题: 正确的时间显示有 CS ...
Delphi TStringGrid 类（1）
1.TStringGrid [1] - ColCount.RowCount.Cells cCount := StringGrid1.ColCount; {获取总列数} rCount := String ...
Aspose.Cells使用总结大全
使用到 Aspose.Cells 插件,整理一下. 一:新建解决方案,目录如下目录说明: Program.cs - 入口类 ExcelGenerator.cs - Aspose.Cells 操作类 ...
使用Aspose.Cells组件生成Excel文件列宽度自适应时出错：Column width must be between 0 and 255...
错误提示:Column width must be between 0 and 255 出错处: /// <summary> /// 设置表页的列宽度自 ...
自己编写的excel操作过程
新建一个自己定义的类.如YFCExcel类 //报表类 YFC 2020.4.17日增加 /* * 需要增加引用 system.management ,microsoft.offi ...
优秀开源项目：MyXls
如果从快速生成Excel报表,不调用Excel组件角度讲,MyXls可能是一种最好的选择之一,当然使用Open Xml方式也是不错的选择.MyXls是一个用C#语言开发的生成Excel报表的优秀开源项 ...
【原】winform高效导出Excel带格式设置
参考网上的方法修改,1000条记录导出只要3S(1GRDM,C2.8CPU). 1.项目添加excel对象类库的引用,Microsoft Excel 11.0 object library(不同版本的 ...

学用 TStringGrid [1] - ColCount、RowCount、Cells

学用 TStringGrid [1] - ColCount、RowCount、Cells相关推荐

最新文章

热门文章