Gorilla.Imaging.Utility
Unit Gorilla.Imaging.Utility.pasRecords
- record TWordRec
- record TLongWordRec
- record TInt64Rec
- record TFloatHelper
Enumerations
- enum TFileListOption = ( flFullNames, flRelNames, flRecursive ) ;
Constants
- const STrue : string = "True";
- const SFalse : string = "False";
Mics. types
- type PByteArray = pointer to TByteArray;
- type PWordArray = pointer to TWordArray;
- type PLongIntArray = pointer to TLongIntArray;
- type PLongWordArray = pointer to TLongWordArray;
- type PInt64Array = pointer to TInt64Array;
- type PSingleArray = pointer to TSingleArray;
- type PBooleanArray = pointer to TBooleanArray;
- type TDynByteArray = array of Byte;
- type TDynIntegerArray = array of Integer;
- type TDynBooleanArray = array of Boolean;
- type PWordRec = pointer to TWordRec;
- type TWordRecArray = array [0..1073741822] of TWordRec;
- type PWordRecArray = pointer to TWordRecArray;
- type PLongWordRec = pointer to TLongWordRec;
- type PLongWordRecArray = pointer to TLongWordRecArray;
- type PInt64Rec = pointer to TInt64Rec;
- type PInt64RecArray = pointer to TInt64RecArray;
- type PFloatHelper = pointer to TFloatHelper;
- type TChar2 = array [0..1] of Byte;
- type TChar3 = array [0..2] of Byte;
- type TChar4 = array [0..3] of Byte;
- type TChar8 = array [0..7] of Byte;
- type TChar16 = array [0..15] of Byte;
Functions / Procedures
- public procedure FreeAndNil ( var Obj : ) ;
- public procedure FreeMemNil ( var P : ) ; inline;
- public procedure FreeMem ( P : Pointer ) ; inline;
- public function GetExceptObject ( ) : Exception ; inline;
- public function GetTimeMicroseconds ( ) : Int64 ;
- public function GetTimeMilliseconds ( ) : Int64 ;
- public function GetFileExt ( const FileName : string ) : string ;
- public function GetAppExe ( ) : string ;
- public function GetAppDir ( ) : string ;
- public function MatchFileNameMask ( const FileName : string; const Mask : string; CaseSensitive : Boolean = False ) : Boolean ;
- public function BuildFileList ( Path : string; Attr : LongInt; Files : TStrings; Options : TFileListOptions = [] ) : Boolean ;
- public function PosEx ( const SubStr : string; const S : string; Offset : LongInt = $1 ) : LongInt ;
- public function PosNoCase ( const SubStr : string; const S : string; Offset : LongInt = $1 ) : LongInt ; inline;
- public function StrToken ( var S : string; Sep : Char ) : string ;
- public function StrTokenEnd ( var S : string; Sep : Char ) : string ;
- public procedure StrTokensToList ( const S : string; Sep : Char; Tokens : TStrings ) ;
- public function IntToStrFmt ( const I : Int64 ) : string ; inline;
- public function FloatToStrFmt ( const F : Double; Precision : Integer = $2 ) : string ; inline;
- public function ClampInt ( Number : LongInt; Min : LongInt; Max : LongInt ) : LongInt ; inline;
- public function ClampFloat ( Number : Single; Min : Single; Max : Single ) : Single ; inline;
- public function ClampToByte ( Value : LongInt ) : LongInt ; inline;
- public function ClampToWord ( Value : LongInt ) : LongInt ; inline;
- public function IsPow2 ( Num : LongInt ) : Boolean ; inline;
- public function NextPow2 ( Num : LongInt ) : LongInt ; inline;
- public function Pow2Int ( Exponent : LongInt ) : LongInt ; inline;
- public function Power ( const Base : Single; const Exponent : Single ) : Single ;
- public function Log2Int ( X : LongInt ) : LongInt ; inline;
- public function Log2 ( X : Single ) : Single ;
- public function Floor ( Value : Single ) : LongInt ; inline;
- public function Ceil ( Value : Single ) : LongInt ; inline;
- public procedure Switch ( var Value : Boolean ) ; inline;
- public function Iff ( Condition : Boolean; TruePart : LongInt; FalsePart : LongInt ) : LongInt ; overload inline;
- public function IffUnsigned ( Condition : Boolean; TruePart : LongWord; FalsePart : LongWord ) : LongWord ; overload inline;
- public function Iff ( Condition : Boolean; TruePart : Boolean; FalsePart : Boolean ) : Boolean ; overload inline;
- public function Iff ( Condition : Boolean; const TruePart : string; const FalsePart : string ) : string ; overload inline;
- public function Iff ( Condition : Boolean; TruePart : Char; FalsePart : Char ) : Char ; overload inline;
- public function Iff ( Condition : Boolean; TruePart : Pointer; FalsePart : Pointer ) : Pointer ; overload inline;
- public function Iff ( Condition : Boolean; const TruePart : Int64; const FalsePart : Int64 ) : Int64 ; overload inline;
- public function IffFloat ( Condition : Boolean; TruePart : Single; FalsePart : Single ) : Single ; inline;
- public procedure SwapValues ( var A : Byte; var B : Byte ) ; overload;
- public procedure SwapValues ( var A : Word; var B : Word ) ; overload;
- public procedure SwapValues ( var A : LongInt; var B : LongInt ) ; overload;
- public procedure SwapValues ( var A : Single; var B : Single ) ; overload;
- public procedure SwapMin ( var Min : LongInt; var Max : LongInt ) ; inline;
- public function Min ( A : LongInt; B : LongInt ) : LongInt ; inline;
- public function MinFloat ( A : Single; B : Single ) : Single ; inline;
- public function Max ( A : LongInt; B : LongInt ) : LongInt ; inline;
- public function MaxFloat ( A : Single; B : Single ) : Single ; inline;
- public function MulDiv ( Number : Word; Numerator : Word; Denominator : Word ) : Word ; inline;
- public function IsLittleEndian ( ) : Boolean ; inline;
- public function SwapEndianWord ( Value : Word ) : Word ; overload inline;
- public procedure SwapEndianWord ( P : PWordArray; Count : LongInt ) ; overload;
- public function SwapEndianLongWord ( Value : LongWord ) : LongWord ; overload inline;
- public procedure SwapEndianLongWord ( P : PLongWord; Count : LongInt ) ; overload;
- public procedure CalcCrc32 ( var Crc : LongWord; Data : Pointer; Size : LongInt ) ;
- public procedure FillMemoryByte ( Data : Pointer; Size : LongInt; Value : Byte ) ;
- public procedure FillMemoryWord ( Data : Pointer; Size : LongInt; Value : Word ) ;
- public procedure FillMemoryLongWord ( Data : Pointer; Size : LongInt; Value : LongWord ) ;
- public function GetNumMipMapLevels ( Width : LongInt; Height : LongInt ) : LongInt ;
- public function GetVolumeLevelCount ( Depth : LongInt; MipMaps : LongInt ) : LongInt ;
- public function BoundsToRect ( X : LongInt; Y : LongInt; Width : LongInt; Height : LongInt ) : TRect ; overload inline;
- public function BoundsToRect ( const R : TRect ) : TRect ; overload inline;
- public function RectToBounds ( const R : TRect ) : TRect ; overload inline;
- public procedure ClipRectBounds ( var X : LongInt; var Y : LongInt; var Width : LongInt; var Height : LongInt; const Clip : TRect ) ;
- public procedure ClipCopyBounds ( var SrcX : LongInt; var SrcY : LongInt; var Width : LongInt; var Height : LongInt; var DstX : LongInt; var DstY : LongInt; SrcImageWidth : LongInt; SrcImageHeight : LongInt; const DstClip : TRect ) ;
- public procedure ClipStretchBounds ( var SrcX : LongInt; var SrcY : LongInt; var SrcWidth : LongInt; var SrcHeight : LongInt; var DstX : LongInt; var DstY : LongInt; var DstWidth : LongInt; var DstHeight : LongInt; SrcImageWidth : LongInt; SrcImageHeight : LongInt; const DstClip : TRect ) ;
- public function ScaleRectToRect ( const SourceRect : TRect; const TargetRect : TRect ) : TRect ;
- public function RectInRect ( const R1 : TRect; const R2 : TRect ) : Boolean ;
- public function RectIntersects ( const R1 : TRect; const R2 : TRect ) : Boolean ;
- public function FormatExceptMsg ( const Msg : string; const Args : array of TVarRec ) : string ;
- public procedure DebugMsg ( const Msg : string; const Args : array of TVarRec ) ;