ダイアログを開くにはExecuteメソッドを実行します。このメソッドはユーザーがファイルを選択して［開く］をクリックすると true を返します。 ダイアログで選択したファイル名はFileNameプロパティで取得できます。 ダイアログで選択したファイルをMemoに表示する場合、ボタンのOnClickイベントで次のようにコードを記述します。
procedure TForm1.Button1Click(Sender: TObject); begin if OpenDialog1.Execute then begin Memo1.Lines.LoadFromFile(OpenDialog1.FileName); end; end;
