I'm playing around with an EditBox (standalone) and trying to insert a "0" when the user deletes the last number in the box.
The idea is to detect when the edit box has zero characters in it.. then do the insertion.
I've limited the control text length to 3 numbers.
With both these SendMessages I get a value of 7, no matter how many numbers there are in the box ????
The API says that GETTEXT should return the exact string length !!
Quote
.if uMsg == WM_COMMAND
HiWord (wParam)
.if eax == EN_UPDATE
@@:
; invoke SendMessage, hWnd, WM_GETTEXT, 256, ADDR stz_Temp
invoke SendMessage, hWnd, WM_GETTEXTLENGTH, NULL, NULL
invoke dwtoa, eax, ADDR stz_Temp
Invoke MessageBox, hWnd, ADDR stz_Temp, TextAddr("WM_GETTEXT"), MB_OK
I get the same story with EN_CHANGE notification.
Another thing is what character does the system insert into the empty spaces => Space ??
I must be missing something :dazzled:
Quickly give me a hammer.. I want to hit myself with it...
Not to worry... suddenly made some progress :idea:
That's need to do by hook, checking all messages to edit window, that could change it content.
I was re-routing the editbox's parent window messages to the edtbox winproc and forgot about the parents hWnd value.
So WM_GETTEXT message was being sent to the parent window instead of the editbox.
So naturally the parent window caption never changed size :biggrin:
Damm.. It had me fooked for a few hours.
:P :P
Van,
Use a normal subclass and scan the length of the text in the edit box. Kiddies stuff. :biggrin: Once you have this up and going, detect if there is only a single zero and delete it if the user presses a non zero numeric key.
Van,
...Good to hear that a simple segment of source code is causing extreme distress and anxiety,...:icon_mrgreen:
A suggestion: (HUTCH is right, see above) it has been my experience that writing some code to validate the contents of an edit box (or text box) is almost always necessary (but, it's a pain in the ass to write it). And, assembly is perfect for this.
The typical computer user can be so annoying.
...That's something I'm quite experienced at,...thinking like an annoying person. :icon_mrgreen:
Ja, thanks
I think I was a bit tired this morning, finally coming to the end of this part of my project, so wasn't thinking straight.
This week-end I'm having a complete break... fix up my garden before spring disappears - up at 6:00 tomorrow :eusa_boohoo:
Nothing like a sorted garden to sort one's brain out... shyte my back's buggered.. :biggrin:
This'll do for the time being
Quote
;-----------------------------------------------------------------------------
;winResultedtMBTB: Control Edit box entry values
;-----------------------------------------------------------------------------
winResultedtMBTB Proc hWnd:HWND, uMsg:ULONG, wParam:WPARAM, lParam:LPARAM
local SelStart:DWord
local SelEnd:DWord
.if uMsg == WM_COMMAND
HiWord (wParam)
.if eax == EN_UPDATE
@@:
invoke SendMessage, myControlz.hedtMBTB, WM_GETTEXT, 256, ADDR stz_Temp
invoke atodw, ADDR stz_Temp
mov ResTypeStruct.i_MBTB, eax
invoke dwtoa, ResTypeStruct.i_MBTB, ADDR stz_Temp
invoke SendMessage, myControlz.hedtMBTB, WM_SETTEXT, NULL, ADDR stz_Temp
invoke SendMessage, myControlz.hedtMBTB, WM_GETTEXT, 256, ADDR stz_Temp
invoke SendMessage, myControlz.hedtMBTB, EM_SETSEL, eax,eax
.elseif eax == EN_CHANGE
jmp @B
.elseif eax == EN_KILLFOCUS
invoke Compare_MBNumbers
.endif
; -------------------------------------------
; The ^$&£ other KillFocus
; -------------------------------------------
.elseif uMsg == WM_KILLFOCUS
invoke Compare_MBNumbers
; -------------------------------------------
; Accept only 0 - 9
; -------------------------------------------
.elseif uMsg == WM_CHAR
mov eax, wParam
cmp eax, "0"
jae @F
Return TRUE
@@:
cmp eax, "9"
jle @F
Return TRUE
@@:
; -------------------------------------------
; Accept BackSpace and Return
; -------------------------------------------
.elseif uMsg == WM_KEYDOWN
mov eax, wParam
.if eax == VK_BACK
invoke SendMessage, hWnd, EM_GETSEL, ADDR SelStart, ADDR SelEnd
mov eax, SelStart
.if eax == SelEnd
.if SelEnd >= 1
dec eax
invoke SendMessage, hWnd, EM_SETSEL, eax, SelEnd
invoke SendMessage, hWnd, WM_CUT, 0, 0
.endif
.else
invoke SendMessage, hWnd, WM_CUT, 0, 0
.endif
.elseif eax == VK_RETURN
invoke SetFocus, myControlz.hedtMBHB
.endif
.endif
Return FALSE
winResultedtMBTB EndP