我用savedialog1怎么保存的文件没有后缀名呢

代码如下：
if(Form1->SaveDialog1->Execute())
     {
Form1->Lfilepath->Caption=ExpandFileName( Form1->SaveDialog1->FileName);
        huffile =Lfilepath->Caption;
    iFileHandle = FileCreate(huffile);
        if(iFileHandle==-1)
        {ShowMessage("创建文件失败");}

    FileClose(iFileHandle);
               }

在FormCreat中的相关语句是:
{Form1->SaveDialog1->Title="请选择保存路径";
Form1->SaveDialog1->InitialDir="c:\\windows";
Form1->SaveDialog1->Filter="霍夫曼编码文件 (*.huf)|*.huf";}
弹出保存文件对话框，保存以后得到的文件看不到后缀名，应该怎么解决呢？？？

8 个解决方案

#1

up!

#2

1.Form1->SaveDialog1->FilterIndex=1; //你也許沒有指定擴展名，所以保存後也沒有擴展名。

2.把SaveDialog的DefaultExt屬性設為你要保存的默認擴展名
3.或者在寫文件的代碼之前加入:
AnsiString fname=ChangeFileExt(Form1->SaveDialog1->FileName,".huf");
....SaveToFile(fname);

#3

沒有注意到你的代碼,你不是調用SaveToFile這樣現成的函數，可以用第三種方法

#4

2.把SaveDialog的DefaultExt屬性設為你要保存的默認擴展名

#5

DefaultExt = huf 就可以了

#6

说得对。

#7

同意楼上的说法。

#8

可能跟你的系统设置有关。

打开我的电脑，在工具 | 文件夹选项菜单的查看页中不选中隐藏已知文件类型的扩展名选项试试。

#1

up!

#2

#3