小妹想问如何程序启动时自动访问一个默认的文件

Question

请问如何实现访问一个默认路径下的文件,不用任何提示,自动访问;
例:C\AA.TXT文件
要示不用OPENDIALOG,没有提示,自动访问
谢了!!!!

Answer 1

直接指定完整的文件名(带路径)，然后直接访问就可以了
不用用户选定文件，不用OPENDIALOG

Answer 2

up楼主是不是以为只有用opendialog才能访问文件?opendialog只是获得一个文件路径.不用opendialog你也可以,直接指定文件路径.

Answer 3

不很清楚,请问怎么指,可不可以说一个EXAMPLE!!!

Answer 4

uses inifiles;
var
  mypath:string;
  myfile:TFileStream;
begin
  mypath:=extractfilepath(application.exename)+'\aa.txt'
  myfile:=TFileStream.create(mypath);
  ...
  myfile.free;
end;

Answer 5

难道说,你不了解Delphi中最基本的文件读写机制啊?围绕file类型的各种函数和过程?帮助里都有啊,看看就好了.在启动时访问,可以把这部分代码放在主窗口的OnCreate事件处理过程里,或者,干脆放在.dpr文件的program ...后边的begin...end里好了.

Answer 6

我的还没说清楚,就是找到这个文件以后,自动读取里面的数据,我用
OPENDIALOG很容易做,但是自动找,不会,
经过大家的提示
还是
不会, 再说一下吧!!!1

Answer 7

var
infile:textfile;
fname,instring:string;
begin
fname:='C:\AA.txt';
assignfile(infile,fname);
reset(infile);
readln(infile,instring);
label1.Caption:=instring;
closefile(infile);
end;
//assignfile建立一个文件句柄，reset()为读打开一个文件，readln读出文件中的一行，赋给instring,然后显示在label1上，最后用closefile()关闭文件。
明白了么？

Answer 8

我没有想到用fname:='C:\AA.txt';
其实后面的我都能可以,谢了!!!!