Domino 9 und frühere Versionen > ND8: Entwicklung

"Infobrief-Zusammenfassung senden" - als LS ?

<< < (6/7) > >>

koehlerbv:
Leo, denke doch mal über die Reihenfolge Deiner Schritte nach. Bitte.

- Paragraph style erstellen (komplett!)
- Paragraph style zuweisen

Dann den Text schreiben. Deshalb hatte ich doch geschrieben: "Wie machst Du es manuell?"

Bernhard

Bruce Willis:
Danke, Bernhard, dass Du die Zeit gefunden hast, mir nochmals zu schreiben.

Das Thema hatten wir in der Tat schon auf der vorherigen Seite.
Leider verstehe ich immer noch nicht, was Du meinst.

Falls Du ein paar Zeilen nicht korrigieren möchtest, vergessen wir die Sache einfach.

Gute Nacht
Leo

koehlerbv:
Leo, wenn Du Post #25 nicht verstehst, bin ich raus aus der Nummer. Und fertigen Code gibt es hier in der Regel nicht, sondern die Anleitung für das Verständnis.

Auch ich wünsche Dir eine gute Nacht.

Bernhard

Bruce Willis:

--- Zitat von: koehlerbv am 18.04.10 - 22:52:38 ---fertigen Code gibt es hier in der Regel nicht, sondern die Anleitung für das Verständnis.
Bernhard

--- Ende Zitat ---

Wo bekomme ich denn diese 6 oder 8 Zeilen "fertigen" Bespiel-Code als "die Anleitung für das Verständnis", wie man zwei Spalten formatiert?

In einem beliebigen anderen Notes Forum im Internet?

Oder bei Dir direkt als ein lukrativer Auftrag?

Gruß
Leo

P.S. 20.04.2010 14:08
Sorry, ich war etwas aufgeregt.

Peter Klett:
Manchmal sieht man den Wald vor lauter Bäumen nicht. Probier doch mal das so zu schreiben (ohne Gewähr, habe nur Dein Script sortiert):

'1. Style definieren
Dim rtpStyle As NotesRichTextParagraphStyle   
Set rtpStyle = session.CreateRichTextParagraphStyle
Call rtpstyle.SetTab (6 * RULER_ONE_CENTIMETER, TAB_LEFT)
Call rtpstyle.SetTab (12 * RULER_ONE_CENTIMETER, TAB_LEFT)
Call rtpstyle.SetTab (20 * RULER_ONE_CENTIMETER, TAB_LEFT)
Call rtpstyle.SetTab (23 * RULER_ONE_CENTIMETER, TAB_LEFT)

'2. Style zuordnen
Call rtitem.AppendParagraphStyle(rtpStyle)

'3. Text schreiben   
Call rtitem.AppendText( "Hi there")
Call rtitem.AddNewLine( 1)
 
Call rtitem.AppendText( "titel1")
Call rtitem.AddTab(1)
Call rtitem.AppendText( "titel2")
Call rtitem.AddTab(1)
Call rtitem.AppendText( "titel3")
Call rtitem.AddTab(1)
Call rtitem.AppendText( "titel4")
Call rtitem.AddTab(1)
Call rtitem.AppendText( "titel5")
   
Call rtitem.AddNewLine( 2)

Navigation

[0] Themen-Index

[#] Nächste Seite

[*] Vorherige Sete