全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:918
推到 Plurk!
推到 Facebook!

如何打开一个文本文件

答題得分者是:cashxin2002
ntjrr
高階會員


發表:240
回覆:312
積分:110
註冊:2005-04-24

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-06-05 10:14:34 IP:222.184.xxx.xxx 未訂閱
我想实现这样一个功能,点击某菜单或按钮就跳出一个文本文件,就相当于打开了一个文本文件一样。不知道怎么实现呢?我看到别人有的安装目录里有那个文本文件预装在那,有的安装目录里找不到文本文件的,但是点菜单后又有文本文件跳出来的。我希望是后者,这样省得有太多的文件要打包到安装目录下。谢谢!
------
我的编程起步于ktop,我将永远支持ktop
wameng
版主


發表:31
回覆:1336
積分:1188
註冊:2004-09-16

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-06-05 10:47:37 IP:61.31.xxx.xxx 未訂閱
把文件打包到 Resouce (*.Res) 在到程式中載入資源。即可。 ~~~~~~~~~~~ 難得聰明,常常糊塗。 ~~~~~~~~~~~
ntjrr
高階會員


發表:240
回覆:312
積分:110
註冊:2005-04-24

發送簡訊給我
#3 引用回覆 回覆 發表時間:2005-06-05 12:34:35 IP:222.184.xxx.xxx 未訂閱
方法我听懂了,但不懂实际如何操作,要不前辈就告诉我一个简单的那种方法吧,我把文本文件一起打包到安装目录里,到时点菜单就等于打开那个安装目录下的文本就行了。代码如何写,直接写xxx.text open?
------
我的编程起步于ktop,我将永远支持ktop
Stallion
版主


發表:52
回覆:1600
積分:1995
註冊:2004-09-15

發送簡訊給我
#4 引用回覆 回覆 發表時間:2005-06-05 12:44:13 IP:211.22.xxx.xxx 未訂閱
將檔案放入EXE中的作法,下列連結是BCB的,你應該看得懂!
cashxin2002
版主


發表:231
回覆:2555
積分:1937
註冊:2003-03-28

發送簡訊給我
#5 引用回覆 回覆 發表時間:2005-06-06 09:15:25 IP:202.62.xxx.xxx 未訂閱
您好﹗    包裝程式的過程應該沒有問題吧﹐小弟是使用Delphi中附帶的InstallShield來包裝程式﹐在您的包裝過程中﹐新建一個目錄(如TEXT)﹐然后把您的文本檔案放在這個TEXT目錄中﹐以下連接中有些此方面的說明﹒ 程式碼的部分﹐使用如下﹕
uses ShellAPI //先要引用ShellAPI單元
Var
  PathTemp: String;
begin
  PathTemp := ExtractFilePath(Application.ExeName)+'TEXT\檔案名稱';
  ShellExecute(handle, 'Open', PChar(PathTemp), Nil, Nil, SW_SHOWNORMAL);
end;
================================= 有空來瞅瞅我﹗因為我是您的朋友﹐有您真好﹗ ================================
------
忻晟
系統時間:2024-06-26 20:53:19
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!