S sypoh Unregistered / Unconfirmed GUEST, unregistred user! 2005-02-25 #1 str := OpenDialog1.filename + '如何得到文件类型, 如.txt ?';
S sypoh Unregistered / Unconfirmed GUEST, unregistred user! 2005-02-25 #2 str := OpenDialog1.filename + '如何得到文件类型, 如.txt ?';
2 2days Unregistered / Unconfirmed GUEST, unregistred user! 2005-02-25 #3 ExtractFileExt(OpenDialog1.filename)
S sypoh Unregistered / Unconfirmed GUEST, unregistred user! 2005-02-25 #4 对不起, 应该是SaveDialog1.filename
T Tomtit66 Unregistered / Unconfirmed GUEST, unregistred user! 2005-02-25 #5 if dlgSave.Execute then showmessage(IntToStr(dlgSave.FilterIndex)) //list中类型选项的索引 //:~可用 case dlgSave.FilterIndex of 判断选择的是何种文件类型.
if dlgSave.Execute then showmessage(IntToStr(dlgSave.FilterIndex)) //list中类型选项的索引 //:~可用 case dlgSave.FilterIndex of 判断选择的是何种文件类型.
P plzw Unregistered / Unconfirmed GUEST, unregistred user! 2005-02-25 #6 SaveDialog1.FileName 属性是包含文件后缀名的。
W wyj19802004 Unregistered / Unconfirmed GUEST, unregistred user! 2005-02-26 #7 你的文件来源是什么？ 如果是listbox 则 if savedialog1.exceute then begin listbox.savetofile(savedialog1.filename); end;
你的文件来源是什么？ 如果是listbox 则 if savedialog1.exceute then begin listbox.savetofile(savedialog1.filename); end;
J jiajiajia888 Unregistered / Unconfirmed GUEST, unregistred user! 2005-02-26 #8 ExtractFileExt(SaveDialog1.filename)
