Commit dd82a4e7 authored by Peter Achten's avatar Peter Achten
Browse files

(PA) crosscall procedure moved from cCrossCallWindows_121.c

to cCrossCallxDI_121.c
parent 77c5089e
......@@ -2541,15 +2541,6 @@ void EvalCcRqSETSELECTWINDOW (CrossCallInfo *pcci) /* hwnd, hasHScroll, hasVScro
MakeReturn0Cci (pcci);
}
void EvalCcRqGETWINDOWPOS (CrossCallInfo *pcci) /* hwnd; width, heigth result */
{
RECT rect;
GetWindowRect ((HWND) pcci->p1, &rect);
MakeReturn2Cci (pcci, rect.left, rect.top);
}
/* Set the position of windows/controls. */
void EvalCcRqSETWINDOWPOS (CrossCallInfo *pcci) /* hwnd, x,y, update, include scrollbars ; no result. */
{
......@@ -3611,7 +3602,6 @@ int InstallCrossCallWindows (int ios)
AddCrossCallEntry (newTable, CcRqUPDATEWINDOWRECT, EvalCcRqUPDATEWINDOWRECT);
AddCrossCallEntry (newTable, CcRqSETCLIENTSIZE, EvalCcRqSETCLIENTSIZE);
AddCrossCallEntry (newTable, CcRqSETSELECTWINDOW, EvalCcRqSETSELECTWINDOW);
AddCrossCallEntry (newTable, CcRqGETWINDOWPOS, EvalCcRqGETWINDOWPOS);
AddCrossCallEntry (newTable, CcRqSETWINDOWPOS, EvalCcRqSETWINDOWPOS);
AddCrossCallEntry (newTable, CcRqGETWINDOWSIZE, EvalCcRqGETWINDOWSIZE);
AddCrossCallEntry (newTable, CcRqSETWINDOWSIZE, EvalCcRqSETWINDOWSIZE);
......
......@@ -912,6 +912,15 @@ void EvalCcRqDESTROYWINDOW (CrossCallInfo *pcci) /* hwnd; no result. */
MakeReturn0Cci (pcci);
}
void EvalCcRqGETWINDOWPOS (CrossCallInfo *pcci) /* hwnd; width, heigth result */
{
RECT rect;
GetWindowRect ((HWND) pcci->p1, &rect);
MakeReturn2Cci (pcci, rect.left, rect.top);
}
void EvalCcRqGETCLIENTSIZE (CrossCallInfo *pcci) /* hwnd; width, height result. */
{
RECT rect;
......@@ -1065,6 +1074,7 @@ extern int InstallCrossCallxDI (int ios)
AddCrossCallEntry (newTable, CcRqCREATESDIFRAMEWINDOW, EvalCcRqCREATESDIFRAMEWINDOW);
AddCrossCallEntry (newTable, CcRqCREATEMDIFRAMEWINDOW, EvalCcRqCREATEMDIFRAMEWINDOW);
AddCrossCallEntry (newTable, CcRqDESTROYWINDOW, EvalCcRqDESTROYWINDOW);
AddCrossCallEntry (newTable, CcRqGETWINDOWPOS, EvalCcRqGETWINDOWPOS);
AddCrossCallEntry (newTable, CcRqGETCLIENTSIZE, EvalCcRqGETCLIENTSIZE);
AddCrossCallEntry (newTable, CcRqCREATEMDITOOLBAR, EvalCcRqCREATEMDITOOLBAR);
AddCrossCallEntry (newTable, CcRqCREATESDITOOLBAR, EvalCcRqCREATESDITOOLBAR);
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment