procedure TFrm_setup.FlatButton1Click(Sender: TObject);
begin
flatlistbox1.Items.Add(''+flatedit1.text+'');
flatlistbox1.Items.SaveToFile(strRoute);
end;
//向文本添加文字信息,strRotue为变量
之后我调用文本
FlatDBComboBox3.Items.LoadFromFile('*.txt');
提示不能打开文本为什么呀?路径是对的
begin
flatlistbox1.Items.Add(''+flatedit1.text+'');
flatlistbox1.Items.SaveToFile(strRoute);
end;
//向文本添加文字信息,strRotue为变量
之后我调用文本
FlatDBComboBox3.Items.LoadFromFile('*.txt');
提示不能打开文本为什么呀?路径是对的
我写全了,是不是文件编辑保存,再打开就不行,但是关闭程序,第二次就可以
为什么一定要FlatDBComboBox3.Items.LoadFromFile(ExtractFilePath(Application.ExeName) + 'mess\文化程度设置.txt');才正确呢?
而且出错提示是不能打开mess\文化程度设置.txt表示路径也是正确的呀,请指教!!谢谢!