delphi savediglog多次保存问题
我在用mainmenu菜单控件和savediglog控件设置保存文件对话框时，虽然能够顺利保存文件，但是我对已经保存过的文件进行再次保存的时候，并不能和很多软件一样直接保存，而是仍然弹出保存对话框，而我不想它打开，而是直接保存。要不然这样的话保存与另存为没区别了。
最好还能实现保存过文件，保存按钮为灰色，有改动再变亮这个功能，谁会写这段代码，或者有什么方法，教教我…………急
前面你说的，那得你自己判断，当保存过文件后（就是获得了用户选择的保存路径和文件名）就不要在弹出保存对话框，而是直接保存文件了。
具体代码是什么啊，还有第二个功能怎么实现啊
sFile := SaveDialog1.filename;
if not fileexists(sFile) then
begin
if SaveDialog1.Execute then
begin
... ...
end;
end else begin
//直接保存
end;
3楼的谢了，不过提示出错我原来的代码是：
procedure TForm1.Save1Click(Sender: TObject);
begin
if SaveDialog1.Execute then
wb1.Lines .SaveToFile(SaveDialog1 .FileName);
end;
要是用你这个怎么用
你保存的文件正在使用。
End_rbody_60447841//-->
该回复于2009-10-19 10:44:48被管理员删除
对我有用[0]
丢个板砖[0]
引用
举报
管理
TOP
newfang
(MIC)
等 级：
#7楼 得分：3回复于：2009-10-16 09:35:43
楼主意思不就是不想每次都弹出保存对话框吗？
那就判断要保存的文件是
相关问答：
如题。
感觉如何？交流下。
没有研究过，呵呵
有啥研究头？
那个东西，是个鸡肋，，没有什么意思，发现！！
用来做B/S架构的MIS系统的话应该可以提高界面开发的效率吧？
因为不熟悉Delphi � ......
已知Python 中：
s = unicode("测试", "gb2312")
s = u'\u6d4b\u8bd5'
print s
测试
在Delphi里面如何将\u6d4b\u8bd5这样的还原成Gb2312的汉字呢？
找到个方法
......
delphi 异步线程怎么怎么实现？
请各位大佬帮忙！
最好有个实例！
多谢
你不同步就是异步了,还写啥
默认情况下，线程就是异步的…………*^_^*
估计楼主同步和异步概念都没弄清
真无语。。可 ......
两个月前，开始招聘Delphi程序员，招聘前随手写了几道题，用来笔试。
到现在还没有招到人，很无奈，标准甚至降到只要能做第1、3、5题就录用的水平。结果竟然没有人能够将这3题都答对。很多人连str ......
