assimp/port/AssimpDelphi/aiTexture.pas

27 lines
594 B
Plaintext

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.