数据保留小数以及文件存盘的问题 1. 如果是输出显示的话用 Format,如:Format('%.2f',[FloatVar]]);2. RichEdit1.Lines.SaveToFile('Myfile.txt'); 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procedure TForm1.Button19Click(Sender: TObject);begin SaveDialog1.DefaultExt:='txt'; SaveDialog1.Options:=[ofAllowMultiSelect,ofFileMustExist,ofOverwritePrompt]; SaveDialog1.Filter:='Text files (*.txt)|*.txt|All files (*.*)|*.*'; SaveDialog1.FilterIndex:=2; if SaveDialog1.Execute then Memo2.Lines.SaveToFile(SaveDialog1.FileName); end;嘿嘿稍微改动下就可以了 delphi 与sql 的问题 今天遇到的问题真头大,帮我看下谢谢 delphi中把excel的数据逐条导入到数据库中的问题 高分,请教一个简单问题。在线马上结帖。 关于多个相同组件的问题??该如何解决啊?? 怎样访问linux 下的mysql数据库? 想找个erp,财务软件或者hip系统(delphi)源码参考学习``帮忙 倾家荡产求教!!!!!不够以后再加,只能真正解决,高手来吧!!! Pointer(Result)^ 的意思?? 编程——男儿也因当自强!!(网络签名、调查、言志。) 请教一个关于事件触发的问题? 请教delphi中有关事件的问题
begin
SaveDialog1.DefaultExt:='txt';
SaveDialog1.Options:=[ofAllowMultiSelect,ofFileMustExist,ofOverwritePrompt];
SaveDialog1.Filter:='Text files (*.txt)|*.txt|All files (*.*)|*.*';
SaveDialog1.FilterIndex:=2;
if SaveDialog1.Execute then
Memo2.Lines.SaveToFile(SaveDialog1.FileName);
end;嘿嘿稍微改动下就可以了