|
of_getsystemdirectory
|
|
Full name
|
pfc_n_cst_platformwin32.of_getsystemdirectory
|
Access
|
public
|
Extend of
|
string
|
Return value
|
string
|
Prototype
|
public function string of_getsystemdirectory()
|
Name
|
Datatype
|
ls_dir
|
string
|
lul_rc
|
ulong
|
lul_size
|
ulong
|
public function string of_getsystemdirectory ();//////////////////////////////////////////////////////////////////////////////
//
// Function: of_GetSystemDirectory
//
// Access: public
//
// Arguments: none
//
//
// Returns: string
// system directory
// "" if error
//
// Description: Return the window's system directory
//
//////////////////////////////////////////////////////////////////////////////
//
// Revision History
//
// Version
// 5.0 Initial version
// 5.0.03 Changed Uint variables to Ulong for NT4.0 compatibility
//
//////////////////////////////////////////////////////////////////////////////
//
// 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.
//
//////////////////////////////////////////////////////////////////////////////
ulong lul_size = 260 // MAX_PATH
ulong lul_rc
string ls_dir
ls_dir = space(lul_size)
lul_rc = GetSystemDirectoryA(ls_dir, lul_size)
if lul_rc > 0 THEN
return ls_dir
else
return ""
end if
end function