To comment on the following update, log in, then open the issue:
http://www.openoffice.org/issues/show_bug.cgi?id=103210
User tbo changed the following:
What |Old value |New value
================================================================================
Status|RESOLVED |VERIFIED
--------------------------------------------------------------------------------
------- Additional comments from [email protected] Thu Aug 13 17:07:30 +0000
2009 -------
A grid comes up with:
Sub Main
oDoc = thisComponent
oDialogModel = createUnoService( "com.sun.star.awt.UnoControlDialogModel" )
oDialogModel.Title = "GridControl Test"
oDialogControl = createUnoService( "com.sun.star.awt.UnoControlDialog" )
oDialogControl.setModel( oDialogModel )
oDialogControl.setPosSize( 0, 0, 800, 600, com.sun.star.awt.PosSize.POSSIZE)
oColumnModel = createUnoService( "com.sun.star.awt.grid.DefaultGridColumnModel")
oColumn1 = createUnoService( "com.sun.star.awt.grid.GridColumn")
oColumn1.Title( "City" )
oColumn2 = createUnoService( "com.sun.star.awt.grid.GridColumn")
oColumn2.Title( "Land" )
oColumnModel.addColumn( oColumn1 )
oColumnModel.addColumn( oColumn2 )
oDataModel = createUnoService( "com.sun.star.awt.grid.DefaultGridDataModel")
oDataModel.addRow ( "", Array( "Hamburg", "Germany") )
oDataModel.addRow ( "", Array("Brisbane", "Australia") )
oModel = oDialogModel.createInstance(
"com.sun.star.awt.grid.UnoControlGridModel" )
oModel.Name="Grid1"
oModel.GridDataModel = oDataModel
oModel.ColumnModel = oColumnModel
oDialogModel.insertByName("Grid1", oModel )
oControl = oDialogControl.getControl("Grid1")
oControl.setPosSize(600, 0,200, 200, com.sun.star.awt.PosSize.POSSIZE)
oDialogControl.setVisible( True )
oDialogControl.execute
End Sub
verified
---------------------------------------------------------------------
Please do not reply to this automatically generated notification from
Issue Tracker. Please log onto the website and enter your comments.
http://qa.openoffice.org/issue_handling/project_issues.html#notification
---------------------------------------------------------------------
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
---------------------------------------------------------------------
To unsubscribe, e-mail: [email protected]
For additional commands, e-mail: [email protected]
