Home   Index   About
Ultimate Pack


Custom Search
Creating a Spell Dialog Box

Following are the dialog box procedure and supporting functions for the spelling checker dialog box.

HWND hwndMain;

HWND hwndEdit;

char achTemp[256]; /* temporary buffer */

LPSTR lpstrDict; /* buffer for dictionary file */

LPSTR *paLpDict; /* array of pointers to words */

UINT cWords; /* number of words */

/********************************************************

FUNCTION: SpellDlgProc

PURPOSE: Dialog procedure for Spell dialog box.

  • *******************************************************/

BOOL CALLBACK SpellDlgProc(hwndDlg, msg, wParam, lParam)

HWND hwndDlg;

UINT msg;

WPARAM wParam;

LPARAM lParam;

{

switch (msg) {

case WM_INITDIALOG:

if (!OpenDictionary()) {

EndDialog(hwndDlg, 0);

break;

}

SendMessage(hwndEdit, EM_SETSEL, 0, 0);

do

if (!SelectNextWord(hwndEdit, achTemp)) {

GlobalFree((HGLOBAL) lpstrDict);

LocalFree((HLOCAL) paLpDict);

EndDialog(hwndDlg, 0);

break;

}

while (!InitSpellList(

GetDlgItem(hwndDlg, IDCOMBO), achTemp));

break;

case WM_COMMAND:

switch (LOWORD(wParam)) {

case IDCOMBO:

if (HIWORD(wParam) != CBN_DBLCLK)

break;

/* For a double-click, process the OK case. */

case IDOK:

SendDlgItemMessage(hwndDlg, IDCOMBO,

WM_GETTEXT, sizeof(achTemp),

(LPARAM) achTemp);

SendMessage(hwndEdit, EM_REPLACESEL, 0,

(LPARAM) achTemp);

/* Fall through to get the next word. */

case IDIGNORE:

do

if (!SelectNextWord(hwndEdit, achTemp)) {

EndDialog(hwndDlg, 0);

break;

}

while (!InitSpellList(GetDlgItem(hwndDlg,

IDCOMBO), achTemp));

break;

case IDCANCEL:

EndDialog(hwndDlg, 0);

}

break;

case WM_DESTROY:

GlobalFree((HGLOBAL) lpstrDict);

LocalFree((HLOCAL) paLpDict);

break;

default:

return FALSE;

}

return TRUE;

}

/********************************************************

FUNCTION: InitSpellList

PURPOSE: Initializes the selection field and list

of suggestions for the specified word, if

it is not in the dictionary.

RETURNS: If the list is initialized, the return

value is TRUE. If an error occurs or the

word is in the dictionary, the return

value is FALSE.

  • *******************************************************/

BOOL PASCAL InitSpellList(HWND hwndCombo, LPSTR lpszWord)

{

int min = 0; /* beginning of search range */

int max = cWords; /* end of search range */

int n; /* index of word */

int cmp; /* result of comparison */

char ch; /* first character in word */

ch = *lpszWord;

CharLowerBuff(&ch, 1);

/*

* Perform a binary search for the word.

*

* The global array paLpDict contains pointers to words

* in the global array lpstrDict. These two variables are

* initialized by the OpenDictionary function.

*/

n = max / 2;

while (min < max) {

cmp = lstrcmpi(lpszWord, paLpDict[n]);

if (cmp == 0)

return FALSE; /* not misspelled */

if (cmp < 0)

max = n;

else

min = n + 1;

n = (min + max) / 2;

}

/* List words beginning with the same letter as lpszWord. */

SendMessage(hwndCombo, CB_RESETCONTENT, 0, 0);

while (n > 0 && *paLpDict[n - 1] == ch)

n--;

while (*paLpDict[n] == ch)

SendMessage(hwndCombo, CB_ADDSTRING,

0, (LPARAM) paLpDict[n++]);

/* Place the word in the selection field. */

SendMessage(hwndCombo, WM_SETTEXT, 0, (LPARAM) lpszWord);

return TRUE;

}


Last news from Greatis Software

Nostalgia .Net     Nostalgia .Net     .Net is powerful, but not all-powerful, so sometimes we need to use Win32 API for our .Net applications. It's simple enough with Platform Invoke if you have Win32 skill, but we do not always have time to dig the ancient documentation, declare the special types that are compatible with Win32, find the values of the Win32's constants and so on. Nostalgia .Net offers several simple-to-use classes, and components that will allow you to forget about the headache of Win32 and just use the power of Win32 in your application the same way as you use the native. Net classes.  More »

Recommended software for developers

Ultimate Pack for Delphi and C++ Builder     Ultimate Pack     Component pack for Delphi and C++ Builder that contains runtime form designer, runtime object inspector, print suite and much more for the very special price.  More »

Form Designer .Net     Form Designer .Net     Unique runtime form design solution that allows to edit any form in .Net WinForms application at runtime with full source codes for only 300 euro!  More »

Print Suite .Net     Print Suite .Net     Print Suite .Net is a set of components for easy printing texts, images and grids from your WinForms applications. Full C# source codes are available  More »

Gradient Controls .Net     Gradient Controls .Net     Gradient Controls .Net offers controls with gradient background feature. Labels, panels and so on... Full C# source codes are available  More »

iGrid     Greatis iGrid     iGrid plots drawing grid right over your desktop, so you can use it everywhere, with any drawing application without any special plugins for different graphic editors.  More »


All the contacts and projects

Dmitry Vasiliev (just.dmitry)

Related Links

Software for Visual Studio .NET developers
Software for Delphi and C++ Builder developers
Software for Visual Basic 6 developers
Delphi Tips&Tricks
MegaDetailed.NET

More Online Helps

Win32 Programmer's Reference
Win32 Multimedia Programmer's Reference
OLE Programmer's Reference
Microsoft Windows Pen API Programmer's Reference
Microsoft Windows Sockets 2 Reference
Microsoft Windows Telephony API (TAPI) Programmer's Reference
Unix Manual Pages

Free Tech Secrets ;) Copyright © 2008-2012 Free Tech Secrets ;) greatis just4fun network just4fun