delphi 保存文件到程序目录

YL_SaveFileName

:=

ExtractFilePath(Application.ExeName)

+

'YL_'

+

FlatEdit1.Text

+

'_'

+

strDateTime

+'.dat'

SaveChartToFile(YL_Chart,

YL_SaveFileName)

将当前程州禅序

Chart生成的图做孝像保存纯迹稿在当前目录下，并命名了

不太清楚你想要哪种效果。

如果保存文件时，你不需要用户输入文件名字，可以不给用户提供 输入文件名卜肢斗 界面，直接保存。

如果保存文件时，用户可以输入文件名字，但你可能想提供一个型磨缺省名字，通常是设置保饥迹存文件对话框控件的相关属性。

---