Domino 9 und frühere Versionen > ND8: Entwicklung

Spaltenbreite in dynamischer Tabelle im Mail-Body

(1/2) > >>

v_haderer:
Hallo Zusammen!

kurze Frage  :)
Ich erstelle im Bodyfeld eines neuen Mails eine Tabelle ->

   Call rtitem.AppendTable(zeilen, spalten,, RULER_ONE_INCH * 1.5)
   Call rtnav.FindFirstElement(RTELEM_TYPE_TABLECELL)
      For aktZeile = 1 To zeilen         
         For aktSpalte = 1 To Spalten
            Call rtitem.BeginInsert(rtnav)      
            
            boldMerker = richStyle.Bold
            If aktZeile = 1 Then
               richStyle.Bold = True
               Call rtitem.AppendStyle(richStyle)
            End If
            
            Call rtitem.AppendText("Zeile " & aktZeile% & ",  Spalte " & aktSpalte)
            
            If aktZeile = 1 Then
               richStyle.Bold = boldMerker
               Call rtitem.AppendStyle(richStyle)
            End If            
            
            Call rtitem.EndInsert
            Call rtnav.FindNextElement(RTELEM_TYPE_TABLECELL)
         Next
      Next

... das funktioniert soweit ganz brav.
Nun wird die Tabelle leider immer an die Breite des Mails automaitsch angepasst was "nicht besonders hübsch"  ;) aussieht.
Kann mir jemand sagen wie ich die Spaltenbreite in solch einer Tabelle via Script setzen kann?   ???

vielen lieben Dank
glg
Viktor

Glombi:
Laut Designer Hilfe sollte das mit einem weiteren optionalen Parameter rtpsStyleArray gehen:

Call notesRichTextItem.AppendTable( rows%, columns% [, labels]  [, leftMargin&]  [, rtpsStyleArray] )

rtpsStyleArray
Array of type NotesRichTextParagraphStyle. Optional. Creates a table with fixed-width columns and style attributes as specified. Omitting this parameter creates an auto-width table. The array must contain one element for each column in the table in sequence. Explicitly set the first line left margin and left margin, which control the start of text relative to the start of the column, and the right margin, which controls column width.

Andreas

v_haderer:
Danke für den Tipp, damit habe ich schon probiert zu arbeiten.
Hat seltsamerweise keinerlei Auswirkung auf die Tabelle  ???

ascabg:
Hallo,

Darf man auch einmal fragen, wie Du es probiert hast?

Beispiel aus der Designer-Hilfe ist aus meiner Sicht sehr hilfreich.


Andreas

v_haderer:
einfach testweise mit

rtpStyle.FirstLineLeftMargin = RULER_ONE_INCH*0.4            
rtpStyle.LeftMargin = 100
rtpStyle.RightMargin = 500

meine Vermutung ist das ich mich schlichtweg unglaublich blöd anstelle ;-)

Navigation

[0] Themen-Index

[#] Nächste Seite