学用 TStringGrid [3] - Cols、Rows
来源:互联网 发布:手机有声阅读软件 编辑:程序博客网 时间:2024/06/05 04:18
须知: TStringGrid 的每行、每列都是一个 TStrings 对象.
本例功能:
1、分别按列与行修改;
2、分别按列与行读取
运行效果图:
本例功能:
1、分别按列与行修改;
2、分别按列与行读取
运行效果图:
//本例代码:unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ExtCtrls, Grids;type TForm1 = class(TForm) StringGrid1: TStringGrid; Panel1: TPanel; Button1: TButton; Button2: TButton; Button3: TButton; Button4: TButton; procedure Button1Click(Sender: TObject); procedure Button2Click(Sender: TObject); procedure Button3Click(Sender: TObject); procedure Button4Click(Sender: TObject); end;var Form1: TForm1;implementation{$R *.dfm}{按列赋值}procedure TForm1.Button1Click(Sender: TObject);var List: TStrings;begin List := TStringList.Create; List.CommaText := 'aaa,bbb,ccc,ddd'; StringGrid1.Cols[0] := List; StringGrid1.Cols[1] := List; List.Free; (Sender as TButton).Caption := '按列赋值';end;{按行赋值}procedure TForm1.Button2Click(Sender: TObject);var List: TStrings;begin List := TStringList.Create; List.CommaText := '111,222,333,444'; StringGrid1.Rows[0] := List; StringGrid1.Rows[1] := List; List.Free; (Sender as TButton).Caption := '按行赋值';end;{按列取值}procedure TForm1.Button3Click(Sender: TObject);var List: TStrings;begin List := StringGrid1.Cols[StringGrid1.Col]; {当前列} ShowMessage(List.Text); (Sender as TButton).Caption := '按列取值';end;{按行取值}procedure TForm1.Button4Click(Sender: TObject);var List: TStrings;begin List := StringGrid1.Rows[StringGrid1.Row]; {当前行} ShowMessage(List.Text); (Sender as TButton).Caption := '按行取值';end;end.
- 学用 TStringGrid [3] - Cols、Rows
- 学用 TStringGrid [3] - Cols、Rows
- 学用 TStringGrid [1] - ColCount、RowCount、Cells
- Mat 里面的 cols 和 rows
- opencv 部分函数的cols,rows顺序
- 学用 TStringGrid [2] - DefaultColWidth、DefaultRowHeight、Col、Row
- frameset元素的cols及rows属性(转)
- 把一张图片裁切为rows行,cols列
- frameset中rows与cols取值方法
- opencv 中x,y,height, width,rows,cols 的关系
- HTML <frameset> 标签的 cols 属性和 rows 属性
- HTML <textarea> cols, rows属性和宽度高度关系研究
- 笔记:textarea cols,rows属性和宽度高度关系
- opencv error:assertion failed<src.cols>0&&src.rows>0>in unknown function
- imageROI = image(Rect(700, 200, logo.cols, logo.rows));异常崩溃问题
- HTML中的多行输入框:<textarea>标签、cols属性、rows属性。
- OpenCV学习笔记(20)关于opencv新版本中rows和cols的理解
- 不再纠结OpenCV图像中的x,y;width,height;cols,rows
- python: 理解 __getattr__, getattr ,
- php面向对象(二)
- java.net.SocketException: Permission denied
- 用C语言写CGI入门教程
- POJ 3264 RMQ模版
- 学用 TStringGrid [3] - Cols、Rows
- VB6.0打开工程是提示控件加载错误
- Android training(1)-Building a Dynamic UI with Fragments(用碎片创造一个动态的UI)(C)
- 创建静态库和动态库(总结)
- 模拟电视机在2015年会被全面淘汰吗?
- 数据结构与程序设计-编程原则
- JavaScript贪吃蛇(一)
- cocos2d游戏开发常用工具集
- 程序员的困境——说的很好,转载留存