如何在程序显示以及关闭时在memo中自动打开和保存num. 找免费的进销存软件

财务软件版1楼: 在程序显示以及关闭时在memo中自动打开和保存num.txt，不能出现打开和保存的对话框，代码如何编写？

2楼: 在form1的OnCreate事件:
procedure TForm1.FormCreate(Sender: TObject);
begin
Memo1.Lines.LoadFromFile(＇＇num.txt＇＇);
end;
在form1的OnClose事件:
procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Memo1.Lines.SaveToFile(＇＇num.txt＇＇);
end; 如免费的进销存软件

3楼: 补充楼上一下：
num.txt要指明路径，如：＇＇c:＼num.txt＇＇等。