delphi问题。
while not adoquery1.Eof do
begin
for i:=0 to adoquery1.FieldCount-8 do
StringGrid1.Cells[i+1,StringGrid1.RowCount]:=adoquery1.Fields[i].AsString;
StringGrid1.RowCount:= StringGrid1.RowCount+1;
adoquery1.next;
end;
for i:=0 to StringGrid1.RowCount -1 do
StringGrid1.Cells[0,i+1]:=inttostr(i+1);
这是我对stringgrid的显示代码,现在怎么显示一行空白一行。比如第一行有显示数据,第二行为空,第三行显示数据,第四行为空。还有怎么把那些有显示数据的行全部改为同一个名称。谢谢各位大虾了。
答案:建议先按数据行数设置好GRID的行数,然后再用循环进行逐行赋值。
其他:在此处定义该函数。delphi需要先声明,才能写函数。
private
function browsedialog(const Title:=string; const Flag: integer):string;
public
end;
private和public下都可以声明该函数
上一个:delphi XE如何开发web程序,求好建议~~
下一个:为什么我的电脑装不了delphi2010