写了一个类似于记事本一样的程序,Memo里面的文字保存的文件后缀是.bos,也指定了文件后缀是.bos的文件的打开方式是这个程序,可是通过双击*.bos文件后只会运行程序,请问怎么把*.bos文件里面的内容加载到程序的Memo中呢?

解决方案 »

  1.   

    procedure TForm1.FormCreate(Sender: TObject);
    var
      filename:string;
    begin
      if paramCount>=1 then
      begin
        filename:=paramStr(1);
        if fileExists(filename) then
          memo1.Lines.LoadFromFile(filename);
      end
    end;
      

  2.   

    上面的就是代码啊。Delphi应用程序有两个默认的参数,一个是 paramCount 用来表示程序所带的参数的个数,另一个是 paramStr 字符串数组,用来表示命令行参数。
    选择菜单 run>parameters... 可以打开参数设置对话框,可以在调试程序时指定参数。对于上面的例子,你可以在 对话框的 parameters 后面填入 c:\autoexec.bat ,则程序启动是自动打开 autoexec.bat 文件。
      

  3.   

    keke偶的脸皮比上面的差了点,所以我才三个角,:)
      

  4.   

    查看注册表的键值:emEditor.txt\shell\open\command"D:\Program Files\EmEditor3\EMEDITOR.EXE" "%1"在我的机器上txt文件被关联到 emeditor.注意后面有个参数 %1.
      

  5.   

    goomoo(古木) 把这个问题包下来了。