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

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

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

Saved successfully!

Ooh no, something went wrong!