Sub ORB
ocontroller = Thisdatabasedocument.currentController
if not ocontroller.isconnected then ocontroller.connect ' We get the conection
oreportdoc = Thisdatabasedocument.reportdocuments.getbyname("MYREPORT").open ' We open the report
'-------------------------------------------------------
' 3º We get the control of the texttable
oTexttable = oreportdoc.Texttables(2) ' The texttable in the report which has our data
oreportdoc.GetCurrentController().Select(oTexttable) ' We get the control of the texttable
oCell=oTextTable.getCellByPosition(0,17) ' Cell in which we want to have more than one line (0 is the number of column, and 17 the number of row - which is to change in order of our needs -)
oText = oCell.Text ' Text inside the cell
oCurs = oText.createTextCursor() ' We generate a cursor in the cell (Textcursor)
oCurs.gotoEND(True) ' We go to the end of the text, so all actions will be about all the text
oTexttable.getRows().getByIndex(17).IsAutoHeight = True ' The row has autoheight (The main goal of the request)
LineSpace = oCurs.paralinespacing ' We can have more space beetwen lines
LineSpace.height = 150 ' Interlineado de 1,5
oCurs.paralinespacing = LineSpace ' We put the space in all the text selected by the cursor
Exit Sub
Users browsing this forum: No registered users and 0 guests