06-17-2010, 12:41 PM
it works very well in qm,but can't work if change to exe file... :?:
(winxp with administrator account)
any suggestions?
(I use ProcessExplorer to check thread,they said it's not bad )
(winxp with administrator account)
any suggestions?
(I use ProcessExplorer to check thread,they said it's not bad )
\Dialog_Editor
function# hDlg message wParam lParam
if(hDlg) goto messages
dll- "III.dll"
#SetServer $szHost nPort
#StartEngine
#StopEngine
#GetEngineStatus
str controls = "1201 1202"
str e3 e4
e3="123"
if(!ShowDialog("Dialog111" &Dialog111 &controls)) ret
BEGIN DIALOG
0 "" 0x90C80A44 0x100 0 0 223 135 "Dialog"
1 Button 0x54030001 0x4 120 116 48 14 "OK"
2 Button 0x54030000 0x4 170 116 48 14 "Cancel"
1201 Edit 0x54030080 0x200 14 14 96 14 ""
1202 Edit 0x54030080 0x200 14 32 96 14 ""
1203 Edit 0x54030080 0x200 14 50 96 14 ""
1204 Edit 0x54030080 0x200 14 68 96 14 ""
1205 Edit 0x54030080 0x200 14 86 96 14 ""
3 Button 0x54032000 0x0 20 116 48 14 "Query"
END DIALOG
DIALOG EDITOR: "" 0x2030005 "*" "" ""
ret
messages
sel message
case WM_INITDIALOG
int+ howner=hDlg
str s;s.getwintext(id(1201 hDlg));s.setwintext(id(1202 hDlg))
out SetServer("11.22.11.22", 12345)
out StartEngine()
case WM_DESTROY
out StopEngine()
case WM_COMMAND goto messages2
ret
messages2
sel wParam
case 3
query something...
_s.format("%.2f" d1);_s.setwintext(id(1201 hDlg))
_s.format("%.2f" d2);_s.setwintext(id(1202 hDlg))
_s.format("%.2f" d3);_s.setwintext(id(1203 hDlg))
_s.format("%.2f" d4);_s.setwintext(id(1204 hDlg))
_s.format("%.2f" d5);_s.setwintext(id(1205 hDlg))
case IDOK
case IDCANCEL
ret 1