No.1ベストアンサー
- 回答日時:
TSaveDialogをフォームに配置します。
ボタンを押したときのイベントを作成します。
void __fastcall TForm1::Button1Click(TObject *Sender)
{
…
}
ダイアログの設定を行います。
//デフォルトのファイル拡張子
SaveDialog1->DefaultExt = ".txt";
//ファイルマスク(フィルタ)
SaveDialog1->Filter = "テキストファイル (*.txt)|*.TXT|すべてのファイル (*.*)|*.*";
//ダイアログボックスが開いたときのカレントディレクトリ
SaveDialog1->InitialDir = "C:\\sample"
//ダイアログの外観と動作
SaveDialog1->Options << ofOverwritePrompt << ofCreatePrompt;
//タイトルバーに表示するテキスト
SaveDialog1->Title = "タイトルバーに表示するテキスト";
TSaveDialogのプロパティはマニュアルをご覧ください。
TSaveDialogのExecuteメソッドを呼び、ダイアログを表示します。
Executeメソッドは、ユーザーがファイル名を選択して[保存]をクリックするとtrueを返します。
//ダイアログを表示する
//ユーザーがファイル名を選択して[保存]をクリックするとtrueを返す
if (SaveDialog1->Execute())
{
…
}
TSaveDialogのFileNameプロパティで、選択されたファイル名を取得します。
//選択されたファイルの名前
Edit1->Text = SaveDialog1->FileName;
全体のコードは次のようになります。
void __fastcall TForm1::Button1Click(TObject *Sender)
{
//デフォルトのファイル拡張子
SaveDialog1->DefaultExt = ".txt";
//ファイルマスク(フィルタ)
SaveDialog1->Filter = "テキストファイル (*.txt)|*.TXT|すべてのファイル (*.*)|*.*";
//ダイアログボックスが開いたときのカレントディレクトリ
SaveDialog1->InitialDir = TPath::GetHomePath();
//ダイアログの外観と動作
SaveDialog1->Options << ofOverwritePrompt << ofCreatePrompt;
//タイトルバーに表示するテキスト
SaveDialog1->Title = "タイトルバーに表示するテキスト";
//ダイアログを表示する
//ユーザーがファイル名を選択して[保存]をクリックするとtrueを返す
if (SaveDialog1->Execute())
{
//選択されたファイルの名前
Edit1->Text = SaveDialog1->FileName;
}
}
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) VBA 参照先で選んだファイルをコピーし、出力先に別名で保存したい 8 2022/05/13 20:37
- Windows 10 windowsの回復ドライブや復元ポイントを使用した場合の戻る位置を教えてください。 5 2023/08/19 14:52
- Excel(エクセル) [クイックアクセスツールバー]の設定ファイルの格納場所について、 5 2023/04/21 14:43
- Windows 10 外部ドライブにマウントできない問題について 9 2022/03/22 18:08
- その他(プログラミング・Web制作) IT初心者です 仕事で、vb.netで作成されたdllをvbaで呼び出すプログラムを作成しろと言われ 1 2023/03/27 08:22
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/02/06 13:01
- その他(コンピューター・テクノロジー) batファイルでPCの設定内容やプロパティーを取得したいのですが、コマンド1個で1ファイルとなるのを 2 2022/04/27 15:27
- Visual Basic(VBA) VBAでファイル名を指定して保存するとき 4 2023/03/26 21:55
- Visual Basic(VBA) エクセルのマクロについて教えてください 物件ごとのフォルダを作成してます そのフォルダ内にサブフォル 2 2023/07/02 17:58
- Visual Basic(VBA) VBA★PDFをPDFアプリで印刷しようと思っていますが上手くゆきません 1 2022/06/06 22:04
このQ&Aを見た人はこんなQ&Aも見ています
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
PCに保存していた写真を見られ...
-
同名フォルダを作成し、そのフ...
-
<a href="file:///フォルダ名/...
-
ファイルの作成日時について
-
拡張子をつくる
-
Excelの関数について教えてくだ...
-
aspのファイルからAccessを参照...
-
ExcelVBAでリンク先の対象のフ...
-
OpenFileDialogを使った後にも...
-
ディレクトリーの作成日を得る
-
fprintf関数
-
VBSでメール送信
-
LANでHTMLページにPDFをリンク...
-
Excelファイルの特定のシートを...
-
スマホでHTMLファイルを開いて...
-
メモリマップドファイルは動作...
-
参照元Excelファイルをバックグ...
-
ローカルファイルとクラウド?...
-
Excelで外部のファイルの場所を...
-
秀丸のタグジャンプがうまくで...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
PCに保存していた写真を見られ...
-
Excelの関数について教えてくだ...
-
拡張子をつくる
-
Excelで外部のファイルの場所を...
-
同名フォルダを作成し、そのフ...
-
<a href="file:///フォルダ名/...
-
OpenFileDialogを使った後にも...
-
MkDir パス名が無効です
-
スマホでHTMLファイルを開いて...
-
参照元Excelファイルをバックグ...
-
ExcelVBAでリンク先の対象のフ...
-
VBSでメール送信
-
EXCEL VBAのDir関数について
-
ファイルの作成日時について
-
Mac Excel VBAについて
-
Webページのリンクの貼り方を教...
-
「~$ファイル名.doc」というフ...
-
秀丸のタグジャンプがうまくで...
-
Outlookで添付ファイルの貼り付...
-
OneDriveのドキュメントにある...
おすすめ情報