$PBExportHeader$u_sleedit.sru
forward
global type u_sleedit from singlelineedit
end type
end forward

global type u_sleedit from singlelineedit
int Width=503
int Height=88
int TabOrder=10
BorderStyle BorderStyle=StyleLowered!
boolean AutoHScroll=false
long TextColor=33554432
int TextSize=-9
int Weight=400
string FaceName="宋体"
FontCharSet FontCharSet=GB2312CharSet!
FontPitch FontPitch=Variable!
event keyup pbm_keyup
event inputchanged ( )
event keydown pbm_keydown
end type
global u_sleedit u_sleedit

type variables
string THISTAG=''
end variables

event keyup;IF THISTAG=TRIM(THIS.TEXT) THEN RETURN
THISTAG=TRIM(THIS.TEXT)
this.postevent('inputchanged')
end event

event constructor;THISTAG=TRIM(THIS.TEXT)
end event

event modified;this.postevent('keyup')
end event