Wie Zeilenumbruch erzwingen?

Alles zum Thema Zeugnisse und Zeugnisdruck

Moderatoren: Raffenberg, A. Schüller, Pfotenhauer

Antworten
Benutzeravatar
Venjakob
Beiträge: 84
Registriert: Montag 10. Dezember 2018, 19:20
Wohnort: Köln
Schulform: GYM
Kontaktdaten:

Wie Zeilenumbruch erzwingen?

Beitrag von Venjakob »

Ich möchte in einem Textfeld, welches mit Inhalt dynamisch gefüllt wird, noch einen Satz anfügen, der jedoch leider über die Breite der Seite hinausgeht.
Wie erzwinge ich einen Zeilenumbruch?

Beim Emoji :D soll der Satz noch eingefügt werden.
Der Report ist eine Laufbahnbescheinigung für die Q1/Q2.

var
LAnrede, StvAnrede: string;
begin

if DefizitFaecher <> '' then
begin
Text := 'Sie werden gebeten, mit ';
LAnrede := Lernabschnitte['KLAnrede'];
if LAnrede <> '' then
begin
Text := Text + Dativ(LAnrede) + ' ' + Lernabschnitte['KLNachname'];
StvAnrede := Lernabschnitte['StvKLAnrede'];
if StvAnrede <> '' then Text := Text + ' oder ' + Dativ (StvAnrede) + ' ' + Lernabschnitte['StvKLNachname'];
end
else
begin
StvAnrede := Lernabschnitte['StvKLAnrede'];
if StvAnrede <> '' then
Text := Text + Dativ(StvAnrede) + ' ' + Lernabschnitte['StvKLNachname']
else
Text := Text + 'Ihrer Beratungslehrerin bzw. Ihrem Beratungslehrer';
end;
Text := Text + ' zu sprechen. :D ';
end
else
Text := '';
end;
Mit freundlichen Grüßen
Martin Venjakob
Benutzeravatar
Raffenberg
Beiträge: 2601
Registriert: Dienstag 25. September 2018, 15:22
Schulform: Gymnasium
Kontaktdaten:

Re: Wie Zeilenumbruch erzwingen?

Beitrag von Raffenberg »

Hallo Herr Venjakob,
einen Zeilenumbruch können Sie mit 'chr(13) + chr(10)' erzwingen. Beispiel:

Code: Alles auswählen

Text := 'Erste Zeile' + chr(13) + chr(10) + 'Zweite Zeile';
Den automatischen Zeilenumbruch können Sie bei Textfeldern über das Kontextmenü aktivieren. Leider wachsen die Textfelder jedoch nicht in der Höhe mit. Sie müssten die Höhe vorab einstellen. Besser geeignet sind hier Memofelder oder rtf-Felder, welche "gedehnt" und im Verhältnis verschoben werden können.
Mit freundlichen Grüßen
Jens Raffenberg
Benutzeravatar
Venjakob
Beiträge: 84
Registriert: Montag 10. Dezember 2018, 19:20
Wohnort: Köln
Schulform: GYM
Kontaktdaten:

Re: Wie Zeilenumbruch erzwingen?

Beitrag von Venjakob »

Super, das versuche ich gleich mal. Vielen Dank!
Mit freundlichen Grüßen
Martin Venjakob
Benutzeravatar
Venjakob
Beiträge: 84
Registriert: Montag 10. Dezember 2018, 19:20
Wohnort: Köln
Schulform: GYM
Kontaktdaten:

Re: Wie Zeilenumbruch erzwingen?

Beitrag von Venjakob »

Das klappt leider nicht, siehe Anhänge.

Bildschirm­foto 2023-01-12 um 18.19.16.png
Bildschirm­foto 2023-01-12 um 18.19.16.png (32.96 KiB) 805 mal betrachtet
Bildschirm­foto 2023-01-12 um 18.19.59.png
Bildschirm­foto 2023-01-12 um 18.19.59.png (32.63 KiB) 805 mal betrachtet
Mit freundlichen Grüßen
Martin Venjakob
Kurosinski
Beiträge: 953
Registriert: Sonntag 19. Mai 2019, 19:53
Schulform: Gesamtschule

Re: Wie Zeilenumbruch erzwingen?

Beitrag von Kurosinski »

Seltsam. Sicher, dass die Datei gespeichert wurde?

Eigentlich genügt im Schild Report auch ein chr(13) für eine neue Zeile.
Christoph Sprung
Beiträge: 415
Registriert: Montag 3. Dezember 2018, 18:43
Schulform: WbK (a. D.)

Re: Wie Zeilenumbruch erzwingen?

Beitrag von Christoph Sprung »

Es sieht so aus, als hätten Sie die Labelbehandlung 'entgegengesetzt' vorgenommen.
'Automatische Größenanpassung' darf nicht aktiviert sein, 'Automatischer Zeilenumbruch muss aktiviert sein. Das Labelfeld muss mindestens so groß gezogen werden, dass der Text auch hineinpasst.
Grüße aus Bochum
Christoph Sprung
Benutzeravatar
Venjakob
Beiträge: 84
Registriert: Montag 10. Dezember 2018, 19:20
Wohnort: Köln
Schulform: GYM
Kontaktdaten:

Re: Wie Zeilenumbruch erzwingen?

Beitrag von Venjakob »

Jetzt klappt es, vielen Dank an alle Helfer!
Mit freundlichen Grüßen
Martin Venjakob
Antworten