OLE Word Zeilenumbruch

[yogie]

Hallo zusammen,
ich versuche mich gerade an einer Word-Automatisierung und hänge an einer Kleinigkeit.

WdApp.Selection.TypeText('Die ist ein Test');

fügt in ein Word Dokument, wie gewünscht, die Zeile ein. Ein erneuter Aufruf schreibt in die gleiche Zeile.
Wenn ich nun einen Zeilenumbruch (#13) einfüge wird ein neuer Absatz (doppelte Leerzeile) erzeugt, so wie in
Word 2103 nach drücken der RETURN-Taste. Ich möchte aber nur eine neue Zeile, wie in Word nach Shift mit RETURN-Taste.
Was muß ich da machen?

[KodeZwerg]

Zitat:

Zitat von yogie (Beitrag 1411899)

Hallo zusammen,
ich versuche mich gerade an einer Word-Automatisierung und hänge an einer Kleinigkeit.

WdApp.Selection.TypeText('Die ist ein Test');

fügt in ein Word Dokument, wie gewünscht, die Zeile ein. Ein erneuter Aufruf schreibt in die gleiche Zeile.
Wenn ich nun einen Zeilenumbruch (#13) einfüge wird ein neuer Absatz (doppelte Leerzeile) erzeugt, so wie in
Word 2103 nach drücken der RETURN-Taste. Ich möchte aber nur eine neue Zeile, wie in Word nach Shift mit RETURN-Taste.
Was muß ich da machen?

füge ein WdApp.Selection.TypeParagraph; nach TypeText anstelle #13

also

Delphi-Quellcode:

  WdApp.Selection.TypeText(Text := 'Die ist ein Test');
  WdApp.Selection.TypeParagraph;

[yogie]

... danke,
hilft leider nicht, da ist immer noch eine Leerzeile zwischen den Zeilen

[Jumpy]

Ist da eine Leerzeile oder ist einfach nur der Absatz so formatiert, dass es nach jedem Absatz einen Abstand gibt?

[p80286]

Paragraph und #13 ist das gleiche, ein neuer Absatz.
Du könntest es mit #10 versuchen, das sollte dem Zeilenumbruch entsprechen.

Zitat:

Zitat von Jumpy (Beitrag 1411909)

Ist da eine Leerzeile oder ist einfach nur der Absatz so formatiert, dass es nach jedem Absatz einen Abstand gibt?

:thumb:
Guter Einwand!
Oft genug wird der Abstand und eine Leerzeile miteinander verwechselt!

Schalt mal die Sonderzeichendarstellung ein. Dann sieht man wenigstens was für Steuerzeichen vorhanden sind.

Gruß
K-H

[Jumpy]

Ansonsten versuch mal Chr(11), also:


WdApp.Selection.TypeText(Text := 'Die ist ein Test'+Chr(11));

[yogie]

... danke danke ..
Chr(11) ist die Lösung, dann klappt alles.
Darstellung der Sonderzeichen hatte ich eingeschaltet, da stand
diese Pi ähnliche Zeichen. Chr(11) erzeugt jetzt wie gewünscht
den kleine Pfeil