10.11.2015 Views

maXbox3 3.9.9.195 14/05/2015 08:37:17 AM

maXbox3 3.9.9.80 13.11.2013 11:25:53

maXbox3 3.9.9.80 13.11.2013 11:25:53

SHOW MORE
SHOW LESS

You also want an ePaper? Increase the reach of your titles

YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.

<strong>maXbox3</strong> <strong>3.9.9.195</strong><br />

<strong>14</strong>/<strong>05</strong>/<strong>2015</strong> <strong>08</strong>:<strong>37</strong>:<strong>17</strong> <strong>AM</strong><br />

12066: begin<br />

12067: Procedure AlCGIInitDefaultServerVariablesFromWebRequest(WebRequest :<br />

TALWebRequest;ServerVariables:TALStrings);<br />

12068: Procedure AlCGIInitDefaultServerVariablesFromWebRequest1(WebRequest: TALWebRequest; ServerVariables :<br />

TALStrings; ScriptName, ScriptFileName : AnsiString; Url : AnsiString);<br />

12069: Procedure ALCGIInitDefaultServerVariables( ServerVariables : TALStrings);<br />

12070: Procedure AlCGIInitDefaultServerVariables1(ServerVars:TALStrings;ScriptName,<br />

ScriptFileName:AnsiString;Url:AnsiStr;<br />

12071: Procedure AlCGIInitServerVariablesFromWebRequest( WebRequest:TALWebRequest; ServerVariables : TALStrings;<br />

ScriptName, ScriptFileName : AnsiString; Url : AnsiString);<br />

12072: Procedure AlCGIExec( InterpreterFilename : AnsiString; ServerVariables : TALStrings; RequestContentStream<br />

: Tstream; ResponseContentStream : Tstream; ResponseHeader : TALHTTPResponseHeader);<br />

12073: Procedure AlCGIExec1(ScriptName,ScriptFileName, Url, X_REWRITE_URL, InterpreterFilename:AnsiString;<br />

WebRequest : TALIsapiRequest;<br />

overloadedCookies:AnsiString;overloadedQueryString:AnsiString;overloadedReferer: AnsiString;'<br />

12074: +'overloadedRequestContentStream:Tstream;var<br />

ResponseContentStr:AnsiString;ResponseHeader:TALHTTPResponseHeader;<br />

12075: Procedure AlCGIExec2(ScriptName,ScriptFileName,Url,X_REWRITE_URL,<br />

InterpreterFilename:AnsiString;WebRequest: TALIsapiRequest; var ResponseContentString : AnsiString;<br />

ResponseHeader : TALHTTPResponseHeader);<br />

12076: end;<br />

12077:<br />

12078: procedure SIRegister_ALFcnExecute(CL: TPSPascalCompiler);<br />

12079: begin<br />

12<strong>08</strong>0: TStartupInfoA', 'TStartupInfo<br />

12<strong>08</strong>1: 'SE_CREATE_TOKEN_N<strong>AM</strong>E','String'( 'SeCreateTokenPrivilege<br />

12<strong>08</strong>2: SE_ASSIGNPRIMARYTOKEN_N<strong>AM</strong>E','String 'SeAssignPrimaryTokenPrivilege<br />

12<strong>08</strong>3: SE_LOCK_MEMORY_N<strong>AM</strong>E','String)( 'SeLockMemoryPrivilege<br />

12<strong>08</strong>4: SE_INCREASE_QUOTA_N<strong>AM</strong>E','String 'SeIncreaseQuotaPrivilege<br />

12<strong>08</strong>5: SE_UNSOLICITED_INPUT_N<strong>AM</strong>E','String 'SeUnsolicitedInputPrivilege<br />

12<strong>08</strong>6: SE_MACHINE_ACCOUNT_N<strong>AM</strong>E','String 'SeMachineAccountPrivilege<br />

12<strong>08</strong>7: SE_TCB_N<strong>AM</strong>E','String 'SeTcbPrivilege<br />

12<strong>08</strong>8: SE_SECURITY_N<strong>AM</strong>E','String 'SeSecurityPrivilege<br />

12<strong>08</strong>9: SE_TAKE_OWNERSHIP_N<strong>AM</strong>E','String 'SeTakeOwnershipPrivilege<br />

12090: SE_LOAD_DRIVER_N<strong>AM</strong>E','String 'SeLoadDriverPrivilege<br />

12091: SE_SYSTEM_PROFILE_N<strong>AM</strong>E','String 'SeSystemProfilePrivilege<br />

12092: SE_SYSTEMTIME_N<strong>AM</strong>E','String 'SeSystemtimePrivilege<br />

12093: SE_PROF_SINGLE_PROCESS_N<strong>AM</strong>E','String 'SeProfileSingleProcessPrivilege<br />

12094: SE_INC_BASE_PRIORITY_N<strong>AM</strong>E','String 'SeIncreaseBasePriorityPrivilege<br />

12095: SE_CREATE_PAGEFILE_N<strong>AM</strong>E','String 'SeCreatePagefilePrivilege<br />

12096: SE_CREATE_PERMANENT_N<strong>AM</strong>E','String 'SeCreatePermanentPrivilege<br />

12097: SE_BACKUP_N<strong>AM</strong>E','String 'SeBackupPrivilege<br />

12098: SE_RESTORE_N<strong>AM</strong>E','String 'SeRestorePrivilege<br />

12099: SE_SHUTDOWN_N<strong>AM</strong>E','String 'SeShutdownPrivilege<br />

12100: SE_DEBUG_N<strong>AM</strong>E','String 'SeDebugPrivilege<br />

12101: SE_AUDIT_N<strong>AM</strong>E','String 'SeAuditPrivilege<br />

12102: SE_SYSTEM_ENVIRONMENT_N<strong>AM</strong>E','String 'SeSystemEnvironmentPrivilege<br />

12103: SE_CHANGE_NOTIFY_N<strong>AM</strong>E','String 'SeChangeNotifyPrivilege<br />

12104: SE_REMOTE_SHUTDOWN_N<strong>AM</strong>E','String 'SeRemoteShutdownPrivilege<br />

121<strong>05</strong>: SE_UNDOCK_N<strong>AM</strong>E','String 'SeUndockPrivilege<br />

12106: SE_SYNC_AGENT_N<strong>AM</strong>E','String 'SeSyncAgentPrivilege<br />

12107: SE_ENABLE_DELEGATION_N<strong>AM</strong>E','String 'SeEnableDelegationPrivilege<br />

121<strong>08</strong>: SE_MANAGE_VOLUME_N<strong>AM</strong>E','String 'SeManageVolumePrivilege<br />

12109: Function AlGetEnvironmentString : AnsiString<br />

12110: Function ALWinExec32(const FileName,CurrentDir,<br />

Environment:AnsiString;InStream:Tstream;OutStream:TStream):Dword;<br />

12111: Function ALWinExec321(const FileName:AnsiString; InputStream:Tstream;OutputStream:TStream):Dword;<br />

12112: Function ALWinExecAndWait32( FileName : AnsiString; Visibility : integer) : DWORD<br />

12113: Function ALWinExecAndWait32V2( FileName : AnsiString; Visibility : integer) : DWORD<br />

121<strong>14</strong>: Function ALNTSetPrivilege( sPrivilege : AnsiString; bEnabled : Boolean) : Boolean<br />

12115: end;<br />

12116:<br />

121<strong>17</strong>: procedure SIRegister_ALFcnFile(CL: TPSPascalCompiler);<br />

12118: begin<br />

12119: Function AlEmptyDirectory(Directory:ansiString;SubDirectory:Bool;IgnoreFiles:array of AnsiString; const<br />

RemoveEmptySubDirectory : Boolean; const FileNameMask : ansiString; const MinFileAge : TdateTime):Boolean;<br />

12120: Function AlEmptyDirectory1( Directory : ansiString; SubDirectory : Boolean; const<br />

RemoveEmptySubDirectory:Bool; const FileNameMask : ansiString; const MinFileAge : TdateTime) : Boolean;<br />

12121: Function AlCopyDirectory( SrcDirectory, DestDirectory : ansiString; SubDirectory : Boolean; const<br />

FileNameMask : ansiString; const FailIfExists : Boolean) : Boolean<br />

12122: Function ALGetModuleName : ansistring<br />

12123: Function ALGetModuleFileNameWithoutExtension : ansistring<br />

12124: Function ALGetModulePath : ansiString<br />

12125: Function AlGetFileSize( const AFileName : ansistring) : int64<br />

12126: Function AlGetFileVersion( const AFileName : ansistring) : ansiString<br />

12127: Function ALGetFileCreationDateTime( const aFileName : Ansistring) : TDateTime<br />

12128: Function ALGetFileLastWriteDateTime( const aFileName : Ansistring) : TDateTime<br />

12129: Function ALGetFileLastAccessDateTime( const aFileName : Ansistring) : TDateTime<br />

12130: Procedure ALSetFileCreationDateTime( const aFileName : Ansistring; const aCreationDateTime : TDateTime)<br />

12131: Function ALIsDirectoryEmpty( const directory : ansiString) : boolean<br />

12132: Function ALFileExists( const Path : ansiString) : boolean<br />

12133: Function ALDirectoryExists( const Directory : Ansistring) : Boolean<br />

12134: Function ALCreateDir( const Dir : Ansistring) : Boolean<br />

12135: Function ALRemoveDir( const Dir : Ansistring) : Boolean<br />

12136: Function ALDeleteFile( const FileName : Ansistring) : Boolean<br />

121<strong>37</strong>: Function ALRenameFile( const OldName, NewName : ansistring) : Boolean<br />

12138: end;<br />

12139:<br />

12<strong>14</strong>0: procedure SIRegister_ALFcnMime(CL: TPSPascalCompiler);<br />

PC<strong>08</strong> E:\maxbox3\mXGit39988\maxbox3\docs\maxbox_extract_funclist399.txt<br />

http://www.softwareschule.ch/maxbox.htm T: 297<br />

p: <strong>14</strong>0

Hooray! Your file is uploaded and ready to be published.

Saved successfully!

Ooh no, something went wrong!