Changeset 637 for trunk/ab5.0/ablib/src/Classes/ActiveBasic/Windows/UI/EditBox.ab

Timestamp:

Sep 29, 2008, 1:02:27 AM (16 years ago)

Author:

イグトランス (egtra)

Message:

Button.OnClickの仕組みを汎用的（WM_COMMAND全般）に。WndProcなどをProtectedへ。

File:

• trunk/ab5.0/ablib/src/Classes/ActiveBasic/Windows/UI/EditBox.ab (modified) (2 diffs)

trunk/ab5.0/ablib/src/Classes/ActiveBasic/Windows/UI/EditBox.ab

@@ -8 +8 @@
 /*!
 @brief エディトコントロールのクラス
-@date 2007/07/21
+@date 2008/07/21
 @auther Egtra
 */
 Class EditBox
-    Inherits Control
+    Inherits WmCommandControl
 Protected
     Override Sub GetCreateStruct(ByRef cs As CREATESTRUCT)
@@ -19 +19 @@
         End With
     End Sub
+Public
+    Override Function RaiseCommandEvent(notificationCode As Word) As Boolean
+        RaiseCommandEvent = False
+    End Function
 
     'ToDo: Lineなどを設ける