看不到 预览窗口保存为txt的文件(30分)

看不到 预览窗口保存为txt的文件<br>savedialog1 其 DefaulExt 为*.QRP<br>其Filter 为quickrep files(*.QRP)|*.QRP|text files(*.txt)|*.txt<br><br>保存代码如下：<br>var fileext:string;<br>begin &nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;<br>&nbsp;savedialog1.Filter:='quickrep files(*.QRP)|*.QRP|text files(*.txt)|*.txt';<br>&nbsp; if savedialog1.Execute then<br>&nbsp; begin<br>&nbsp; &nbsp; fileext:=ansiuppercase(extractfileext(savedialog1.FileName));<br>&nbsp; &nbsp; if (SaveDialog1.FIlterIndex &lt;&gt;1) and (quickrep = nil) then<br>&nbsp; &nbsp; &nbsp; &nbsp; &nbsp; &nbsp;Exit;<br>&nbsp; &nbsp; if fileext='.QRP' then<br>&nbsp; &nbsp; begin<br>&nbsp; &nbsp; QRPreview1.QRPrinter.Save(savedialog1.FileName);<br>&nbsp; &nbsp; end;<br>&nbsp; &nbsp;if fileext='.TXT' then<br>&nbsp; &nbsp;begin<br>&nbsp; &nbsp;quickrep.ExportFilter:=TQRAsciiexportfilter.Create(savedialog1.FileName);<br>&nbsp; &nbsp;end;<br>&nbsp; end;<br>end;<br><br>保存为QRP 没有问题 可是保存为txt时 根本看不到保存为txt的文件<br><br>谢谢指点

ding