[AssignMap]
Background=Brush
TextLimit=
TextColor=Color
Caption=

[StdProperties]
FONT=FONTSYSTEM8,FONTMODERN8,FONTMODERN10,FONTMODERN12,FONTSWISS8,FONTSWISS10,FONTSWISS12,FONTSWISS14,FONTSWISS18,FONTSWISS24,FONTROMAN8,FONTROMAN10,FONTROMAN12,FONTROMAN14,FONTROMAN18,FONTROMAN24
BRUSH=BRUSHWHITE,BRUSHBLACK,BRUSHDARK,BRUSHMEDIUM,BRUSHLIGHT,BRUSHHOLLOW,BRUSHCLEAR
COLOR=COLORBLACK,COLORBLUE,COLORCYAN,COLORGREEN,COLORMAGENTA,COLORRED,COLORYELLOW,COLORWHITE
LOGIC=Yes
VIEWS=#FormView,#BrowseView


[CODE]
Activate=Method Activate(oE) class %\r\n\tsuper:Activate(oE)\r\n\t//Put your changes here\r\nreturn\r\n
ButtonClick=Method ButtonClick(oCE) class %\r\n\tlocal oC := oCE:Control\r\n\tsuper:ButtonClick(oCE)\r\n\t//Put your changes here\r\nreturn\r\n
ButtonDoubleClick=Method ButtonDoubleClick(oCE) class %\r\n\tlocal oC := oCE:Control\r\n\tsuper:ButtonDoubleClick(oCE)\r\n\t//Put your changes here\r\nreturn\r\n
Close=Method Close(oE) class %\r\n\tsuper:Close(oE)\r\n\t//Put your changes here\r\nreturn\r\n
Deactivate=Method Deactivate(oE) class %\r\n\tsuper:Deactivate(oE)\r\n\t//Put your changes here\r\nreturn\r\n
Draw=Method Draw(oDO) class %\r\n\tsuper:Draw(oDO)\r\n\t//Put your changes here\r\nreturn\r\n
EditChange=Method EditChange(oCE) class %\r\n\tlocal oC := oCE:Control\r\n\tlocal uValue\r\n\tsuper:EditChange(oCE)\r\n\t//Put your changes here\r\nreturn\r\n
EditFocusChange=Method EditFocusChange(oEFCE) class %\r\n\tlocal oC := oEFCE:Control\r\n\tlocal lGotFocus := oEFCE:GotFocus\r\n\tsuper:EditFocusChange(oEFCE)\r\n\t//Put your changes here\r\nreturn\r\n
EditScroll=Method EditScroll(oCE) class %\r\n\tlocal oC := oCE:Control\r\n\tlocal uValue\r\n\tsuper:EditScroll(oCE)\r\n\t//Put your changes here\r\nreturn\r\n
Expose=Method Expose(oEE) class %\r\n\tlocal oBB := oEE:ExposedArea\r\n\tsuper:Expose(oEE)\r\n\t//Put your changes here\r\nreturn\r\n
FocusChange=Method FocusChange(oFCE) class %\r\n\tlocal lGotFocus := oFCE:GotFocus\r\n\tsuper:FocusChange(oFCE)\r\n\t//Put your changes here\r\nreturn\r\n
HelpRequest=Method HelpRequest(oHRE) class %\r\n\tsuper:HelpRequest(oHRE)\r\n\t//Put your changes here\r\nreturn\r\n
HorizontalScroll=Method HorizontalScroll(oSE) class %\r\n\tsuper:HorizontalScroll(oSE)\r\n\t//Put your changes here\r\nreturn\r\n
Keydown=Method Keydown(oKE) class %\r\n\tlocal cKC := if(IsNil(oKE:ASCIIChar),oKE:KeyCode,oKE:ASCIIChar)\r\n\tsuper:Keydown(oKE)\r\n\t//Put your changes here\r\nreturn\r\n
Keyup=Method Keyup(oKE) class %\r\n\tlocal cKC := if(IsNil(oKE:ASCIIChar),oKE:KeyCode,oKE:ASCIIChar)\r\n\tsuper:Keyup(oKE)\r\n\t//Put your changes here\r\nreturn\r\n
ListBoxClick=Method ListBoxClick(oCE) class %\r\n\tlocal oC := oCE:Control\r\n\tlocal uValue\r\n\tsuper:ListBoxClick(oCE)\r\n\t//Put your changes here\r\nreturn\r\n
ListBoxSelect=Method ListBoxSelect(oCE) class %\r\n\tlocal oC := oCE:Control\r\n\tlocal uValue\r\n\tsuper:ListBoxSelect(oCE)\r\n\t//Put your changes here\r\nreturn\r\n
MenuCommand=Method MenuCommand(oMCE) class %\r\n\tsuper:MenuCommand(oMCE)\r\n\t//Put your changes here\r\nreturn\r\n
MenuInit=Method MenuInit(oMIE) class %\r\n\tsuper:MenuInit(oMIE)\r\n\t//Put your changes here\r\nreturn\r\n
MenuSelect=Method MenuSelect(oMSE) class %\r\n\tsuper:MenuSelect(oMSE)\r\n\t//Put your changes here\r\nreturn\r\n
MouseButtonDoubleClick=Method MouseButtonDoubleClick(oME) class %\r\n\tlocal nBID := oME:ButtonID\r\n\tsuper:MouseButtonDoubleClick(oME)\r\n\t//Put your changes here\r\nreturn\r\n
MouseButtonDown=Method MouseButtonDown(oME) class %\r\n\tlocal nBID := oME:ButtonID\r\n\tsuper:MouseButtonDown(oME)\r\n\t//Put your changes here\r\nreturn\r\n
MouseButtonUp=Method MouseButtonUp(oME) class %\r\n\tlocal nBID := oME:ButtonID\r\n\tsuper:MouseButtonUp(oME)\r\n\t//Put your changes here\r\nreturn\r\n
MouseDrag=Method MouseDrag(oME) class %\r\n\tlocal nBID := oME:ButtonID\r\n\tsuper:MouseDrag(oME)\r\n\t//Put your changes here\r\nreturn\r\n
MouseMove=Method MouseMove(oME) class %\r\n\tlocal nBID := oME:ButtonID\r\n\tsuper:MouseMove(oME)\r\n\t//Put your changes here\r\nreturn\r\n
Move=Method Move(oME) class %\r\n\tsuper:Move(oME)\r\n\t//Put your changes here\r\nreturn\r\n
Notify=Method Notify(kNotify,uDescription) class %\r\nLocal flag as Usual\r\n\tflag := super:Notify(kNotify,uDescription)\r\n\t//Put your changes here\r\nreturn flag\r\n
PreValidate=Method PreValidate() class %\r\n\tsuper:PreValidate()\r\n\t//Put your changes here\r\nreturn\r\n
QueryClose=Method QueryClose(oE) class %\r\n\tsuper:QueryClose(oE)\r\n\t//Put your changes here\r\nreturn\r\n
Resize=Method Resize(oRSE) class %\r\n\tsuper:Resize(oRSE)\r\n\t//Put your changes here\r\nreturn\r\n
VerticalScroll=Method VerticalScroll(oSE) class %\r\n\tsuper:VerticalScroll(oSE)\r\n\t//Put your changes here\r\nreturn\r\n


[FORM]
assign01=Name,HyperLabel(%Name%,%Caption%,,)
assign02=Caption,HyperLabel(,lstring,,)
assign03=Description,HyperLabel(,,string,)
assign04=Help Context,HyperLabel(,,,string)

Method50=Activate Event,Activate(CODE:Activate)
Method51=ButtonClick Event,ButtonClick(CODE:ButtonClick)
Method52=ButtonDoubleClick Event,ButtonDoubleClick(CODE:ButtonDoubleClick)
Method53=Close Event,Close(CODE:Close)
Method54=Deactivate Event,Deactivate(CODE:Deactivate)
Method55=Draw Event,Draw(CODE:Draw)
Method56=EditChange Event,EditChange(CODE:EditChange)
Method57=EditFocusChange Event,EditFocusChange(CODE:EditFocusChange)
Method58=EditScroll Event,EditScroll(CODE:EditScroll)
Method59=Expose Event,Expose(CODE:Expose)
Method60=FocusChange Event,FocusChange(CODE:FocusChange)
Method61=HelpRequest Event,HelpRequest(CODE:HelpRequest)
Method62=HorizontalScroll Event,HorizontalScroll(CODE:HorizontalScroll)
Method63=Keydown Event,Keydown(CODE:Keydown)
Method64=Keyup Event,Keyup(CODE:Keyup)
Method65=ListBoxClick Event,ListBoxClick(CODE:ListBoxClick)
Method66=ListBoxSelect Event,Show(CODE:ListBoxSelect)
Method67=MenuCommand Event,MenuCommand(CODE:MenuCommand)
Method68=MenuInit Event,MenuInit(CODE:MenuInit)
Method69=MenuSelect Event,MenuSelect(CODE:MenuSelect)
Method70=MouseButtonDoubleClick Event,MouseButtonDoubleClick(CODE:MouseButtonDoubleClick)
Method71=MouseButtonDown Event,MouseButtonDown(CODE:MouseButtonDown)
Method72=MouseButtonUp Event,MouseButtonUp(CODE:MouseButtonUp)
Method73=MouseDrag Event,MouseDrag(CODE:MouseDrag)
Method74=MouseMove Event,MouseMove(CODE:MouseMove)
Method75=Move Event,Move(CODE:Move)
Method77=QueryClose Event,QueryClose(CODE:QueryClose)
Method78=Resize Event,Resize(CODE:Resize)
Method79=VerticalScroll Event,VerticalScroll(CODE:VerticalScroll)


[FORM:DATAWINDOW]
ContTitle=Data Window
text=DataWindow Caption
InitMethod=DATAWINDOW(oWindow,iCtlID,oServer)
Name=MyDataWindow
Size=420,320 
DialogTemplate=1
Position=5,5 
Style=WS_BORDER|WS_CHILD
Assign05=Icon Name,Icon(CLASS:ICON)
Assign06=Accelerator Table,Accelerator(CLASS:Accelerator)
Assign100=Menu,Menu(CLASS:Menu)
Assign07=Help File Name,HelpDisplay(string)
Method10=View As,ViewAs(VIEWS)
Method11=Data Server,Use(CLASS:DBSERVER)
Method13=Font,Font(FONT)
Method80=Notify Event,Notify(CODE:Notify)
Method76=PreValidate Event,PreValidate(CODE:PreValidate)

[FORM:SHELLWINDOW]
ContTitle=Shell Window
text=ShellWindow Caption
InitMethod = SHELLWINDOW(oParent)
Name=TheShellWindow
Size=400,300 
Position=5,5 
Style=WS_OVERLAPPEDWINDOW
Assign09=Icon Name,Icon(CLASS:ICON)
Assign10=Mouse Pointer,Pointer(CLASS:POINTER)
Assign100=Menu,Menu(CLASS:Menu)
Assign11=Help File Name,HelpDisplay(string)

[FORM:DIALOGWINDOW]
ContTitle=Dialog Window
DialogTemplate=1
text=Dialog Caption
InitMethod = DialogWindow(oParent)
Name=TheDialog
Size=400,240 
Position=5,5 
Style=DS_MODALFRAME | WS_POPUP | WS_CAPTION | WS_SYSMENU
ExStyle=WS_EX_DLGMODALFRAME

method13=Font,Font(FONT)
Method14=Modeless,Modeless(LOGIC)
Assign14=Background Color,Background(COLOR)
Assign15=Mouse Pointer,Pointer(CLASS:POINTER)
Assign16=Help File Name,HelpDisplay(string)

[CONTROL]

[CONTROL:SUBDATAWINDOW]
ContTitle=Sub-Data Window
ClassName=__PSBDWN__ 
Name=Sub_Form
Size=240,140 
Style=WS_CHILD|WS_BORDER  
Method1=Relation String,RelationString(string)
Method2=Order,Order(string)

[CONTROL:FIXEDICON]
ContTitle=Fixed Icon
ClassName=static 
Name=theFixedIcon
Size=40,40 
Style=WS_CHILD|SS_ICON|WS_BORDER   
InitMethod = FIXEDICON(PARENT,ID)
assign01=Name,HyperLabel(%Name%,%Caption%,,)
assign02=Caption,HyperLabel(,lstring,,)
assign03=Description,HyperLabel(,,string,)
assign04=Help Context,HyperLabel(,,,string)
Assign05=Background Color,Background(COLOR)

[CONTROL:SCROLLBAR]
assign01=Name,HyperLabel(%Name%,%Caption%,,)
assign02=Caption,HyperLabel(,lstring,,)
assign03=Description,HyperLabel(,,string,)
assign04=Help Context,HyperLabel(,,,string)

Assign05=Field Spec,FieldSpec(CLASS:FIELDSPEC)
assign06=Min Value,Range(numeric,)
assign07=Max Value,Range(,numeric)

[CONTROL:SCROLLBAR:HORIZONTALSCROLLBAR]
ContTitle=Horizontal Scroll Bar
ClassName=scrollbar 
Name=theHorzScroll
Size=140,20 
Style=WS_CHILD|SBS_HORZ  
InitMethod=HorizontalScrollBar(PARENT,ID)

[CONTROL:SCROLLBAR:VERTICALSCROLLBAR]
ContTitle=Vertical Scroll Bar
ClassName=scrollbar 
Name=theVertScroll
Size=20,140 
Style=WS_CHILD|SBS_VERT  
InitMethod=VerticalScrollBar(PARENT,ID)

[CONTROL:TEXTCONTROL]
assign01=Name,HyperLabel(%Name%,%Caption%,,)
assign02=Caption,HyperLabel(,lstring,,)
assign03=Description,HyperLabel(,,string,)
assign04=Help Context,HyperLabel(,,,string)
method13=Font,Font(FONT)

[CONTROL:TEXTCONTROL:EDIT]
Assign05=Field Spec,FieldSpec(CLASS:FIELDSPEC)
Assign06=Text Limit,TextLimit(numeric)
Assign91=Text Color,TextColor(COLOR)
Assign92=Background Color,Background(COLOR)

[CONTROL:TEXTCONTROL:EDIT:MULTILINEEDIT]
ContTitle=Multi-Line Edit
ClassName= edit
Name=theMultiLineEdit
Size=60,40 
Style=WS_CHILD|ES_MULTILINE|WS_TABSTOP|WS_BORDER  
InitMethod = MultiLineEdit(PARENT,ID)

[CONTROL:TEXTCONTROL:EDIT:SINGLELINEEDIT]
ContTitle=Single-Line Edit
ClassName= edit
Name=theSingleLineEdit
Size=40,20 
Style=WS_CHILD|WS_TABSTOP|WS_BORDER|ES_AUTOHSCROLL 
InitMethod = SingleLineEdit(PARENT,ID)
assign40=Block,Block(string)
assign41=Block Owner,BlockOwner(string)
     
[CONTROL:TEXTCONTROL:BASELISTBOX]
Method2=Fill Using,FillUsing( )
Assign05=Field Spec,FieldSpec(CLASS:FIELDSPEC)
Assign91=Text Color,TextColor(COLOR)
Assign92=Background Color,Background(COLOR)

[CONTROL:TEXTCONTROL:BASELISTBOX:LISTBOX]
ContTitle=List Box
ClassName=listbox 
Name=theListBox
Size=80,80 
Style=WS_TABSTOP|WS_CHILD|LBS_NOTIFY|WS_VSCROLL|WS_BORDER|LBS_SORT
InitMethod = ListBox(PARENT,ID)

[CONTROL:TEXTCONTROL:BASELISTBOX:LISTBOX:COMBOBOX]
ContTitle=Combo Box
ClassName=combobox 
Name=theComboBox
Size=80,80 
Style=WS_TABSTOP|WS_CHILD|CBS_DROPDOWN|WS_VSCROLL|CBS_SORT
InitMethod = combobox(PARENT,ID)

[CONTROL:TEXTCONTROL:BUTTON]

[CONTROL:TEXTCONTROL:BUTTON:CHECKBOX]
ContTitle=Check Box
ClassName= button
Name=theCheckBox
Text=CheckBox
Size=120,18 
Style=WS_TABSTOP|WS_CHILD|BS_AUTOCHECKBOX  
InitMethod=CheckBox(PARENT,ID)
Assign05=Field Spec,FieldSpec(CLASS:FIELDSPEC)
Assign91=Text Color,TextColor(COLOR)
Assign92=Background Color,Background(COLOR)

[CONTROL:TEXTCONTROL:BUTTON:PUSHBUTTON]
ContTitle=Push Button
Type=CommandControl
ClassName= button
Name=PushButton
text=Push
Size=80,22 
Style=WS_CHILD|WS_TABSTOP  
InitMethod = PushButton(PARENT,ID)
Event01=Click Event,MyBtnName( )

[CONTROL:TEXTCONTROL:BUTTON:RADIOBUTTON]
ContTitle=Radio Button
Type=CommandControl
ClassName= button
Name=theRadioButton
text=RadioButton
Size=120,18 
Style=WS_CHILD|WS_TABSTOP|BS_AUTORADIOBUTTON  
InitMethod = RadioButton(PARENT,ID)
Method20=Group Value,Value(numeric)
Assign91=Text Color,TextColor(COLOR)
Assign92=Background Color,Background(COLOR)

[CONTROL:TEXTCONTROL:FIXEDTEXT]
ContTitle=Fixed Text
InitMethod=FixedText(PARENT,ID)
ClassName=Static
text=Fixed Text
Name=theFixedText
Size=80,20 
Style=WS_CHILD  
Assign91=Text Color,TextColor(COLOR)
Assign92=Background Color,Background(COLOR)

[CONTROL:TEXTCONTROL:GROUPBOX]
ContTitle=Group Box
ClassName=Button
Text=GroupBox
Name=theGroupBox
Size=100,80
Style=WS_CHILD|BS_GROUPBOX|WS_GROUP  
InitMethod = GroupBox(PARENT,ID)
Assign91=Text Color,TextColor(COLOR)
Assign92=Background Color,Background(COLOR)

[CONTROL:TEXTCONTROL:GROUPBOX:RADIOBUTTONGROUP]
ContTitle=Radio Button Group
ClassName=Button
Text=RadioButtonGrp
Name=theRadioButtonGroup
Size=100,80
Style=WS_CHILD|BS_GROUPBOX|WS_GROUP  
InitMethod=RadioButtonGroup(PARENT,ID)
Assign01=Field Spec,FieldSpec(CLASS:FIELDSPEC)
 
