Re: [libreoffice-users] Feature Request - Categories for special characters

Hi Steve,

Steve Gruspier schrieb:
> Hello:
>
> I was wondering if this was the place to request a feature. I was
> thinking the "Special Character" section is very cluttered. My feature
> request is a setting that would narrow down special characters to ones
> that are used in specific fields such as "Engineering" or "Physics".
> Something along those lines that could help people become more efficient
> using Libreoffice. I am constantly using special characters such as the
> ohms (uppercase omega) symbol for resistance, particularly when I use
> Libreoffice to generate tests.

I do not like the idea to remove characters or group them in another 
way. The Unicode groups are well defined and easy to handle.

But I would like the idea of a user defined, "favorite characters" list 
or similar, or even more then one, each for a special topic.

For your problem I think of this methods:
* Write an Autotext or a document, which contains all your favorite 
characters. Open it beside your actual text and use copy&paste to insert 
the characters.
* Use your OS to insert the character by typing the number; you need a 
list of numbers beside your keyboard.
* Use a macro to insert a special character. You can connect the macro 
to a button; I use the character itself as "name" of the button, so it 
is shown on the button. So you can generate your own toolbar with your 
favorite characters. For Writer such macro in Basic is for example (I 
hope the line end are set correctly in mail transport):

Sub lcl_InsertCharacter_Writer(byval sChar as string)
Dim oDoc as variant: oDoc = ThisComponent
Dim oCurrentController as variant: oCurrentController = 
oDoc.getCurrentController()
if 
not(oCurrentController.supportsService("com.sun.star.text.TextDocumentView")) 
then
        msgbox("Only for Writer")
        exit sub
end if
Dim oTextViewCursor as variant: oTextViewCursor = 
oCurrentController.getViewCursor()
Dim oText as variant
If IsEmpty(oTextViewCursor.Cell) Then
        oText=oTextViewCursor.Text
Else
        oText=oTextViewCursor.Cell.Text
End If
oText.insertString(oTextViewCursor,sChar,false)
End Sub

That is the general method, and for each single character:
sub OE_Lower_Ligature
        lcl_InsertCharacter_Writer(chr(clng("&H153")))
end sub

Here &H153 is the number of the character œ , &H is the markup for a 
hex-number and 153 is the number itself, as can be seen in the special 
character dialog.

Kind regards
Regina




--
To unsubscribe e-mail to: users+unsubscribe@global.libreoffice.org
Problems? http://www.libreoffice.org/get-help/mailing-lists/how-to-unsubscribe/
Posting guidelines + more: http://wiki.documentfoundation.org/Netiquette
List archive: http://listarchives.libreoffice.org/global/users/
All messages sent to this list will be publicly archived and cannot be deleted