UPDOWN CONTROL در InputBox

Dim nmh As NMHDR

Dim nmp As NMUPDOWN

1400UpDownControlId

 Case WM_NOTIFY

چون کنترل ساخته شده پیامی را دریافت نمی کند از طریق parent  خود در نتیجه 

   If wParam = 1400 Then nmh.code = (-722) ' UDN_DELTAPOS

    SetWindowTextA Et, nmh.hwndFrom & " ID: " & nmh.idFrom & "/  code ...." & nmh.code & "... Wparam: " & wParam

    If nmh.code = (-722) Then

 ( CopyMemory nmp, ByVal lParam, Len(nmp

      nmp.hdr = nmh     ' No Need'

      SetWindowTextA hwnd, "Delta : " & nmp.iDelta & "  Pos : " & nmp.iPos

     End If

   (CopyMemory lParam, nmp, Len(nmp

iPos

Type: int

Signed integer value that represents the up-down control's current position.

iDelta

Type: int

Signed integer value that represents the proposed change in the up-down control's position.

Static ddd

If nmp.iDelta = 1 Then ddd = ddd - 1 Else ddd = ddd + 1

      nmp.iPos = ddd

      SetWindowTextA hwnd, "Delta : " & nmp.iDelta & "  Pos : " & nmp.iPos

     End If

in case wm_destroy nmp.ipos=0:ddd=0'

UDM_SETRANGE message


Sets the minimum and maximum positions (range) for an up-down control


Parameters

wParam

Must be zero

lParam

The LOWORD is a short that specifies the maximum position for the up-down control, and the HIWORD is a short that specifies the minimum position





case WM_VSCROLL

delta=LOWORD(SendDlgItemMessage(dlg, IDC_SPIN1,UDM_GETPOS,0,0))

SetDlgItemText(dlg,IDC_DTRANS,mystring 

---

WM_VSCROLL

wparam

The HIWORD specifies the current position of the scroll box

The LOWORD specifies a scroll bar value that indicates the user's scrolling request.
SB_BOTTOM
SB_TOP


lParam

If the message is sent by a scroll bar control, this parameter is the handle to the scroll bar control. If the message is sent by a standard scroll bar, this parameter is NULL.

---

با WS_TABSTOP  فوکس میگیرد ( کیبورد)  ولی برای اجرای دستور توسط پیام  WM_COMMAND باید از lparam  آن استفاده کرد که هندل پنجره  ایجاد شده است .

 Case WM_COMMAND    '   wm-command

     "!!!..." & ( If lParam = hbtn Then MsgBox "Clicked " & GetWindowText(hbtn

        Select Case wParam

          Case 2

        End Select

با توجه باینکه WS_TABSTOP تنظیم شده لذا باتن JK توسط کلید TAB کیبورد فوکس خواهد گرفت و در شکل زیر نقطه چین هایی که در مستطیل آن باتن مشخص است نشاندهنده ی فوکس گرفتن است .