delphi - cxGrid を Excel にエクスポートして、SaveDialog ウィンドウにファイルの種類が表示されない

Question

これは大きな問題ではありませんが、何か間違っているかどうかを知りたいです。

Delphiフォームにcxgridがあり、ボタンをクリックするだけでExcelにエクスポートできます。

コード：

TfrmMain.ExcelButtonClick(Sender: TObject);
begin
  with SaveDialog do
  begin
    Filter := '*.xls';
    if Execute
      then ExportGridToExcel(SaveDialog.FileName,Grid,TRUE,TRUE,TRUE,'xls');
  end;
end;

保存ダイアログ ボックスが表示されると、[ファイルの種類]が空白で、ファイル拡張子が表示されません。

他に何かする必要がありますか？

どんな助けでも大歓迎です。

ありがとう、