Thanks! That works!
Option Explicit
Sub Test(Count As Integer)
Dim Ctl As Object
Dlg=CreateUnoDialog(DialogLibraries.Standard.MyDialog)
Ctl=Dlg.getControl("CommandButton1")
Ctl.setLabel("Testing!")
Print Ctl.getModel.Label ' Prints ”Testing!"
End Sub
Best regards
Johnny Rosenberg
2009/9/6 Cor Nouws <[email protected]>:
> Johnny Rosenberg wrote (6-9-2009 22:15)
>>
>> 2009/9/6 Cor Nouws <[email protected]>:
>>>
>>> Dlg.getControl("CommandButton1").getModel.text = ""
>
>> No, it won't. There is no getModel().Text
>
> Ahrrgg, sorry, my mistake
> I use
> Dlg.getControl("CommandButton1").getModel.Label
>
> --
> Cor Nouws
> - nl.OpenOffice.org marketing contact
> - Community Contributor Representative in the Community Council
> Gevoel niet vrij te zijn? Zie www.nieuwsteversie.nl
>
> ---------------------------------------------------------------------
> 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]
