Solved

Delphi 7 On Windows 7 Using Woll2woll 1st Class Component Spell checker

Posted on 2014-07-29
7
289 Views
Last Modified: 2015-02-19
Hello,

I am using Delphi 7 on Windows 7 and am having problems with spell checker using woll2woll 1st Class component

What is happening is when I right click on the editor and select the spell checker, you get the egg timer and it seems nothing is happeninng, In reality, the spell checker is hidden behing the screen.

I dynamically create an editor:-

NewEditor:TwwDBRichEditMSWord;

I use following to display the spell checker:-

NewEditor.PopupOptions:=[rpoPopupEdit, rpoPopupCut, rpoPopupCopy, rpoPopupPaste,  rpoPopupBold, rpoPopupItalic, rpoPopupUnderline, rpoPopupFont,
rpoPopupBullet, rpoPopupFind, rpoPopupReplace, rpoPopupMSWordSpellCheck  ];

NewEditor.EditorOptions:=NewEditor.EditorOptions+[reoNoConfirmation];

NewEditor.EditorOptions:=NewEditor.EditorOptions-[reoShowInsertObject];

NewEditor.OnChange:=EditorChanged;

There has got to be a way of catching the onclick event for the spell specker and getting the spell checker to display on front.
0
Comment
Question by:GaryVernon
  • 3
  • 2
7 Comments
 
LVL 26

Accepted Solution

by:
Sinisa Vuk earned 500 total points
ID: 40226559
I had similar problem - and is common on win 7 - dialog hidden behind main form.
you need to force to move in front dialog using FindWindow (to get window handle)
and win api to normalize windows - this might help you:

...
procedure SwitchToThisWindow(h1: hWnd; x: bool); stdcall; external user32 Name 'SwitchToThisWindow';
...
Application.NormalizeTopMosts;
SwitchToThisWindow(win_hndl, True);
....

Open in new window

0
 

Author Comment

by:GaryVernon
ID: 40226760
Thanks for that.

I only want to do this when the user selects spell checker from the popup menu.

so how can I invoke your code if only if that event occurs.

There is no coding inolved. I just set the popup options:-

NewEditor.PopupOptions:=[rpoPopupEdit, rpoPopupCut, rpoPopupCopy, rpoPopupPaste,  rpoPopupBold, rpoPopupItalic, rpoPopupUnderline, rpoPopupFont,
 rpoPopupBullet, rpoPopupFind, rpoPopupReplace, rpoPopupMSWordSpellCheck  ];
0
 
LVL 26

Expert Comment

by:Sinisa Vuk
ID: 40228471
It will be very good to contact W2W to fix that then...

So, there is no event like OnSpellCheckPopup or similar?
0
 

Author Comment

by:GaryVernon
ID: 40228556
thanks for your help. Have tried to contact W2W but no reply

thanks
0
 
LVL 26

Expert Comment

by:Sinisa Vuk
ID: 40228562
That's why I don't like third part sw. It makes time to build own stuff - but in a long term.... very acceptable
0

Featured Post

Free Tool: Subnet Calculator

The subnet calculator helps you design networks by taking an IP address and network mask and returning information such as network, broadcast address, and host range.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
How to debug For loops? 3 56
How to define IfThen functions in one common unit? 4 58
Delphi: Connect to running MS Outlook 4 117
MS Access from Delphi 31 59
In this tutorial I will show you how to use the Windows Speech API in Delphi. I will only cover basic functions such as text to speech and controlling the speed of the speech. SAPI Installation First you need to install the SAPI type library, th…
Creating an auto free TStringList The TStringList is a basic and frequently used object in Delphi. On many occasions, you may want to create a temporary list, process some items in the list and be done with the list. In such cases, you have to…
This tutorial covers a step-by-step guide to install VisualVM launcher in eclipse.
This tutorial explains how to use the VisualVM tool for the Java platform application. This video goes into detail on the Threads, Sampler, and Profiler tabs.

791 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question