掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
TStringGridについて (ID:3423)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
昨日に続きまたまた宜しくお願い致します。 StringGrid1（RowCount:=3）の、あるRows（i行目）をダブルクリックして各Cellsに格納されている文字列を取り出し、Edit1.Textに表示させようとしているのですが、下記のコーディングで実行するとRows0からRows3までの各Cellsに格納されている文字列全てがEdit1.Textに表示されてしまいます。 procedure TForm1.StringGrid1DblClick(Sender: TObject); var i: Integer; s:string; begin s := ''; for i := 1 to StringGrid1.RowCount do begin if i<> 0 then s := s + ' '; s := s + StringGrid1.Rows[i].Text; end; Edit4.Text := s; end; 図で表すと・・・ aaa sss ddd zzz xxx ccc qqq www eee ←このRowsをダブルクリックした場合 yyy uuu iii Edit1.Textに qqq www eee を表示させたいです。 どなたか、ご教授下さい。m(_ _)m
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.