gl11.def 4.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596
  1. # This is the definition file for all GL 1.1 stuff
  2. %COPY_INTERFACE
  3. const
  4. // GL 1.1 texturing
  5. GL_PROXY_TEXTURE_1D = $8063;
  6. GL_PROXY_TEXTURE_2D = $8064;
  7. GL_TEXTURE_PRIORITY = $8066;
  8. GL_TEXTURE_RESIDENT = $8067;
  9. GL_TEXTURE_BINDING_1D = $8068;
  10. GL_TEXTURE_BINDING_2D = $8069;
  11. GL_TEXTURE_INTERNAL_FORMAT = $1003;
  12. // Internal texture formats (GL 1.1)
  13. GL_ALPHA4 = $803B;
  14. GL_ALPHA8 = $803C;
  15. GL_ALPHA12 = $803D;
  16. GL_ALPHA16 = $803E;
  17. GL_LUMINANCE4 = $803F;
  18. GL_LUMINANCE8 = $8040;
  19. GL_LUMINANCE12 = $8041;
  20. GL_LUMINANCE16 = $8042;
  21. GL_LUMINANCE4_ALPHA4 = $8043;
  22. GL_LUMINANCE6_ALPHA2 = $8044;
  23. GL_LUMINANCE8_ALPHA8 = $8045;
  24. GL_LUMINANCE12_ALPHA4 = $8046;
  25. GL_LUMINANCE12_ALPHA12 = $8047;
  26. GL_LUMINANCE16_ALPHA16 = $8048;
  27. GL_INTENSITY = $8049;
  28. GL_INTENSITY4 = $804A;
  29. GL_INTENSITY8 = $804B;
  30. GL_INTENSITY12 = $804C;
  31. GL_INTENSITY16 = $804D;
  32. GL_R3_G3_B2 = $2A10;
  33. GL_RGB4 = $804F;
  34. GL_RGB5 = $8050;
  35. GL_RGB8 = $8051;
  36. GL_RGB10 = $8052;
  37. GL_RGB12 = $8053;
  38. GL_RGB16 = $8054;
  39. GL_RGBA2 = $8055;
  40. GL_RGBA4 = $8056;
  41. GL_RGB5_A1 = $8057;
  42. GL_RGBA8 = $8058;
  43. GL_RGB10_A2 = $8059;
  44. GL_RGBA12 = $805A;
  45. GL_RGBA16 = $805B;
  46. %END
  47. #=====================================================================
  48. # Procedures and functions
  49. #=====================================================================
  50. %PROCS
  51. // Miscellaneous
  52. glEnableClientState: procedure(cap: GLenum);
  53. glDisableClientState: procedure(cap: GLenum);
  54. glPushClientAttrib: procedure(mask: GLbitfield);
  55. glPopClientAttrib: procedure;
  56. // Drawing Functions
  57. glIndexub: procedure(c: Byte);
  58. glIndexubv: procedure(var c: Byte);
  59. // Vertex Arrays
  60. glVertexPointer: procedure(size: LongInt; AType: GLenum; stride: LongInt; var ptr);
  61. glNormalPointer: procedure(AType: GLenum; stride: LongInt; var ptr);
  62. glColorPointer: procedure(size: LongInt; AType: GLenum; stride: LongInt; var ptr);
  63. glIndexPointer: procedure(AType: GLenum; stride: LongInt; var ptr);
  64. glTexCoordPointer: procedure(size: LongInt; AType: GLenum; stride: LongInt; var ptr);
  65. glEdgeFlagPointer: procedure(stride: LongInt; var ptr);
  66. glGetPointerv: procedure(pname: GLenum; var params: Pointer);
  67. glArrayElement: procedure(i: LongInt);
  68. glDrawArrays: procedure(mode: GLenum; first, count: LongInt);
  69. glDrawElements: procedure(mode: GLenum; count: Integer; AType: GLenum; var indices);
  70. glInterleavedArrays: procedure(format: GLenum; stride: LongInt; var pointer);
  71. // Texture Mapping
  72. glGenTextures: procedure(n: LongInt; var textures: LongWord);
  73. glDeleteTextures: procedure(n: LongInt; var textures: LongWord);
  74. glBindTexture: procedure(target: GLenum; texture: LongWord);
  75. glPrioritizeTextures: procedure(n: LongInt; var textures: LongWord; var priorities: GLclampf);
  76. glAreTexturesResident: function(n: LongInt; var textures: LongWord; var residences: Boolean): Boolean;
  77. glIsTexture: function(texture: LongWord): Boolean;
  78. glTexSubImage1D: procedure(target: GLenum; level, xoffset, width: LongInt; format, AType: GLenum; var pixels);
  79. glTexSubImage2D: procedure(target: GLenum; level, xoffset, yoffset, width, height: LongInt; format, AType: GLenum; var pixels);
  80. glCopyTexImage1D: procedure(target: GLenum; level: LongInt; format: GLenum; x, y, width, border: LongInt);
  81. glCopyTexImage2D: procedure(target: GLenum; level: LongInt; format: GLenum; x, y, width, height, border: LongInt);
  82. glCopyTexSubImage1D: procedure(target: GLenum; level, xoffset, x, y, width: LongInt);
  83. glCopyTexSubImage2D: procedure(target: GLenum; level, xoffset, yoffset, x, y, width, height: LongInt);
  84. %END