2.384
Bearbeitungen
Keine Bearbeitungszusammenfassung |
|||
Zeile 21: | Zeile 21: | ||
LehrerdatenLaden(Schueler['Lehrer'],lName, lVorname, lAnrede, lTitel,lAmtsbez); | LehrerdatenLaden(Schueler['Lehrer'],lName, lVorname, lAnrede, lTitel,lAmtsbez); | ||
Text:=lAnrede; | Text:=lAnrede; | ||
if lAmtsBez <> ' ' then Text:=Text + lAmtsBez; | if lAmtsBez <> '' then Text:=Text + lAmtsBez; | ||
if lTitel <> ' ' then Text:=Text + lTitel; | if lTitel <> '' then Text:=Text + lTitel; | ||
Text:=Text + lVorname + lName; | Text:=Text + lVorname + lName; | ||
end;</code> | end;</code> |