Delphi StringGrid使用全书1
发布: 2008-5-19 10:19 | 作者: 不详 | 来源: Blog - 风之谷 | 查看: 472次 | 进入软件测试论坛讨论
begin
// Get number of columns
Readln(f, iTmp);
ColCount := iTmp;
// Get number of rows
Readln(f, iTmp);
RowCount := iTmp;
// loop through cells & fill in values
for i := 0 to ColCount - 1 do
for k := 0 to RowCount - 1 do