3 messages in org.openoffice.fr.progRe: [prog] Caractères spéciaux
FromSent OnAttachments
Rémi AngotJul 12, 2008 1:09 pm 
Francois GattoJul 12, 2008 8:26 pm 
Rémi AngotJul 13, 2008 1:03 am 
Actions with this message:
Paste this link in email or IM:
Paste this link in email or IM:
Atom feed for this thread
Paste this URL into your reader:
Subject:Re: [prog] Caractères spéciauxActions...
From:Francois Gatto (oo@volcar.org)
Date:Jul 12, 2008 8:26:37 pm
List:org.openoffice.fr.prog

Bonjour,

Rémi Angot a écrit :

Comment ajouter un caractère spéciale dans une macro en Basic dont on connait la référence de type U+2212 ?

Merci

Rémi Angot

exemple :

sub specialChar()

dim oDocument as object dim oText as object dim oViewCursor as object dim oTextCursor as object dim sSpecialCar as string

' caractere special unicode "Mathematical Operators" ' voir http://www.unicode.org/charts/PDF/U2200.pdf

sSpecialCar = chr( "&h2212" )

oDocument = thisComponent oViewCursor = oDocument.CurrentController.getViewCursor() oText = oViewCursor.getText()

oTextCursor = oText.createTextCursorByRange( oViewCursor.getStart() ) oText.insertString( oTextCursor, sSpecialCar, false )

end sub