2.1.1//give you a general function, add words to the window OPEN event f_resize_object (this),
//f_resize_object (window va_window)
//the following contents:
//define the environment variable

3.1.1 environment ve_hjbl
Dec vdec_width vdec_height//width ratio, height ratio
The integer vi_return//return values
Long vl_object
Vi_return=GetEnvironment (ve_hjbl)
Vdec_width=ve_hjbl. ScreenWidth/1024
Vdec_height=ve_hjbl. ScreenHeight/768
Any vs_object_type
4.4.1 the CheckBox v_CheckBox
OLECustomControl V_OLECustomControl
CommandButton v_commandButton
Oval v_Oval
DataWindow v_datawindow
Picture v_picture
DropDownListBox v_DropDownListBox
PictureButton v_PictureButton
DropDownPictureListBox v_dropDownPictureListBox
PictureListBox v_picTureListBox
EditMask v_editmask
RadioButton v_radiobutton
Graph v_graph
A Rectangle v_rectangle
GroupBox v_groupbox
RichTextEdit v_richtextedit
HScrollBar v_HScrollBar
RoundRectangle v_RoundRectangle
The Line v_line
SingleLineEdit v_SingleLineEdit
ListBox v_ListBox
StaticText v_statictext
ListView v_listView
Tab v_tab
MultiLineEdit v_MultiLineEdit
TreeView v_TreeView
OLEControl v_OLEControl
VScrollBar v_VSCrollBar
The menu v_menu
//adjust window attribute
5.1.1 va_window. X=va_window. * x vdec_width
Va_window. Y=va_window. * y vdec_height
//va_window. Width=va_window. Width * vdec_width
//va_window. Height=va_window. Height * vdec_height
Va_window. Resize (va_window. Width * vdec_width va_window. Height * vdec_height)
6.1.1//processing window object within the
For vl_object=1 to upperBound (va_window. Control [])
Vs_object_type=va_window. Control [vl_object] typeof ()
7.1.1 choose case vs_object_type
Case the CheckBox.
V_CheckBox=va_window. Control [vl_object]
V_checkBox. X=v_checkBox. * x vdec_width
V_checkBox. Y=v_checkBox. * y vdec_height
V_checkBox. Width=v_checkBox. Width * vdec_width
V_checkbox. Height=v_checkbox. Height * vdec_height
V_checkbox. Textsize=v_checkbox. Textsize * vdec_width
Case OLECustomControl!
V_OLECustomControl=va_window. Control [vl_object]
V_OLECustomControl. X=V_OLECustomControl. * y vdec_width
V_OLECustomControl. Y=V_OLECustomControl. * y vdec_height
V_OLECustomControl. Width=V_OLECustomControl. Width * vdec_width
V_OLECustomControl. Height=V_OLECustomControl. Height * vdec_height
Case CommandButton!
V_commandButton=va_window. Control [vl_object]
V_commandButton. X=v_commandButton. * x vdec_width
V_commandButton. Y=v_commandButton. * y vdec_height
V_commandButton. Width=v_commandButton. Width * vdec_width
V_commandButton. Height=v_commandButton. Height * vdec_height
V_commandButton. Textsize=v_commandButton. Textsize * vdec_width
Case Oval!
V_Oval=va_window. Control [vl_object]
V_Oval. X=v_Oval. * x vdec_width
V_Oval. Y=v_Oval. * y vdec_height
V_Oval. Width=v_Oval. Width * vdec_width
V_Oval. Height=v_Oval. Height * vdec_height
Case DataWindow!
V_datawindow=va_window. Control [vl_object]
V_datawindow. X=v_datawindow. * x vdec_width
V_datawindow. Y=v_datawindow. * y vdec_height
V_datawindow. Width=v_datawindow. Width * vdec_width
V_datawindow. Height=v_datawindow. Height * vdec_height
Case Picture!
V_picture=va_window. Control [vl_object]
V_picture. X=v_picture. * x vdec_width
V_picture. Y=v_picture. * y vdec_height
V_picture. Width=v_picture. Width * vdec_width
V_picture. Height=v_picture. Height * vdec_height
Case DropDownListBox!
V_DropDownListBox=va_window. Control [vl_object]
V_DropDownListBox. X=v_DropDownListBox. * x vdec_width
V_DropDownListBox. Y=v_DropDownListBox. * y vdec_height
V_DropDownListBox. Width=v_DropDownListBox. Width * vdec_width
V_DropDownListBox. Height=v_DropDownListBox. Height * vdec_height
V_DropDownListBox. Textsize=v_DropDownListBox. Textsize * vdec_width
Case PictureButton!
V_PictureButton=va_window. Control [vl_object]
V_PictureButton. X=v_PictureButton. * x vdec_width
V_PictureButton. Y=v_PictureButton. * y vdec_height
V_PictureButton. Width=v_PictureButton. Width * vdec_width
V_PictureButton. Height=v_PictureButton. Height * vdec_height
V_PictureButton. Textsize=v_PictureButton. Textsize * vdec_width
nullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnullnull