with SaveDlg1 do
case FilterIndex of
0: DefaultExt := .QR;
1: DefaultExt := .TXT;
2: DefaultExt := .HTM;
3: DefaultExt := .CSV;
end;
end;
end.//end of Unit
以上程序在WindowsNT4.0中文版(ServicePack3)，Delphi3.0环境下调试通过。
自定义快速报表的打印预览窗口
来源：互联网
作者：西部数码
时间：2008-04-09
西部数码-全国虚拟主机10强！40余项虚拟主机管理功能,全国领先!双线多线虚拟主机南北访问畅通无阻!免费赠送企业邮局,.CN域名,自助建站480元起,免费试用7天,满意再付款! P4主机租用799元/月.月付免压金!
with SaveDlg1 do
case FilterIndex of
0: DefaultExt := .QR;
1: DefaultExt := .TXT;
2: DefaultExt := .HTM;
3: DefaultExt := .CSV;
end;
end;
end.//end of Unit
以上程序在WindowsNT4.0中文版(ServicePack3)，Delphi3.0环境下调试通过。
文章整理：西部数码--专业提供域名注册、虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢!
