名前 題名 ▼ Mr.XRAYさん > Delphi 2005 + Windows 8.1 の環境で > TSaveDialog のダイアログが表示されないという現象が発生する． > と言うのですが，何か情報ないでしょうか ? > この環境でテストできる状態がないんです． > > 確か，初期ディレクトリの設定が云々というのは見た記憶があるのですが． > > テストコードは以下です． > > procedure TForm21.BitBtn6Click(Sender: TObject); > var > FileName : String; > begin > //ファイル名をセットする > SaveDialog1.FileName := '予定表'; > > //ファイル選択のオープンダイアログを表示 > if (SaveDialog1.Execute = True) then > ShowMessage('File : '+ SaveDialog1.FileName) > else > ShowMessage('Save file was cancelled'); > end; > > SaveDialog1.FileName := '予定表'; > > のコードを削除するとダイアロは表示されるようです． > 少なくても，Delphi XE(UP1) Pro + Windows 7 U64(SP1) では発生しません． > ファイル名の指定があってもなくてもダイアログは表示されます． > > > # メールでの問い合わせのコードをそのまま掲載しています． GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示). (上限122000(120k)バイト) 削除キー Link