文本文件使用时的几个小问题(50分)

天

天空4567

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-07

• #1

在文本文件的操作中：
1、文本文件中第一个数据位置是0还是1？
2、如何根据某文本文件名及在文本文件里固定的位置查找数据？
3、定位完后，怎样把已赋值的变量写到文本文件中固定的位置？

 

D

dcs_dcs

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-07

• #2

I TOO

 

天

天空4567

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-07

• #3

有哪位高手请指点一下。急

 

新

新世纪

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-07

• #4

很简单的问题, 但我怎么给你说呢?
这些都是计算机基础的知识, 虽然简单, 但一下子也很难说明白的,
有个简单的办法: 你使用Hex编辑器(例如: UltraEdit等)打开一个文本文件, 按Hex显示看看;
还有就是: 编程序之前必须理解位(bit)、字节(byte)、字(word)....等等概念...
至于文件读写, 也是数据处理的最基本的东西,

 

天

天空4567

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-08

• #5

理论是没问题。但我需要的是代码。
对高手而言是应该很简单的。

 

W

wp231957

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-08

• #6

其实就是对字符串操作,不难的

 

9

980

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-08

• #7

指定位置插入

procedure TForm1.Button1Click(Sender: TObject);
var
Sl: TStringList;
i:integer;
begin
Sl:= TStringList.Create;
sl.LoadFromFile('c:/aa.txt');
sl.Insert(0,'1234567890');
// sl.Insert(0,'bbaaaabbb');//指定位置插入
{ i:=sl.IndexOf('345');
if i=-1 then begin
sl.Add('345'); //如果没找到则增加一行。
end else begin
sl:='99999'; //如果找到了就替换。
end; }
sl.SaveToFile('c:/aa.txt');
sl.Free;


end;

 

X

xxagri

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-08

• #8

第一个问题是1，第二个问题：先用Tmemo控件加载文本文件，再将memo1.text赋给S，用涵数在S中查找S1，第三个问题：用涵数在字符串中插入字符串，你说你不会插，我就没办法了。再将memo1.savetofile('aa.txt')

 

天

天空4567

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-10

• #9

谢谢980、xxagri。
我试试去。

 

A

ayan_shaw

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2006-11-10

• #10

受教了。我也试试去。
我以前都是用两个文件来回倒腾的，从A文件一行行处理了倒到B文件中去。累死。