掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
文字列の置き換え (ID:16815)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
anoneさんが居るのでこっちも!! たぶん、判らないと思いますので、こんな感じです。 -------------------------------------------------------------------- procedure TForm1.Button1Click(Sender: TObject); var SL:TStringList; begin SL := TStringList.Create; SL.LoadFromFile('d:\sample.txt'); SL.text:=StringReplace(SL.text,edit1.text,edit2.text,[rfReplaceAll]); SL.SaveToFile('d:\sample.txt'); SL.Free; end; --------------------------------------------------------------------- こっちだったらどうしよぉ〜(^_^;) --------------------------------------------------------------------- procedure TForm1.Button1Click(Sender: TObject); var SL: TStringList; begin SL := TStringList.Create; SL.add(edit1.text); SL.SaveToFile('d:\sample.txt'); SL.Free; end; --------------------------------------------------------------------- StringListを覚えた時が１番楽しかったです。 後は、配列を覚えると楽しさ倍増です。
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.