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
Create successful ePaper yourself
Turn your PDF publications into a flip-book with our unique Google optimized e-Paper software.
<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 />
6665: Function SetMediaID( Drive : Char; var MediaIDRec : MediaIDType) : Cardinal<br />
6666: Procedure SplitPath( const APath : AnsiString; Parts : TStrings)<br />
6667: Function StDateTimeToFileTime( const FileTime : TStDateTimeRec) : LongInt<br />
6668: Function StDateTimeToUnixTime( const DT1 : TStDateTimeRec) : Longint<br />
6669: Function UnixTimeToStDateTime( UnixTime : Longint) : TStDateTimeRec<br />
6670: Function ValidDrive( Drive : Char) : Boolean<br />
6671: Function WriteVolumeLabel( const VolName : AnsiString; Drive : Char) : Cardinal<br />
6672:<br />
6673: //*****************************unit uPSI_JclLANMan;*******************************************<br />
6674: Function CreateAccount( const Server, Username, Fullname, Password, Description, Homedir, Script : string;<br />
const PasswordNeverExpires : Boolean) : Boolean<br />
6675: Function CreateLocalAccount( const Username, Fullname, Password, Description, Homedir, Script : string;<br />
const PasswordNeverExpires : Boolean) : Boolean<br />
6676: Function DeleteAccount( const Servername, Username : string) : Boolean<br />
6677: Function DeleteLocalAccount( Username : string) : Boolean<br />
6678: Function CreateLocalGroup( const Server, Groupname, Description : string) : Boolean<br />
6679: Function CreateGlobalGroup( const Server, Groupname, Description : string) : Boolean<br />
6680: Function DeleteLocalGroup( const Server, Groupname : string) : Boolean<br />
6681: Function GetLocalGroups( const Server : string; const Groups : TStrings) : Boolean<br />
6682: Function GetGlobalGroups( const Server : string; const Groups : TStrings) : Boolean<br />
6683: Function LocalGroupExists( const Group : string) : Boolean<br />
6684: Function GlobalGroupExists( const Server, Group : string) : Boolean<br />
6685: Function AddAccountToLocalGroup( const Accountname, Groupname : string) : Boolean<br />
6686: Function LookupGroupName( const Server : string; const RID : TNetWellKnownRID) : string<br />
6687: Procedure ParseAccountName( const QualifiedName : string; var Domain, UserName : string)<br />
6688: Function IsLocalAccount( const AccountName : string) : Boolean<br />
6689: Function TimeStampInterval( StartStamp, EndStamp : TDateTime) : integer<br />
6690: Function GetRandomString( NumChar : cardinal) : string<br />
6691:<br />
6692: //*****************************unit uPSI_cUtils;*******************************************<br />
6693: TypeS('TUnitType', '( utSrc, utHead, utRes, utPrj, utOther )<br />
6694: Function cIsWinNT : boolean<br />
6695: Procedure cFilesFromWildcard(Directory,Mask: string;var Files:TStringList;Subdirs,ShowDirs,<br />
Multitasking:Boolean;<br />
6696: Function cExecuteFile( const FileName, Params, DefaultDir : string; ShowCmd : Integer) : THandle<br />
6697: Function cRunAndGetOutput(Cmd,WorkDir:string; ErrFunc:TErrFunc; LineOutputFunc:TLineOutputFunc;<br />
CheckAbortFunc : TCheckAbortFunc; ShowReturnValue : Boolean) : string<br />
6698: Function cGetShortName( FileName : string) : string<br />
6699: Procedure cShowError( Msg : String)<br />
6700: Function cCommaStrToStr( s : string; formatstr : string) : string<br />
6701: Function cIncludeQuoteIfSpaces( s : string) : string<br />
6702: Function cIncludeQuoteIfNeeded( s : string) : string<br />
6703: Procedure cLoadFilefromResource( const FileName : string; ms : TMemoryStream)<br />
6704: Function cValidateFile(const FileName:string; const WorkPath:string;const CheckDirs:boolean):string;<br />
67<strong>05</strong>: Function cBuildFilter( var value : string; const FLTStyle : TFILTERSET) : boolean;<br />
6706: Function cBuildFilter1( var value : string; const _filters : array of string) : boolean;<br />
6707: Function cCodeInstoStr( s : string) : string<br />
67<strong>08</strong>: Function cStrtoCodeIns( s : string) : string<br />
6709: Procedure cStrtoAttr( var Attr : TSynHighlighterAttributes; Value : string)<br />
6710: Function cAttrtoStr( const Attr : TSynHighlighterAttributes) : string<br />
6711: Procedure cStrtoPoint( var pt : TPoint; value : string)<br />
6712: Function cPointtoStr( const pt : TPoint) : string<br />
6713: Function cListtoStr( const List : TStrings) : string<br />
67<strong>14</strong>: Function ListtoStr( const List : TStrings) : string<br />
6715: Procedure StrtoList( s : string; const List : TStrings; const delimiter : char)<br />
6716: Procedure cStrtoList( s : string; const List : TStrings; const delimiter : char)<br />
67<strong>17</strong>: Function cGetFileTyp( const FileName : string) : TUnitType<br />
6718: Function cGetExTyp( const FileName : string) : TExUnitType<br />
6719: Procedure cSetPath( Add : string; const UseOriginal : boolean)<br />
6720: Function cExpandFileto( const FileName : string; const BasePath : string) : string<br />
6721: Function cFileSamePath( const FileName : string; const TestPath : string) : boolean<br />
6722: Procedure cCloneMenu( const FromMenu : TMenuItem; ToMenu : TMenuItem)<br />
6723: Function cGetLastPos( const SubStr : string; const S : string) : integer<br />
6724: Function cGenMakePath( FileName : String) : String;<br />
6725: Function cGenMakePath2( FileName : String) : String<br />
6726: Function cGenMakePath1( FileName : String; EscapeSpaces, EncloseInQuotes : Boolean) : String;<br />
6727: Function cGetRealPath( BrokenFileName : String; Directory : String) : String<br />
6728: Function cCalcMod( Count : Integer) : Integer<br />
6729: Function cGetVersionString( FileName : string) : string<br />
6730: Function cCheckChangeDir( var Dir : string) : boolean<br />
6731: Function cGetAssociatedProgram(const Extension:string; var Filename,Description: string):boolean<br />
6732: Function cIsNumeric( s : string) : boolean<br />
6733: Procedure StrtoAttr( var Attr : TSynHighlighterAttributes; Value : string)<br />
6734: Function AttrtoStr( const Attr : TSynHighlighterAttributes) : string<br />
6735: Function GetFileTyp( const FileName : string) : TUnitType<br />
6736: Function Atoi(const aStr: string): integer<br />
67<strong>37</strong>: Function Itoa(const aint: integer): string<br />
6738: Function Atof(const aStr: string): double');<br />
6739: Function Atol(const aStr: string): longint');<br />
6740:<br />
6741:<br />
6742: procedure SIRegister_cHTTPUtils(CL: TPSPascalCompiler);<br />
6743: begin<br />
6744: FindClass('TOBJECT'),'EHTTP<br />
6745: FindClass('TOBJECT'),'EHTTPParser<br />
6746: //AnsiCharSet', 'set of AnsiChar<br />
6747: AnsiStringArray', 'array of AnsiString<br />
6748: THTTPProtocolEnum', '( hpNone, hpCustom, hpHTTP, hpHTTPS )<br />
6749: THTTPVersionEnum', '( hvNone, hvCustom, hvHTTP10, hvHTTP11 )<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: 78