3

我第一次使用 Ada，并有一个 txt 文件，上面写着以下内容

      23.000000#:599.659058,-67.651642

我想在存档的换行符中添加一个 R，这样它就这样结束了

      23.000000#:599.659058,-67.651642
      R,

为此，我使用以下代码

  Open (File => out_parcial_variante1, Name => "c.txt", Mode => out_file);
    new_line(out_parcial_variante1);
    put(File => out_parcial_variante1, Item=> "R,");
  close(out_parcial_variante1);

但是这样做会删除存档中所有以前写入的数据，只留下新行和唯一的 R，

我如何准确地将这个文本附加到文件的末尾，我似乎可以找到函数，这是我能想到的唯一方法

4

2 回答 2

7

尝试 append_file 而不是 out_file：Open (File => out_parcial_variante1, Name => "c.txt", Mode => Append_File);

于 2013-05-16T17:47:14.203 回答
1

只是为了详细说明接受的答案：“out_file”模式会创建一个全新的文件来写入（擦除已经存在的任何文件）。类似地，模式“out”的参数没有定义的初始值（即使您提供的实际参数可能已经初始化为某些东西），并且不应该在初始化之前读取。在 Ada 中，“out”和“in”是他们所说的意思。:-)

于 2013-05-17T12:55:23.950 回答