刀 刀剑如梦 Unregistered / Unconfirmed GUEST, unregistred user! 2003-04-17 #1 我用RichEdit组件写了一个记事本程序，当中设置了文本文件关联后，双击关联文件后能运行我写的程序，但并没有打开此文本文件。特向各位仁兄请教！！！[?]
Z zhliangming Unregistered / Unconfirmed GUEST, unregistred user! 2003-04-17 #2 可响应Form的OnCreate事件装载文件。 //取得文件名并装载文件 if ParamStr(1) <> '' then begin FileName := ParamStr(1); RichEdit1.Lines.LoadFromFile(FileName); end;
可响应Form的OnCreate事件装载文件。 //取得文件名并装载文件 if ParamStr(1) <> '' then begin FileName := ParamStr(1); RichEdit1.Lines.LoadFromFile(FileName); end;
A apacheii Unregistered / Unconfirmed GUEST, unregistred user! 2003-04-19 #3 procedure TForm1.FormCreate(Sender: TObject); var Filename:string; begin if system.ParamCount<>0 then if system.ParamStr(1)<>'' then begin Filename:=ParamStr(1); RichEdit1.Lines.LoadFromFile(FileName); end; end;
procedure TForm1.FormCreate(Sender: TObject); var Filename:string; begin if system.ParamCount<>0 then if system.ParamStr(1)<>'' then begin Filename:=ParamStr(1); RichEdit1.Lines.LoadFromFile(FileName); end; end;
刀 刀剑如梦 Unregistered / Unconfirmed GUEST, unregistred user! 2003-04-21 #4 我现在又遇到打开文件如果有空格的文件夹或文件名时，都不能正常运行，请楼上两位仁兄帮忙！！！
