webservice example ? (translate text)

[Gintaras]

1. Set DS_CENTERMOUSE style.
2. Caption is added even when WS_CAPTION is not selected. Use SetWinStyle in WM_INITDIALOG.
3,4. Use WM_SETCURSOR message.

Of course, you need a separate function for dialog procedure.

Code:

Copy      Help

;\Dialog_Editor
function# hDlg message wParam lParam

;BEGIN DIALOG
;0 "" 0x10081042 0x8 0 0 109 28 ""
;3 Edit 0x54030080 0x204 6 8 96 14 ""
;END DIALOG
;DIALOG EDITOR: "" 0x2010505 "" ""

sel message
,case WM_INITDIALOG
,DT_Init(hDlg lParam)
,SetWinStyle hDlg 0 8
,ret 1
,case WM_SETCURSOR
,sel(lParam>>16)
,,case WM_LBUTTONDOWN _s.getwintext(id(3 hDlg)); _s.setclip
,,case WM_RBUTTONDOWN EnableWindow id(3 hDlg) 0
,,case WM_RBUTTONUP DT_Cancel hDlg
,case WM_DESTROY DT_DeleteData(hDlg)