Satzende nur mit 0A

[Borgfeld]

Hallo,

ich soll eine Schnittstellendatei erzeugen in der jeder Satz nur mit 0A endet. Auch ein Dateiende (mit 0D 0A 0D 0A) ist nicht erwünscht. Wie stell ich das an ?

Gruß

Peter

[Uwe Koch]

Hallo Peter,<P>
versuch's mal so
<pre class="sourcecode"><code>
<b>procedure</b> SchreibeInDatei;
<b>var</b> f:Text;
<b>begin</b>
assignfile(f,<font color="#9933CC">'C:\Test.txt'</font>);
Rewrite(f);
<b>write</b>(f,<font color="#9933CC">'Das ist Zeile1'</font>+#0A);
<b>write</b>(f,<font color="#9933CC">'Das ist Zeile2'</font>+#0A);
closefile(f);
<b>end</b>;
</code></pre>
<P>cu Uw