RichText auf neues Formular füllen

[heidiweber]

Hallo

ich habe auf einer Maske ein RichText Feld (rtlVorschau). Dies möchte ich befüllen. Jedoch wird die Maske erst aufgerufen.

   Dim ws As New NotesUIWorkspace
   Dim db As NotesDatabase
                Dim rtitemBody As Variant
   
   Set db = ws.CurrentDatabase.Database
   Set newDoc = db.CreateDocument()
   
   newDoc.Form = "antragIntVor"

   Set rtitemBody = New NotesRichTextItem(newDoc, "rtlVorschau" )
   Call rtitemBody.AddNewLine(1)
   Call rtitemBody.AppendText( "Add text to the rich text item" )
   Call rtitemBody.AddNewLine(1)

   Call ws.DialogBox  ("antragIntVor", True, True, True, True, False, False, "Internet Vorschau", newDoc )


Doch leider wird im RichText Feld nichts angezeigt?

Vielen Dank
cu
Heidi

[koehlerbv]

Kurz und knapp (weil vor Die bereits tausende Notes-Programmierer oder die, die es werden wollen, darüber gestolpert werden): Werden in einem Backend-Dokument RichtText-Items befüllt, können diese im Frontend erst angezeigt werden, wenn das Backend-Dokument vorher gespeichert wurde.

Mit Tricks kann man dies umschiffen, aber dazu müsste Deine Frage konkretisiert werden.

Bernhard

[heidiweber]

Problem hat sich erledigt - mache die ANzeige jetzt im selben Dokument - zwar nicht ganz so schön - aber naja...

Dank dir trotzdem vielmals Bernhard
Schönes Wochenende
cu
Heidi