|
of_setcurrentstate
|
|
Full name
|
pfc_n_cst_winsrv_sheetmanager.of_setcurrentstate
|
Access
|
protected
|
Extend of
|
integer
|
Return value
|
integer
|
Prototype
|
protected function integer of_setcurrentstate(arrangetypes)
|
Name
|
Datatype
|
li_cnt
|
integer
|
li_count
|
integer
|
li_rc
|
integer
|
lnv_sheet
|
n_cst_winsrv_sheetmanagerattrib[]
|
lw_sheets
|
window[]
|
protected function integer of_setcurrentstate (arrangetypes ae_arrange);//////////////////////////////////////////////////////////////////////////////
//
// Function: of_SetCurrentState
//
// Access: protected
//
// Arguments:
// ae_arrange: window arrange type that was performed
//
// Returns: integer
// 1 = success
// -1 = error
//
// Description:
// Sets the current arrange type of the sheets to allow for undo
//
//////////////////////////////////////////////////////////////////////////////
//
// Revision History
//
// Version
// 5.0 Initial version
// 7.0 Local variable datatype changed from os_sheet to n_cst_winsrv_sheetmanagerattrib type
// 7.0 Local variable name changed from lstr_sheet to lnv_sheet
//
//////////////////////////////////////////////////////////////////////////////
//
// Copyright © 1996-1999 Sybase, Inc. and its subsidiaries. All rights reserved.
// Any distribution of the PowerBuilder Foundation Classes (PFC)
// source code by other than Sybase, Inc. and its subsidiaries is prohibited.
//
//////////////////////////////////////////////////////////////////////////////
integer li_rc = 1
integer li_cnt
integer li_count
window lw_sheets[]
n_cst_winsrv_sheetmanagerattrib lnv_sheet[]
ie_arrange = ae_arrange
// Get sheets
li_count = of_GetSheets (lw_sheets)
// Store window dimensions for each sheet
inv_sheet = lnv_sheet
for li_cnt=1 to li_count
inv_sheet[li_cnt].w_obj = lw_sheets[li_cnt]
inv_sheet[li_cnt].e_state = lw_sheets[li_cnt].windowstate
inv_sheet[li_cnt].i_width = lw_sheets[li_cnt].width
inv_sheet[li_cnt].i_height = lw_sheets[li_cnt].height
inv_sheet[li_cnt].i_x = lw_sheets[li_cnt].x
inv_sheet[li_cnt].i_y = lw_sheets[li_cnt].y
next
return li_rc
end function