| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 658 人关注过本帖
标题:通过formshow用opendialog自动打开一个txt文本,怎么实现,求高手
只看楼主 加入收藏
张爷
Rank: 1
等 级:新手上路
帖 子:1
专家分:0
注 册:2011-5-30
结帖率:0
收藏
已结贴  问题点数:10 回复次数:3 
通过formshow用opendialog自动打开一个txt文本,怎么实现,求高手
通过formshow用opendialog自动打开一个txt文本,怎么实现,求高手
2011-05-30 16:41
zin5970
Rank: 3Rank: 3
等 级:论坛游侠
帖 子:29
专家分:195
注 册:2008-10-10
收藏
得分:3 
你要实现什么样的?是弹出选择文本 还是打开已选择的文本的内容
2011-06-01 14:18
小玉儿
Rank: 2
等 级:论坛游民
帖 子:19
专家分:11
注 册:2011-4-23
收藏
得分:3 
在formshow事件里写代码呀! 比如:我的button1click里有打开txt的操作;这个时候在formshow事件里写button1click(sender);就能自动调用打开txt文本,你看是不是这个意思?
2011-06-02 14:54
yuutian
Rank: 7Rank: 7Rank: 7
等 级:黑侠
帖 子:137
专家分:686
注 册:2010-10-27
收藏
得分:3 
没有完全明白你的意思,你是只要打开文件名,还是要打开txt文件并把txt中的内容
读取。
这个你可以参考一下,在formshow下写代码,
    ............
  var
    myfile:textfile;
    s:string;
begin
  if opendialog1.execute then
     edit1.text:=opendialog1.filename;//将打开的wenjian.txt文件名读取到edit中
     assignfile(myfile,'d:\wenjian.txt');//将在d盘中的wenjian.txt文件内容读取到memo中
     reset(myfile);
     while not eof(myfile) do
           begin
           readln(myfile,s);
           memo1.lines.add(s);
           end;
end;

   
  
     
2011-06-05 17:28
快速回复:通过formshow用opendialog自动打开一个txt文本,怎么实现,求高手
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.045394 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved