Changeset 590


Ignore:
Timestamp:
Aug 15, 2008, 1:43:10 AM (13 years ago)
Author:
イグトランス (egtra)
Message:

Controlの変更で実行できなくなっていたサンプルを修正。

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/ab5.0/ablib/TestCase/UI_Sample/mouse_watcher.ab

    r576 r590  
    2020        list = New ListBox
    2121        With list
    22             .Create(This, IDM_RECOED_LIST, WS_VSCROLL, WS_EX_CLIENTEDGE)
     22            .Create(This, WS_VSCROLL, WS_EX_CLIENTEDGE, IDM_RECOED_LIST)
    2323            .SendMessage(WM_SETFONT, wpFont, 0)
    2424        End With
     
    3636        buttonClear = New Button
    3737        With buttonClear
    38             .Create(This, IDM_CLEAR_BUTTON)
     38            .Create(This, 0, 0, IDM_CLEAR_BUTTON)
    3939            .Move(320, 20, 60, 30)
    4040            .Text = "Clear"
Note: See TracChangeset for help on using the changeset viewer.