使用delphi制作记事本时遇到的问题
制作记事本时遇到的问题
打开文件 的组件的代码如下：
procedure TForm1.N3Click(Sender: TObject);
begin
Form1.dlgOpen1.Execute;
form1.mmo1.Lines.LoadFromFile(Form1.dlgOpen1.FileName);
end;
以上代码可以实现打开。txt文件，但是我发现，如果我在打开文件的界面不选择要打开的文件，而是选择“取消”按钮的话，出现如下错误提示
connot open file"".文件名、目录名或卷标语法不正确 if Form1.dlgOpen1.Execute then
Form1.mmo1.Lines.LoadFromFile(Form1.dlgOpen1.FileName);
当然，最好先判断下Form1.dlgOpen1.FileName是否为空，再决定是否载入文本
页:
[1]