Labelprogrammierung
Verfasst: Mittwoch 20. März 2019, 19:04
Hallo zusammen,
ich habe ein kleines Problem mit einer Labelprogrammierung.
Ich würde gerne eine Abfrage via BeforePrint programmieren, welche nach dem Namen eines Lehrers fragt.
Nach dem Eintragen des Namens soll dieser auf dem Dokument erscheinen, das gedruckt wird.
Ich habe eine Variable unter Deklarationen programmiert: NameLehrer : string;
Danach habe ich unter BeforePrint im Hauptbericht folgendes eingetragen:
begin
NameLehrer:= StringInput('Welcher Lehrer unterschreibt die Verwarnung?', ' ') ;
end;
Die Abfrage funktioniert auch und ich kann den Namen des Lehrers eintragen.
Danach bin ich auf das Label gegangen und habe unter OnGetText folgendes eingetragen:
begin
Text := 'NameLehrer'
end;
Ich denke hier liegt der Fehler, denn im Dokument erscheint nicht der Name des Lehrers, sondern NameLehrer.
Wie bekomme ich es hin, dass der Name des Lehrers in das Dokument im Anschluss übernommen wird?
Für die Antworten schon mal ein Dankeschön im Voraus.
ich habe ein kleines Problem mit einer Labelprogrammierung.
Ich würde gerne eine Abfrage via BeforePrint programmieren, welche nach dem Namen eines Lehrers fragt.
Nach dem Eintragen des Namens soll dieser auf dem Dokument erscheinen, das gedruckt wird.
Ich habe eine Variable unter Deklarationen programmiert: NameLehrer : string;
Danach habe ich unter BeforePrint im Hauptbericht folgendes eingetragen:
begin
NameLehrer:= StringInput('Welcher Lehrer unterschreibt die Verwarnung?', ' ') ;
end;
Die Abfrage funktioniert auch und ich kann den Namen des Lehrers eintragen.
Danach bin ich auf das Label gegangen und habe unter OnGetText folgendes eingetragen:
begin
Text := 'NameLehrer'
end;
Ich denke hier liegt der Fehler, denn im Dokument erscheint nicht der Name des Lehrers, sondern NameLehrer.
Wie bekomme ich es hin, dass der Name des Lehrers in das Dokument im Anschluss übernommen wird?
Für die Antworten schon mal ein Dankeschön im Voraus.