如果我希望扩展名根据用户选择的不同文件而变动该怎么办呢???比如我在savedialog的filter里设置了两种文件类型,一个是txt,一个是as,如何根据用户选择的文件类型来加上各自的扩展名呢??? 请指点一下,谢谢~
解决方案 »
- Delphi7 地址错误
- 问一弱智问题,如何安装Ehlib??
- 程序运行久了,报虚拟内存不够,
- 如何取得日期类型字段月份?
- 有意者和我联系QQ:191486648,大家一起来讨论和学习DELPHI,软件开发方面。我在软年公司工作,有意者和我联系QQ:191486648
- fastreport 的打印,谁告诉俺,俺就嫁给谁,
- >>>>>>>>>>强烈要求csdn提供李维大陆之行的录像下载!!!!!!!!!!
- 这个函数应该怎样写?(不够以后再加分) 最好马上有!!!!!
- 哪里有斑马(zebra)条码打印机的汉字输出函数或控件??(所有分送出!!)
- pChar 和 String的区别。请详细一点,行吗?
- 转换问题
- strtodatetime(ontime)<>StrToDateTime('1900-01-01')為什麼出錯??
1: strFileName := SaveDialog1.FileName + '.Txt';
2: strFileName := SaveDialog1.FileName + '.AS';
3: ....
end;
获得文件扩展名myext,尔后在程序中设置savedialog的filter属性为'*'+myext,
再取用户所输入的文件名与myext合起来存就可以了.
自己判断文件名,必要时修改
2:
if extractfileext(op.filename)<>'txt' then
savename:=changefileext(op.filename,'.txt');