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

maXbox3 3.9.9.195
14/05/2015 08:37:17 AM
8820: Function NtfsGetCompression1( const FileName : string) : TFileCompressionState;
8821: Function NtfsSetCompression( const FileName : string; const State : Short) : Boolean
8822: Procedure NtfsSetFileCompression( const FileName : string; const State : TFileCompressionState)
8823: Procedure NtfsSetDirectoryTreeCompression(const Directory: string; const State : TFileCompressionState)
8824: Procedure NtfsSetDefaultFileCompression(const Directory: string; const State:TFileCompressionState)
8825: Procedure NtfsSetPathCompression(const Path:string;const State:TFileCompressionState;Recursive:Boolean;
8826: //AddTypeS('TNtfsAllocRanges', 'record Entries : Integer; Data : PFileAlloca'
8827: //+'tedRangeBuffer; MoreData : Boolean; end
8828: Function NtfsSetSparse( const FileName : string) : Boolean
8829: Function NtfsZeroDataByHandle( const Handle : THandle; const First, Last : Int64) : Boolean
8830: Function NtfsZeroDataByName( const FileName : string; const First, Last : Int64) : Boolean
8831: //Function NtfsQueryAllocRanges(const FileName:string;Offset,Count:Int64;var
Ranges:TNtfsAllocRanges):Boolean;
8832: //Function NtfsGetAllocRangeEntry( const Ranges : TNtfsAllocRanges;
Index:Integer):TFileAllocatedRangeBuffer
8833: Function NtfsSparseStreamsSupported( const Volume : string) : Boolean
8834: Function NtfsGetSparse( const FileName : string) : Boolean
8835: Function NtfsDeleteReparsePoint( const FileName : string; ReparseTag : DWORD) : Boolean
8836: Function NtfsSetReparsePoint( const FileName : string; var ReparseData, Size : Longword) : Boolean
8837: //Function NtfsGetReparsePoint(const FileName:string; var ReparseData:TReparseGuidDataBuffer):Boolean
8838: Function NtfsGetReparseTag( const Path : string; var Tag : DWORD) : Boolean
8839: Function NtfsReparsePointsSupported( const Volume : string) : Boolean
8840: Function NtfsFileHasReparsePoint( const Path : string) : Boolean
8841: Function NtfsIsFolderMountPoint( const Path : string) : Boolean
8842: Function NtfsMountDeviceAsDrive( const Device : string; Drive : Char) : Boolean
8843: Function NtfsMountVolume( const Volume : Char; const MountPoint : string) : Boolean
8844: AddTypeS('TOpLock', '( olExclusive, olReadOnly, olBatch, olFilter )
8845: Function NtfsOpLockAckClosePending( Handle : THandle; Overlapped : TOverlapped) : Boolean
8846: Function NtfsOpLockBreakAckNo2( Handle : THandle; Overlapped : TOverlapped) : Boolean
8847: Function NtfsOpLockBreakAcknowledge( Handle : THandle; Overlapped : TOverlapped) : Boolean
8848: Function NtfsOpLockBreakNotify( Handle : THandle; Overlapped : TOverlapped) : Boolean
8849: Function NtfsRequestOpLock( Handle : THandle; Kind : TOpLock; Overlapped : TOverlapped) : Boolean
8850: Function NtfsCreateJunctionPoint( const Source, Destination : string) : Boolean
8851: Function NtfsDeleteJunctionPoint( const Source : string) : Boolean
8852: Function NtfsGetJunctionPointDestination( const Source : string; var Destination : string) : Boolean
8853: AddTypeS('TStreamId', '( siInvalid, siStandard, siExtendedAttribute, siSec'
8854: +'urity, siAlternate, siHardLink, siProperty, siObjectIdentifier, siReparsePoints, siSparseFile )
8855: AddTypeS('TStreamIds', 'set of TStreamId
8856: AddTypeS('TInternalFindStreamData', 'record FileHandle : THandle; Context '
8857: +': ___Pointer; StreamIds : TStreamIds; end
8858: AddTypeS('TFindStreamData', 'record internal : TInternalFindStreamData; At'
8859: +'tributes : DWORD; StreamID : TStreamId; Name : WideString; Size : Int64; end
8860: Function NtfsFindFirstStream(const FileName:string;StreamIds:TStreamIds;var Data:TFindStreamData):Boolean;
8861: Function NtfsFindNextStream( var Data : TFindStreamData) : Boolean
8862: Function NtfsFindStreamClose( var Data : TFindStreamData) : Boolean
8863: Function NtfsCreateHardLink( const LinkFileName, ExistingFileName : string) : Boolean
8864: AddTypeS('TNtfsHardLinkInfo', 'record LinkCount : Cardinal; FileIndex : Int64; end
8865: Function NtfsGetHardLinkInfo( const FileName : string; var Info : TNtfsHardLinkInfo) : Boolean
8866: Function NtfsFindHardLinks(const Path:string;const FileIndexHigh,FileIndexLow:Cardinal;const
List:TStrings):Bool;
8867: Function NtfsDeleteHardLinks( const FileName : string) : Boolean
8868: Function JclAppInstances : TJclAppInstances;
8869: Function JclAppInstances1( const UniqueAppIdGuidStr : string) : TJclAppInstances;
8870: Function ReadMessageCheck( var Message: TMessage;const IgnoredOriginatorWnd: HWND) : TJclAppInstDataKind
8871: Procedure ReadMessageData( const Message : TMessage; var Data : ___Pointer; var Size : Integer)
8872: Procedure ReadMessageString( const Message : TMessage; var S : string)
8873: Procedure ReadMessageStrings( const Message : TMessage; const Strings : TStrings)
8874:
8875:
8876: (*----------------------------------------------------------------------------*)
8877: procedure SIRegister_JclGraphics(CL: TPSPascalCompiler);
8878: begin
8879: FindClass('TOBJECT'),'EJclGraphicsError
8880: TDynDynIntegerArrayArray', 'array of TDynIntegerArray
8881: TDynPointArray', 'array of TPoint
8882: TDynDynPointArrayArray', 'array of TDynPointArray
8883: TPointF', 'record X : Single; Y : Single; end
8884: TDynPointArrayF', 'array of TPointF
8885: TDrawMode2', '( dmOpaque, dmBlend )
8886: TStretchFilter2', '( sfNearest, sfLinear, sfSpline )
8887: TConversionKind', '( ckRed, ckGreen, ckBlue, ckAlpha, ckUniformRGB, ckWeightedRGB )
8888: TResamplingFilter', '( rfBox, rfTriangle, rfHermite, rfBell, rfSpline, rfLanczos3, rfMitchell )
8889: TMatrix3d', 'record array[0..2,0..2] of extended end
8890: TDynDynPointArrayArrayF', 'array of TDynPointArrayF
8891: TScanLine', 'array of Integer
8892: TScanLines', 'array of TScanLine
8893: TColorChannel', '( ccRed, ccGreen, ccBlue, ccAlpha )
8894: TGradientDirection', '( gdVertical, gdHorizontal )
8895: TPolyFillMode', '( fmAlternate, fmWinding )
8896: TJclRegionCombineOperator', '( coAnd, coDiff, coOr, coXor )
8897: TJclRegionBitmapMode', '( rmInclude, rmExclude )
8898: TJclRegionKind', '( rkNull, rkSimple, rkComplex, rkError )
8899: SIRegister_TJclDesktopCanvas(CL);
8900: FindClass('TOBJECT'),'TJclRegion
8901: SIRegister_TJclRegionInfo(CL);
8902: SIRegister_TJclRegion(CL);
8903: SIRegister_TJclThreadPersistent(CL);
8904: SIRegister_TJclCustomMap(CL);
8905: SIRegister_TJclBitmap32(CL);
PC08 E:\maxbox3\mXGit39988\maxbox3\docs\maxbox_extract_funclist399.txt
http://www.softwareschule.ch/maxbox.htm T: 297
p: 103