Seite 1 von 1

Leerzeile in Report lt. Bedingung über Script-Sprache

Verfasst: Di, 24. Feb 2015 13:10
von Werner_Bayern

Code: Alles auswählen

cText = Trim(<ART."gruppe">)
showMessage("Ausgabe wird gestartet!")
  
sub MasterData1OnBeforePrint(Sender)

   CR = ""  
   if cText <> Trim(<ART."gruppe">) then
       CR = chr(13) + chr(13)                                                                            
       cText = Trim(<ART."gruppe">)       
   end if
  
end sub
Funktioniert einwandfrei (eingestellt auf BasicSript-Sprache). Nur, wenn ich das ShowMessage rausnehme, wird der Code nicht ausgeführt! Warum?