( ゚Д゚)ノ Delギコ猫のプログラミング相談室part2

このエントリーをはてなブックマークに追加
50デフォルトの名無しさん
有益になるように、きちんとしたまとめを書きましょう。

■SaveDialog 問題結論
SaveDialog1 の Filter に

TXT|*.txt|HTML|*.html|CSV|*.csv

を指定。OverwritePrompt を True 、
DefaultExt txt に指定
TypeChange イベントに以下のコードを。

with SaveDialog1 do
 case FilterIndex of
  1: DefaultExt:='txt';
  2: DefaultExt:='html';
  3: DefaultExt:='csv';
 end;

これで、選択中のフィルタに応じた上書き確認が出る。