[GB.WEB.FORM]

* BUG: WebTextBox: Report the Text property to the server when the control has lost the focus.
* BUG: WebComboBox: Report the Text property to the server when the control has lost the focus.


git-svn-id: svn://localhost/gambas/trunk@7811 867c0c6c-44f3-4631-809d-bfa615b0a4ec
This commit is contained in:
Benoît Minisini 2016-07-07 22:51:00 +00:00
parent e2a1b7e3eb
commit 56340ea4bd
2 changed files with 2 additions and 2 deletions

View file

@ -51,7 +51,7 @@ Public Sub _Render()
Dim I As Integer
If Not $bReadOnly Then
Print "<input id=\""; Me.Name; ":entry\" class=\"gw-combobox-text\" type=\"text\" value=\""; Html(Text_Read()); "\""; Me._GetUpdateJS("onchange", "text", "this.value");
Print "<input id=\""; Me.Name; ":entry\" class=\"gw-combobox-text\" type=\"text\" value=\""; Html(Text_Read()); "\""; Me._GetUpdateJS("onchange", "text", "this.value"); Me._GetUpdateJS("onblur", "text", "this.value");
If Not Me.Enabled Then Print " disabled";
Print ">";
Print "<div class=\"gw-combobox-arrow\">";

View file

@ -41,7 +41,7 @@ End
Public Sub _BeforeRender()
Print "<input type=\"text\""; Me._GetClassId(); Me._GetUpdateJS("onchange", "text", "this.value");
Print "<input type=\"text\""; Me._GetClassId(); Me._GetUpdateJS("onchange", "text", "this.value"); Me._GetUpdateJS("onblur", "text", "this.value");
Me._RenderStyleSheet()
If Not Me.Enabled Then Print " disabled";
If $bReadOnly Then Print " readonly";