OpenDialog/SaveDialogの使い方簡単にまとめる
(私的)よく使うのはファイル(.txt、.csv)を開く/なんらかの処理/保存
OpenDialog
画面にOpenDialog、Button、Memoコンポーネントを配置
ファイルの拡張子を指定したい場合は
OpenDialogのプロパティのFilterをクリックして
「ファイルの設定」
ファイル名:テキスト
ファイル:*.txt;*.csv
指定しない場合、全てのファイルが対象となる
procedure TForm1.Button1Click(Sender: TObject);
begin
if OpenDialog1.Execute then
begin
Memo1.Lines.LoadFromFile(OpenDialog1.FileName);
end;
end;
SaveDialog
画面にSaveDialog、Button、Memoコンポーネントを配置
保存する時拡張子が省略された場合、デフォルトの拡張子を指定
OpenDialogのプロパティのDefaultExtで「txt」とする
procedure TForm1.Button1Click(Sender: TObject);
begin
if SaveDialog1.Execute then
begin
Memo1.Lines.SaveToFile(SaveDialog1.FileName);
end;
end;