请问怎么清空StringGrid中的内容？(50分)

Y

yesye

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-07

• #1

请问怎么清空StringGrid中的内容？

 

風

風

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-07

• #2

做一個循環，
var i,j:integer;
with StringGrid1 do
for I := 0 to ColCount - 1 do
for J:= 0 to RowCount - 1 do
begin
Cells[I,J] := '';
end;

 

Y

yhaochuan

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-07

• #3

//删除Cells内容，但不包括上面固定的行。
procedure ClearStringGridContent(StringGrid:TStringGrid);
var
i:Integer;
begin
with StringGrid do
begin
for i:= RowCount - 1 DownTo RowCount - 1 - FixedRows do//如果要删除包括上面固定的行，则将 DownTo后的内容改为0
Rows.Text := '';
end;
end;

 

B

bluerain

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-08

• #4

var
i : integer;
begin
for i := Stringgrid1.FixedRow to stringgrid1.RowCount do
stringgrid1.rows.Clear;
end;

 

B

blue girl

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-01-12

• #5

使用循環一個一個的處理,我沒有查到別的方法

 

W

wuyunduo

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-02-07

• #6

我用的方法是改变stringgrid的rowcount为1（若有固定行），然后再改成自已需要的行数，
不知是否适合你用！

 

S

springcat

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-10

• #7

将rowcount改为1不行的，当新增加行的时候，原来的内容还是在那里。

 

D

dfan2000

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-10

• #8

楼顶的三个帅哥 写的源码都可以达到要求。

 

C

CDA

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-10

• #9

var
i : integer;
begin
for i := 0 to stringgrid1.ColCount -1 do
stringgrid1.Cols.Clear;
end;

 

W

WebExplorer

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-16

• #10

其实很简单
用StringGrid.cells[j]就OK

 

Y

yesye

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-05-16

• #11

接受答案了.