of_updatevisuals

pfcwnsrv.pbl   >   pfc_w_statusbar   >   of_updatevisuals

Name	Datatype
as_id	string
as_type	string
as_value	string

Name	Datatype
ls_modifyexp	string
ls_rc	string

public function integer of_updatevisuals (string as_id, string as_type, string as_value);//////////////////////////////////////////////////////////////////////////////
//
//	Function:  of_UpdateVisuals
//
//	Access:  Public
//
//	Arguments:	
//	as_id		The ID of the User Defined object which needs its value modified.
//	as_type	The Type of User Defined object. (text or bitmap)
//	as_value	The new desired value.
//	
//	Returns:  Integer
//	1 if it succeeds and -1 if an error occurs.
//
//	Description:
//	Updates the User Defined object.  
//	This can either be Text or a new bitmap.
//
//////////////////////////////////////////////////////////////////////////////
//	
//	Revision History
//
//	Version
//	5.0   Initial version
//
//////////////////////////////////////////////////////////////////////////////
//
//	Copyright © 1996-1997 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.
//
//////////////////////////////////////////////////////////////////////////////


string	ls_modifyexp
string	ls_rc

// According to the Type, create the appropriate Modify statement.
If Pos(as_type, 'bitmap') > 0 Then
	ls_modifyexp = as_id+'.Expression="bitmap(~'' + as_value + '~')" '
Else
	ls_modifyexp = as_id+'.Expression=~'"'+ as_value + '"~' '	
End IF
					
// Execute the Modify statment.					
ls_rc = dw_statusbar.Modify (ls_modifyexp)		

If Len(ls_rc) > 0 Then
	Return -1
End If
Return 1
end function

Name	Owner
pfc_n_cst_winsrv_statusbar.of_modify	pfc_n_cst_winsrv_statusbar

Name	Owner
datawindow.modify	datawindow
systemfunctions.len	systemfunctions
systemfunctions.pos	systemfunctions

Full name
pfc_w_statusbar