From: <cod...@go...> - 2008-08-14 15:18:37
|
Author: M0...@gm... Date: Thu Aug 14 08:18:20 2008 New Revision: 123 Modified: branches/iVL/MdlLiloOsList.module Log: - Small fixes to the LILO virtual objects to keep user from inserting spaces in name labels Modified: branches/iVL/MdlLiloOsList.module ============================================================================== --- branches/iVL/MdlLiloOsList.module (original) +++ branches/iVL/MdlLiloOsList.module Thu Aug 14 08:18:20 2008 @@ -174,6 +174,13 @@ END IF END +PUBLIC SUB WinLbl_keyrelease() + + LAST.text = Replace(LAST.text, " ", "") + +END + + PUBLIC SUB bIncludeThisWin_click() DIM tb AS TextBox @@ -387,7 +394,7 @@ PUBLIC SUB NameBox_keyrelease() - + LAST.text = Replace(LAST.text, " ", "") END |