>>24
テキストファイルをメモリに読むには TStringListを使うとよいでしょう
　フォームの定義部に
private
FDicText:TStringList;
と追加します。

フォームの イベント OnCreate に
FDicText:=TStringList.Create;
としてインスタンスを作成しましょう。
テキストの読み込みは
FDicText.LoadFromFile( 'ファイル名'); です。
　忘れずに OnDestroyで
　FDicText.Free; と解放させるようにしましょう。

あとはランダムにテキストを表示する方法ですが、
　ボタンを貼り付け、ボタンのイベントで
Caption:=FDicText.Strings[Random(FDicText.Count)];

のようにします。