procedure TForm1.FormCreate(Sender: TObject);
var
i,j:integer;
begin
for i:=1 to 4 do
begin
for j:=1 to 4 do
begin
StringGrid1.cells[i,j]:=inttostr(i,j)
end;
end;
end;
var
i,j:integer;
begin
for i:=1 to 4 do
begin
for j:=1 to 4 do
begin
StringGrid1.cells[i,j]:=inttostr(i,j)
end;
end;
end;
解决方案 »
- 分享快乐免费获取“三星S7230E_3G手机”一部
- 程序如何限制自己本身的CPU和内存占用率?
- 如何用hook实现监视对任意文件的读操作
- edit1中输入的一串数字
- 哪里有正式版的FastReport下载
- 怎样在QUICK REPORT中的DETAIL区中显示字段的多行
- dephi程序得到的数据怎么导出到excel表!!!!
- 使用installshield express的问题:怎样将我的文件安装到特定目录
- 碰到一个简单但稀奇古怪的现象,哪位大侠能解开这个谜,立即加到100分。大侠得90分,其他得给UP的人。先设定总分1分好了。
- delphi中有没有象C语言中静态变量那样的变量
- 一个简单的
- 有没办法得到系统打开的新的窗口
如果是数组又不想自己实现一个排序的话,可以使用TList用来排序,TList.Sort使用了Quick Sort算法,在不是很特殊的情况下性能很不错