PowerBuilder Function Set Zoom DataWindow gf_set_zoom_datawindow
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 | // Function Name : gf_set_zoom_datawindow // Argument Name : apo_control, Arg Type : powerobject, Pass By : Value // as_size, Arg Type : string, Pass By : Value // Return Type : (None) DataWindow ldw_control DataWindowChild ldwc_control DataStore lds_control Choose Case TypeOf( apo_control ) Case DataWindow! ldw_control = apo_control ldw_control.Modify('DataWindow.Zoom=' + as_size) Case DataWindowChild! ldwc_control = apo_control ldwc_control.Modify('DataWindow.Zoom=' + as_size) Case DataStore! lds_control = apo_control lds_control.Modify('DataWindow.Zoom=' + as_size) Case Else // invalid argument type Return False End Choose Return True |
Good Luck!