Hello,

> From: Bernard Marcelly [mailto:marce...@club-internet.fr] 
> Sent: Thursday, April 23, 2015 3:24 PM
> To: api@openoffice.apache.org
> Subject: Re: Disable underline - UnoControlFixedHyperlinkModel
> 
> Hi Jörg,
> That's the usual problem of a structure inside a structure : 
> you must use a 
> temporary variable.
> 
> Dim fd As Object
> 
> With fhm
>    ' ....
>    fd = .FontDescriptor
>    fd.Underline = com.sun.star.awt.FontUnderline.NONE
>    .FontDescriptor = fd
> End With
> 
> Remark : there is a side effect, the text color is now black. 
> If you want to 
> color the text, add this instruction:
> 
>    .TextColor = RGB(0,0,250)

works fine, thank you


Greetings,
Jörg


---------------------------------------------------------------------
To unsubscribe, e-mail: api-unsubscr...@openoffice.apache.org
For additional commands, e-mail: api-h...@openoffice.apache.org

Reply via email to