Implement PSM_HWNDTOINDEX

[Robert Shearman]

Hi,

This patch depends on my previous patch adding the message stubs.

Rob

Changelog:
Implement PSM_HWNDTOINDEX.
-------------- next part --------------
--- wine/dlls/comctl32/propsheet.old.c	2004-07-12 17:58:58.650577504 +0100
+++ wine/dlls/comctl32/propsheet.c	2004-07-12 18:02:59.755923920 +0100
@@ -2540,7 +2540,18 @@
  */
 static LRESULT PROPSHEET_HwndToIndex(HWND hwndDlg, HWND hPageDlg)
 {
-    FIXME("(%p, %p): stub\n", hwndDlg, hPageDlg);
+    int index;
+    PropSheetInfo * psInfo = (PropSheetInfo*) GetPropW(hwndDlg,
+                                                       PropSheetInfoStr);
+
+    TRACE("(%p, %p)\n", hwndDlg, hPageDlg);
+
+    for (index = 0; index < psInfo->nPages; index++)
+        if (psInfo->proppage[index].hwndPage == hPageDlg)
+            return index;
+
+    WARN("%p not found\n", hPageDlg);
+
     return -1;
 }