如何用记事本方式打开一个*.txt文件(50分)

  • 主题发起人 主题发起人 terry_lzs
  • 开始时间 开始时间
T

terry_lzs

Unregistered / Unconfirmed
GUEST, unregistred user!
   我想打开一个*.txt文件,可以直接看里面的内容的,谢谢。
 
memo1->lines->loadfromfile(filename)
 
form1上放个memo.<br><br>procedure TForm1.Button1Click(Sender: TObject);<br>var<br>&nbsp; F: TextFile;<br>&nbsp; S: string;<br>begin<br>&nbsp; AssignFile(F, 'c:/a.txt');<br>&nbsp; Reset(F);<br>&nbsp; while not Eof(F) do begin<br>&nbsp; &nbsp; Readln(F, S);<br>&nbsp; &nbsp; Memo1.Lines.Add(s);<br>&nbsp; end;<br>&nbsp; CloseFile(F);<br>end;<br>
 
关连一下<br>我的电脑-查看-文件夹-文件类型-新建类型<br>。。。。<br>慢慢看。<br><br>
 
&gt;&gt;如何用记事本方式打开一个*.txt文件<br><br>uses shellapi;<br><br>ShellExecute(Handle, 'Open', 'notepad', 'c:/a.txt', '',SW_ShowNormal);<br>
 
呵呵,乱套了,应该够了吧
 
WinExec("notepad c:/a.txt",SW_SHOW);
 
用api:<br>&nbsp; &nbsp;shellexecute(0,nil,pchar(filename),nil,nil,sw_normal);
 
g:menxin<br>&nbsp; &nbsp; ShellExecute(Handle, nil,'notepad','TXTFileName', 'C:/', SW_SHOWNORMAL);
 
五花八门,样样齐全。<br>
 
请看清题目!!!<br>如何用记事本方式打开一个*.txt文件?<br>请跟我来:)<br>开始-&gt;程序-&gt;附件-&gt;记事本-&gt;文件-&gt;打开-&gt;选择一个(.TXT)文本文件按打开-&gt;OK!<br>你可以直接看里面的内容的!!!^j^<br>搞笑!!!
 
呵呵,这个??也算??<br>将鼠标移至文件上,按住shift,同时鼠标右击,选择打开方式,然后选择notepad<br>打开即可<br>呵呵,这个更搞笑了!
 
to 各位大虾:<br>&nbsp; &nbsp;不要这样,大家都是来学习的嘛,总有知多知少的区别!<br>再简单的问题,也应该好好回答嘛!<br>&nbsp; <br>to terry_lzs:<br>&nbsp; &nbsp;用如上的WinExec,ShellExecute等,都可以达到你的要求!<br>&nbsp; &nbsp;或者自己作个NOTEPAD
 
ShellExecute(Handle, 'Open', 'notepad', 'c:/a.txt', '',SW_ShowNormal);<br><br>记得在uses中加上shellapi
 
呵呵,来这里混了那么久,终于给我看到一个会的的了。要不要分都没关系了,让我<br>答个痛快吧!<br><br>shellexecute(0, 'Open',pchar( 'notepad'), pchar('*.txt'), '',sw_show);<br>WinExec("notepad *.txt",sw_show);<br><br><br><br>
 
多人接受答案了。
 
后退
顶部