|
- unit aiTexture;
-
- interface
-
- type TaiTexel = packed record
- b, g, r, a: byte;
- end;
- PaiTexel = ^TaiTexel;
- TaiTexelArray = array[0..0] of TaiTexel;
- PaiTexelArray = ^TaiTexelArray;
-
- type TaiTexture = packed record
- mWidth: Cardinal; //width in pixels, OR total embedded file size if texture is a jpg/png/etc
- mHeight: Cardinal; //0 if texture is an embedded file
- achFormatHint: array[0..3] of byte;
- pcData: PaiTexelArray;
- end;
- PaiTexture = ^TaiTexture;
- PaiTextureArray = array [0..0] of PaiTexture;
- PPaiTextureArray = ^PaiTextureArray;
-
-
-
- implementation
-
- end.
|