delphi 中 stringgrid标题栏怎么写入文字
展开全部
首先你要知道StringGrid的几个属性:
FixedCols:固定列数
FixedRows:固定行数
RowCount:行数
ColCount:列数
你把FixedCols设置成0,FixedRows设置成1,RowCount设置成3,ColCount设置成5。
这样就是有0个固定列,1个固定行,总共3行5列。其中FixedRows一般作为标题行使用。
给标题行赋值的语句跟操作其他Cell的方法一样:
StringGrid1.Cells[0,0]:= 'Field1';
StringGrid1.Cells[1,0]:= 'Field2';
FixedCols:固定列数
FixedRows:固定行数
RowCount:行数
ColCount:列数
你把FixedCols设置成0,FixedRows设置成1,RowCount设置成3,ColCount设置成5。
这样就是有0个固定列,1个固定行,总共3行5列。其中FixedRows一般作为标题行使用。
给标题行赋值的语句跟操作其他Cell的方法一样:
StringGrid1.Cells[0,0]:= 'Field1';
StringGrid1.Cells[1,0]:= 'Field2';
展开全部
必须定义一个全局变量比如 stri:integer
Timer的Interval设1000 一秒
stri:=1;
在Timer事件中写入
if stri=1 then
Image1.LoadFormFile:='第1个图片路径';
if stri=2 then
Image1.LoadFormFile:='第2个图片路径';
if stri=3 then
Image1.LoadFormFile:='第3个图片路径';
if stri=4 then
Image1.LoadFormFile:='第4个图片路径';
if stri=5 then
Image1.LoadFormFile:='第5个图片路径';
stri:=stri+1;
if stri>5 then
stri:=1;//重复执行
Timer的Interval设1000 一秒
stri:=1;
在Timer事件中写入
if stri=1 then
Image1.LoadFormFile:='第1个图片路径';
if stri=2 then
Image1.LoadFormFile:='第2个图片路径';
if stri=3 then
Image1.LoadFormFile:='第3个图片路径';
if stri=4 then
Image1.LoadFormFile:='第4个图片路径';
if stri=5 then
Image1.LoadFormFile:='第5个图片路径';
stri:=stri+1;
if stri>5 then
stri:=1;//重复执行
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询