Ver Fonte

Added TextChanged() to textfield & set min width to 512 for now.

Mark Sibly há 9 anos atrás
pai
commit
145e25adf1
1 ficheiros alterados com 10 adições e 0 exclusões
  1. 10 0
      modules/mojox/textfield.monkey2

+ 10 - 0
modules/mojox/textfield.monkey2

@@ -5,6 +5,10 @@ Namespace mojox
 #end
 #end
 Class TextField Extends TextView
 Class TextField Extends TextView
 
 
+	#rem monkeydoc Invoked when the user edits text.
+	#end
+	Field TextChanged:Void()
+
 	#rem monkeydoc Invoked when the user hits 'Enter'.
 	#rem monkeydoc Invoked when the user hits 'Enter'.
 	#end
 	#end
 	Field Entered:Void()
 	Field Entered:Void()
@@ -26,6 +30,12 @@ Class TextField Extends TextView
 		Gravity=New Vec2f( 0,.5 )
 		Gravity=New Vec2f( 0,.5 )
 		
 		
 		ScrollBarsVisible=False
 		ScrollBarsVisible=False
+		
+		MaxSize=New Vec2i( 512,0 )
+		
+		Document.TextChanged+=Lambda()
+			TextChanged()
+		End
 	End
 	End
 	
 	
 	Method New( maxLength:Int )
 	Method New( maxLength:Int )