TStringGrid clear 問題 |
答題得分者是:Fishman
|
tidal
初階會員 發表:93 回覆:32 積分:25 註冊:2003-07-15 發送簡訊給我 |
|
Fishman
尊榮會員 發表:120 回覆:1949 積分:2163 註冊:2006-10-28 發送簡訊給我 |
Hi tidal, 以下三種方式皆可:
procedure TForm1.BitBtn2Click(Sender: TObject); var I : Integer; begin for i := 0 to StringGrid1.RowCount - 1 do StringGrid1.Rows[I].Clear; end; procedure TForm1.BitBtn3Click(Sender: TObject); var I : Integer; begin for i := 0 to StringGrid1.ColCount - 1 do StringGrid1.Cols[I].Clear; end; procedure TForm1.BitBtn4Click(Sender: TObject); var I,J : Integer; begin for I := 0 do StringGrid1.ColCount - 1 do begin for J := 0 to StringGrid1.ROWCount - 1 do begin StringGrid1.Cells[I,J] := ''; end; end; end;發表人 -
------
Fishman |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |