Bug 81187 - Toggle on/off text highlighting like in MS Word
Summary: Toggle on/off text highlighting like in MS Word
Status: RESOLVED DUPLICATE of bug 63438
Alias: None
Product: LibreOffice
Classification: Unclassified
Component: UI (show other bugs)
Version:
(earliest affected)
Inherited From OOo
Hardware: x86 (IA32) All
: low enhancement
Assignee: Not Assigned
URL:
Whiteboard:
Keywords:
Depends on:
Blocks:
 
Reported: 2014-07-10 17:49 UTC by yokesh
Modified: 2018-05-08 19:30 UTC (History)
3 users (show)

See Also:
Crash report or crash signature:


Attachments
IMAGE-1 (149.14 KB, image/jpeg)
2014-07-10 18:05 UTC, yokesh
Details
IMAGE-2 (143.23 KB, image/jpeg)
2014-07-10 18:06 UTC, yokesh
Details
IMAGE-3 (153.30 KB, image/jpeg)
2014-07-10 18:06 UTC, yokesh
Details
IMAGE-4 (142.77 KB, image/jpeg)
2014-07-10 18:07 UTC, yokesh
Details

Note You need to log in before you can comment on or make changes to this bug.
Description yokesh 2014-07-10 17:49:45 UTC
IN MS OFFICE WORD WE CAN DO TEXT HIGHLIGHT AND REMOVE TEXT HIGHLIGHT BY SELECTING AND DESELECTING THE TEXT HIGHLIGHT BUTTON RESPECTIVELY, NO NEED TO OPEN & GO FOR "NO FILL" OPTION.

BUT IN LIBRE OFFICE WRITER WE CAN DO TEXT HIGHLIGT BY ONE TOUCH, BUT TO REMOVE THAT HIGHLIGHT WE NEED TO OPEN THE DROP DOWN AND GO FOR "NO FILL" OPTION, WHICH TAKES SOMETIME FOR US.
Comment 1 yokesh 2014-07-10 18:05:54 UTC
Created attachment 102568 [details]
IMAGE-1
Comment 2 yokesh 2014-07-10 18:06:22 UTC
Created attachment 102569 [details]
IMAGE-2
Comment 3 yokesh 2014-07-10 18:06:52 UTC
Created attachment 102570 [details]
IMAGE-3
Comment 4 yokesh 2014-07-10 18:07:11 UTC
Created attachment 102571 [details]
IMAGE-4
Comment 5 tommy27 2014-07-11 04:39:00 UTC
Ok, I understand what you mean. I set status NEW to this enhancement request.

In the meantime you can use this macro and assign it to a keyboard shortcut or to a toolbar custom button.

Sub RemoveTextHighlighting

dim document   as object
dim dispatcher as object
document   = ThisComponent.CurrentController.Frame
dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")
dispatcher.executeDispatch(document, ".uno:BackColor", "", 0, Array())
End Sub

P.S. check your Caps Lock key :-)
Comment 6 Kevin Suo 2014-07-11 05:38:17 UTC
(In reply to comment #5)
Hi tommy,
I tried your macro but it does not work. So I have done some change to your code, now it works:

Sub RemoveTextHighlighting

	Dim document   as object
	Dim dispatcher as object

	document   = ThisComponent.CurrentController.Frame
	dispatcher = createUnoService("com.sun.star.frame.DispatchHelper")

	REM We need to define the args for the dispatcher. without this the backcolor will not change.
	Dim args1(0) as new com.sun.star.beans.PropertyValue
	args1(0).name = "BackColor"
	args1(0).value = -1

	dispatcher.executeDispatch(document, ".uno:BackColor", "", 0,args1())
	
End Sub

Thanks.
Comment 7 tommy27 2014-07-11 06:46:39 UTC
@Kevin
strange. I confirm my macro works and does remove "text highlighting" under Win7x64 using LibO 4.2.5.2. your macro version works fine too.

would you please tell me your O/S and LibO version? I'm curious about the reason it doesn't work in your computer.
Comment 8 Kevin Suo 2014-07-11 07:32:23 UTC
(In reply to comment #7)
> would you please tell me your O/S and LibO version? I'm curious about the
> reason it doesn't work in your computer.

Windows XP SP3, LibreOffice 4.3.0.2.
Comment 9 tommy27 2014-07-11 08:01:08 UTC
thanks. I confirm macro works in 4.2.5.2 on WinXP 32bit.
I'll try later the 4.3.0.2 release and see if there's some basic issue in the new branch, and if confirmed I'll open a separate report about it.
Comment 10 Maxim Monastirsky 2018-05-08 19:30:03 UTC

*** This bug has been marked as a duplicate of bug 63438 ***