TD3DMaterial

type TD3DMaterial = packed record

  dwSize: DWORD;

  case Integer of

    0: (

        diffuse: TD3DColorValue;

        ambient: TD3DColorValue;

        specular: TD3DColorValue;

        emissive: TD3DColorValue;

        power: TD3DValue;

        hTexture: TD3DTextureHandle;

        dwRampSize: DWORD;

      );

    1: (

        dcvDiffuse: TD3DColorValue;

        dcvAmbient: TD3DColorValue;

        dcvSpecular: TD3DColorValue;

        dcvEmissive: TD3DColorValue;

        dvPower: TD3DValue;

      );

end;