掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
関数でTStringListを返すには (ID:45695)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
初めまして。久しぶりに書き込みます。 deldelさんの方法と似ていますが、 自分の場合、以下の方法で多用しています。 (以前に必要に迫られて以下の方法にたどり着いたのですが、 この自分の方法が正しいかどうかは判りません。) function strlst:Tstringlist; var i:integer; begin strlst := TStringList.create; for i:= 0 to 10 do begin strlst.Add(inttostr(i)); end; end; procedure TForm1.Button1Click(Sender: TObject); begin memo1.Lines.Text := strlst.Text; strlst.Free; end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.