Domino 9 und frühere Versionen > Entwicklung
Kampf der Rich Text Fields ...
Glombi:
Die Idee ist wirklich schlau ;)
zumal man im Backend an RTItems besser operieren kann als Im Frontend!
Ich empfehle Dir, in der Designer Hilfe mal alle Klassen und deren Methoden rund um NotesRichTextItem, NotesRichTextStyle und NotesRichTextParagraphStyle durchzuackern.
Anhand der Beispiele dort solltest Du eine Lösung finden.
Andreas
Axel:
Hi,
wenn es um die Formatierung von RTF-Felder geht, dann schau mal hier
http://www.free.dominoserver.de/computer/noteslibrary.nsf/d2d59a3d7fc73a2bc1256a6900638352/ec3756747a0ef90dc1256bf2005a0e36!OpenDocument
und auch hier
http://www.free.dominoserver.de/computer/noteslibrary.nsf/d2d59a3d7fc73a2bc1256a6900638352/1934c56fbc4b8b2dc1256dd300514d8e!OpenDocument
Axel
kvos:
Hallo!
Vielen Dank! Funktioniert vom Prinzip her eigentlich perfekt. Prima!
Jetzt kämpfe ich aber glaub noch mit einem Verständnisproblem. Ich kann per Script Dokumente im Front- und Back-End bearbeiten.
Wie kann ich ein geöffnetes (im EDIT-Mode) Dokument im Backend bearbeiten (brauch ich ja wg. den RIchText-Classen) und dann das Front-End aktualisieren.
Ich denke...
... Button ...
SAVE - Frontend
Open im Backend
meine Änderungen im Backend
Save im Backend
Reload im Frontend ...
...
Jetzt habe ich sämtliche Scritparchive durchsucht. Meine Bücher gewälzt, aber irgendwie bin ich nicht auf die richtigen Befehle getroffen.
Gruß.
kvos:
Hallo nochmal...
Front- und Backend Problem habe ich glaube gelöst. Allerdings wird mein RTF Objekt im Front-End einfach nicht aktualisiert.
Ich habe folgendes im Code hinter einem ButtON:
--- Code: ---
Sub Click(Source As Button)
Dim s As New Notessession
Dim uiws As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Set uidoc = uiws.currentdocument
Dim doc As Notesdocument
Set doc=uidoc.document
uidoc.AutoReload = True
Dim rtfobjekt As Variant
Dim richStyle As NotesRichTextStyle
Dim rtpStyle As NotesRichTextParagraphStyle
Set richStyle = s.CreateRichTextStyle
Set rtpStyle = s.CreateRichTextParagraphStyle
Set rtfobjekt = doc.GetFirstItem( "SignaturFeld" )
' If rtfobjekt.Type = RICHTEXT Then
Call rtfobjekt.AddNewLine( 1 )
Call rtfobjekt.AppendText ( "Book is 64 pages, full color." )
'fettgedruckter Text
richStyle.Bold = True
Call rtfobjekt.AppendStyle(richStyle)
Call rtfobjekt.AppendText("Fettgedruckter Text")
Call rtfobjekt.AddNewLine(1)
doc.SignaturFeld = rtfobjekt
Call doc.Save(True, False)
--- Ende Code ---
Aber mein Dokument im Frontend verändert sich einfach nicht. Obwohl das Feld existiert?!??!?
Gruß.
Markus Henke:
Hallo,
Du musst das Dokument schließen und neu öffnen. Dann wird das RTF ordentlich angezeigt.
Stichwort:
notesuidocument.close
notesuiworkspace.editdocument
Gruß
Markus
Navigation
[0] Themen-Index
[#] Nächste Seite
[*] Vorherige Sete
Zur normalen Ansicht wechseln