掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
Tstringsの上書きを防止するには？ (ID:12380)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
Tstringsの配列(texs)を作り、Button1個と,Edit1個,用意している状況で ボタン1を押せば ・texs[ intToStr(Edit1.Text) ]にMemo1の内容を挿入 というようにしようとしているのですけれども、 例えば texs[2]に内容を保存しようとすると、その前に入力したtexs[0],texs[1]の文字列も先ほど挿入しようとした文字列に変わってしまいます というよりも、Memo1の内容を変えただけで、それ以前に挿入してあった文字列の内容がすべてMemo1の内容に更新されてしまいます とても説明がわかりにくいかと思います。これ以上ちゃんとした説明はできないですが、どんなことでも質問していただければ答えますので。 ソースの一部を載せておきます、といってもほとんど無意味でしょうが。 --------------------------------------------------------------------- private { Private 宣言 } texs : array[0..100]of Tstrings; //省略 procedure TForm1.Button1Click(Sender: TObject); begin texs[ StrToInt(Edit1.Text)] := Memo1.Lines; end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.