在pascal或delphi里可不可以打开一个文件并接在下面写入，如果可以要怎么操作？
1、我不要把原来文件的内容删除。
2、打开的一个文件写一点数据进去然后就要关闭，但在程序接下来的运行过程中还要再多次打开它并接下去写入数据。而不是程序运行过程中始终打开着的文件。
3、如果哪位大侠知道如何做，可不可以给一个详细的操作说明
参考答案:unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
var
MyTextFile : TextFile;
ALine : string;
J :integer;
begin
ALine := 'hoho';
AssignFile(MyTextFile,'C:\test.Txt');
Append(MyTextFile);
try
Writeln(MyTextFile,ALine);
finally
CloseFile(MyTextFile);
end;
end;
end.
实际上就是以Append方式打开文件然后writeln就可以了，完成后再Closefile
请确保C:\test.txt文件的存在，不然会报错的