home *** CD-ROM | disk | FTP | other *** search
/ QBasic & Borland Pascal & C / Delphi5.iso / Runimage / Delphi50 / Source / Rtl / Win / OPENGL.PAS < prev    next >
Encoding:
Pascal/Delphi Source File  |  1999-08-11  |  146.2 KB  |  3,548 lines
  1.  
  2. {*******************************************************}
  3. {                                                       }
  4. {       Borland Delphi Runtime Library                  }
  5. {       OpenGL interface unit                           }
  6. {                                                       }
  7. {*******************************************************}
  8.  
  9. (*
  10. ** Copyright 1991-1993, Silicon Graphics, Inc.
  11. ** All Rights Reserved.
  12. **
  13. ** This is UNPUBLISHED PROPRIETARY SOURCE CODE of Silicon Graphics, Inc.;
  14. ** the contents of this file may not be disclosed to third parties, copied or
  15. ** duplicated in any form, in whole or in part, without the prior written
  16. ** permission of Silicon Graphics, Inc.
  17. **
  18. ** RESTRICTED RIGHTS LEGEND:
  19. ** Use, duplication or disclosure by the Government is subject to restrictions
  20. ** as set forth in subdivision (c)(1)(ii) of the Rights in Technical Data
  21. ** and Computer Software clause at DFARS 252.227-7013, and/or in similar or
  22. ** successor clauses in the FAR, DOD or NASA FAR Supplement. Unpublished -
  23. ** rights reserved under the Copyright Laws of the United States.
  24. *)
  25.  
  26. unit Opengl;
  27.  
  28. interface
  29.  
  30. uses Windows;
  31.  
  32. type
  33.   {$EXTERNALSYM HGLRC}
  34.   HGLRC = THandle;
  35.  
  36. type
  37.   GLenum = Cardinal;
  38.   {$EXTERNALSYM GLenum}
  39.   GLboolean = BYTEBOOL;
  40.   {$EXTERNALSYM GLboolean}
  41.   GLbitfield = Cardinal;
  42.   {$EXTERNALSYM GLbitfield}
  43.   GLbyte = Shortint;   { signed char }
  44.   {$EXTERNALSYM GLbyte}
  45.   GLshort = SmallInt;
  46.   {$EXTERNALSYM GLshort}
  47.   GLint = Integer;
  48.   {$EXTERNALSYM GLint}
  49.   GLsizei = Integer;
  50.   {$EXTERNALSYM GLsizei}
  51.   GLubyte = Byte;
  52.   {$EXTERNALSYM GLubyte}
  53.   GLushort = Word;
  54.   {$EXTERNALSYM GLushort}
  55.   GLuint = Cardinal;
  56.   {$EXTERNALSYM GLuint}
  57.   GLfloat = Single;
  58.   {$EXTERNALSYM GLfloat}
  59.   GLclampf = Single;
  60.   {$EXTERNALSYM GLclampf}
  61.   GLdouble = Double;
  62.   {$EXTERNALSYM GLdouble}
  63.   GLclampd = Double;
  64.   {$EXTERNALSYM GLclampd}
  65.  
  66.   PGLBoolean = ^GLBoolean;
  67.   PGLByte = ^GLByte;
  68.   PGLShort = ^GLShort;
  69.   PGLInt = ^GLInt;
  70.   PGLSizei = ^GLSizei;
  71.   PGLubyte = ^GLubyte;
  72.   PGLushort = ^GLushort;
  73.   PGLuint = ^GLuint;
  74.   PGLclampf = ^GLclampf;
  75.   PGLfloat =  ^GLFloat;
  76.   PGLdouble = ^GLDouble;
  77.   PGLclampd = ^GLclampd;
  78.  
  79.   TGLArrayf4 = array [0..3] of GLFloat;
  80.   TGLArrayf3 = array [0..2] of GLFloat;
  81.   TGLArrayi4 = array [0..3] of GLint;
  82.   {...}
  83.  
  84. {*************************************************************}
  85.  
  86. const
  87. { AttribMask }
  88.   GL_CURRENT_BIT                      = $00000001;
  89.   {$EXTERNALSYM GL_CURRENT_BIT}
  90.   GL_POINT_BIT                        = $00000002;
  91.   {$EXTERNALSYM GL_POINT_BIT}
  92.   GL_LINE_BIT                         = $00000004;
  93.   {$EXTERNALSYM GL_LINE_BIT}
  94.   GL_POLYGON_BIT                      = $00000008;
  95.   {$EXTERNALSYM GL_POLYGON_BIT}
  96.   GL_POLYGON_STIPPLE_BIT              = $00000010;
  97.   {$EXTERNALSYM GL_POLYGON_STIPPLE_BIT}
  98.   GL_PIXEL_MODE_BIT                   = $00000020;
  99.   {$EXTERNALSYM GL_PIXEL_MODE_BIT}
  100.   GL_LIGHTING_BIT                     = $00000040;
  101.   {$EXTERNALSYM GL_LIGHTING_BIT}
  102.   GL_FOG_BIT                          = $00000080;
  103.   {$EXTERNALSYM GL_FOG_BIT}
  104.   GL_DEPTH_BUFFER_BIT                 = $00000100;
  105.   {$EXTERNALSYM GL_DEPTH_BUFFER_BIT}
  106.   GL_ACCUM_BUFFER_BIT                 = $00000200;
  107.   {$EXTERNALSYM GL_ACCUM_BUFFER_BIT}
  108.   GL_STENCIL_BUFFER_BIT               = $00000400;
  109.   {$EXTERNALSYM GL_STENCIL_BUFFER_BIT}
  110.   GL_VIEWPORT_BIT                     = $00000800;
  111.   {$EXTERNALSYM GL_VIEWPORT_BIT}
  112.   GL_TRANSFORM_BIT                    = $00001000;
  113.   {$EXTERNALSYM GL_TRANSFORM_BIT}
  114.   GL_ENABLE_BIT                       = $00002000;
  115.   {$EXTERNALSYM GL_ENABLE_BIT}
  116.   GL_COLOR_BUFFER_BIT                 = $00004000;
  117.   {$EXTERNALSYM GL_COLOR_BUFFER_BIT}
  118.   GL_HINT_BIT                         = $00008000;
  119.   {$EXTERNALSYM GL_HINT_BIT}
  120.   GL_EVAL_BIT                         = $00010000;
  121.   {$EXTERNALSYM GL_EVAL_BIT}
  122.   GL_LIST_BIT                         = $00020000;
  123.   {$EXTERNALSYM GL_LIST_BIT}
  124.   GL_TEXTURE_BIT                      = $00040000;
  125.   {$EXTERNALSYM GL_TEXTURE_BIT}
  126.   GL_SCISSOR_BIT                      = $00080000;
  127.   {$EXTERNALSYM GL_SCISSOR_BIT}
  128.   GL_ALL_ATTRIB_BITS                  = $000fffff;
  129.   {$EXTERNALSYM GL_ALL_ATTRIB_BITS}
  130.  
  131. { ClearBufferMask }
  132. {      GL_COLOR_BUFFER_BIT }
  133. {      GL_ACCUM_BUFFER_BIT }
  134. {      GL_STENCIL_BUFFER_BIT }
  135. {      GL_DEPTH_BUFFER_BIT }
  136.  
  137. { Boolean }
  138.   GL_FALSE                            = Boolean(0);
  139.   {$EXTERNALSYM GL_FALSE}
  140.   GL_TRUE                             = Boolean(1);
  141.   {$EXTERNALSYM GL_TRUE}
  142.  
  143. { BeginMode }
  144.   GL_POINTS                           = $0000    ;
  145.   {$EXTERNALSYM GL_POINTS}
  146.   GL_LINES                            = $0001    ;
  147.   {$EXTERNALSYM GL_LINES}
  148.   GL_LINE_LOOP                        = $0002    ;
  149.   {$EXTERNALSYM GL_LINE_LOOP}
  150.   GL_LINE_STRIP                       = $0003    ;
  151.   {$EXTERNALSYM GL_LINE_STRIP}
  152.   GL_TRIANGLES                        = $0004    ;
  153.   {$EXTERNALSYM GL_TRIANGLES}
  154.   GL_TRIANGLE_STRIP                   = $0005    ;
  155.   {$EXTERNALSYM GL_TRIANGLE_STRIP}
  156.   GL_TRIANGLE_FAN                     = $0006    ;
  157.   {$EXTERNALSYM GL_TRIANGLE_FAN}
  158.   GL_QUADS                            = $0007    ;
  159.   {$EXTERNALSYM GL_QUADS}
  160.   GL_QUAD_STRIP                       = $0008    ;
  161.   {$EXTERNALSYM GL_QUAD_STRIP}
  162.   GL_POLYGON                          = $0009    ;
  163.   {$EXTERNALSYM GL_POLYGON}
  164.  
  165. { AccumOp }
  166.   GL_ACCUM                            = $0100;
  167.   {$EXTERNALSYM GL_ACCUM}
  168.   GL_LOAD                             = $0101;
  169.   {$EXTERNALSYM GL_LOAD}
  170.   GL_RETURN                           = $0102;
  171.   {$EXTERNALSYM GL_RETURN}
  172.   GL_MULT                             = $0103;
  173.   {$EXTERNALSYM GL_MULT}
  174.   GL_ADD                              = $0104;
  175.   {$EXTERNALSYM GL_ADD}
  176.  
  177. { AlphaFunction }
  178.   GL_NEVER                            = $0200;
  179.   {$EXTERNALSYM GL_NEVER}
  180.   GL_LESS                             = $0201;
  181.   {$EXTERNALSYM GL_LESS}
  182.   GL_EQUAL                            = $0202;
  183.   {$EXTERNALSYM GL_EQUAL}
  184.   GL_LEQUAL                           = $0203;
  185.   {$EXTERNALSYM GL_LEQUAL}
  186.   GL_GREATER                          = $0204;
  187.   {$EXTERNALSYM GL_GREATER}
  188.   GL_NOTEQUAL                         = $0205;
  189.   {$EXTERNALSYM GL_NOTEQUAL}
  190.   GL_GEQUAL                           = $0206;
  191.   {$EXTERNALSYM GL_GEQUAL}
  192.   GL_ALWAYS                           = $0207;
  193.   {$EXTERNALSYM GL_ALWAYS}
  194.  
  195. { BlendingFactorDest }
  196.   GL_ZERO                             = 0;
  197.   {$EXTERNALSYM GL_ZERO}
  198.   GL_ONE                              = 1;
  199.   {$EXTERNALSYM GL_ONE}
  200.   GL_SRC_COLOR                        = $0300;
  201.   {$EXTERNALSYM GL_SRC_COLOR}
  202.   GL_ONE_MINUS_SRC_COLOR              = $0301;
  203.   {$EXTERNALSYM GL_ONE_MINUS_SRC_COLOR}
  204.   GL_SRC_ALPHA                        = $0302;
  205.   {$EXTERNALSYM GL_SRC_ALPHA}
  206.   GL_ONE_MINUS_SRC_ALPHA              = $0303;
  207.   {$EXTERNALSYM GL_ONE_MINUS_SRC_ALPHA}
  208.   GL_DST_ALPHA                        = $0304;
  209.   {$EXTERNALSYM GL_DST_ALPHA}
  210.   GL_ONE_MINUS_DST_ALPHA              = $0305;
  211.   {$EXTERNALSYM GL_ONE_MINUS_DST_ALPHA}
  212.  
  213. { BlendingFactorSrc }
  214. {      GL_ZERO }
  215. {      GL_ONE }
  216.   GL_DST_COLOR                        = $0306;
  217.   {$EXTERNALSYM GL_DST_COLOR}
  218.   GL_ONE_MINUS_DST_COLOR              = $0307;
  219.   {$EXTERNALSYM GL_ONE_MINUS_DST_COLOR}
  220.   GL_SRC_ALPHA_SATURATE               = $0308;
  221.   {$EXTERNALSYM GL_SRC_ALPHA_SATURATE}
  222. {      GL_SRC_ALPHA }
  223. {      GL_ONE_MINUS_SRC_ALPHA }
  224. {      GL_DST_ALPHA }
  225. {      GL_ONE_MINUS_DST_ALPHA }
  226.  
  227. { BlendingMode }
  228. {      GL_LOGIC_OP }
  229.  
  230. { ColorMaterialFace }
  231. {      GL_FRONT }
  232. {      GL_BACK }
  233. {      GL_FRONT_AND_BACK }
  234.  
  235. { ColorMaterialParameter }
  236. {      GL_AMBIENT }
  237. {      GL_DIFFUSE }
  238. {      GL_SPECULAR }
  239. {      GL_EMISSION }
  240. {      GL_AMBIENT_AND_DIFFUSE }
  241.  
  242. { CullFaceMode }
  243. {      GL_FRONT }
  244. {      GL_BACK }
  245. {      GL_FRONT_AND_BACK }
  246.  
  247. { DepthFunction }
  248. {      GL_NEVER }
  249. {      GL_LESS }
  250. {      GL_EQUAL }
  251. {      GL_LEQUAL }
  252. {      GL_GREATER }
  253. {      GL_NOTEQUAL }
  254. {      GL_GEQUAL }
  255. {      GL_ALWAYS }
  256.  
  257. { DrawBufferMode }
  258.   GL_NONE                             = 0;
  259.   {$EXTERNALSYM GL_NONE}
  260.   GL_FRONT_LEFT                       = $0400;
  261.   {$EXTERNALSYM GL_FRONT_LEFT}
  262.   GL_FRONT_RIGHT                      = $0401;
  263.   {$EXTERNALSYM GL_FRONT_RIGHT}
  264.   GL_BACK_LEFT                        = $0402;
  265.   {$EXTERNALSYM GL_BACK_LEFT}
  266.   GL_BACK_RIGHT                       = $0403;
  267.   {$EXTERNALSYM GL_BACK_RIGHT}
  268.   GL_FRONT                            = $0404;
  269.   {$EXTERNALSYM GL_FRONT}
  270.   GL_BACK                             = $0405;
  271.   {$EXTERNALSYM GL_BACK}
  272.   GL_LEFT                             = $0406;
  273.   {$EXTERNALSYM GL_LEFT}
  274.   GL_RIGHT                            = $0407;
  275.   {$EXTERNALSYM GL_RIGHT}
  276.   GL_FRONT_AND_BACK                   = $0408;
  277.   {$EXTERNALSYM GL_FRONT_AND_BACK}
  278.   GL_AUX0                             = $0409;
  279.   {$EXTERNALSYM GL_AUX0}
  280.   GL_AUX1                             = $040A;
  281.   {$EXTERNALSYM GL_AUX1}
  282.   GL_AUX2                             = $040B;
  283.   {$EXTERNALSYM GL_AUX2}
  284.   GL_AUX3                             = $040C;
  285.   {$EXTERNALSYM GL_AUX3}
  286.  
  287. { ErrorCode }
  288.   GL_NO_ERROR                         = 0;
  289.   {$EXTERNALSYM GL_NO_ERROR}
  290.   GL_INVALID_ENUM                     = $0500;
  291.   {$EXTERNALSYM GL_INVALID_ENUM}
  292.   GL_INVALID_VALUE                    = $0501;
  293.   {$EXTERNALSYM GL_INVALID_VALUE}
  294.   GL_INVALID_OPERATION                = $0502;
  295.   {$EXTERNALSYM GL_INVALID_OPERATION}
  296.   GL_STACK_OVERFLOW                   = $0503;
  297.   {$EXTERNALSYM GL_STACK_OVERFLOW}
  298.   GL_STACK_UNDERFLOW                  = $0504;
  299.   {$EXTERNALSYM GL_STACK_UNDERFLOW}
  300.   GL_OUT_OF_MEMORY                    = $0505;
  301.   {$EXTERNALSYM GL_OUT_OF_MEMORY}
  302.  
  303. { FeedBackMode }
  304.   GL_2D                               = $0600;
  305.   {$EXTERNALSYM GL_2D}
  306.   GL_3D                               = $0601;
  307.   {$EXTERNALSYM GL_3D}
  308.   GL_3D_COLOR                         = $0602;
  309.   {$EXTERNALSYM GL_3D_COLOR}
  310.   GL_3D_COLOR_TEXTURE                 = $0603;
  311.   {$EXTERNALSYM GL_3D_COLOR_TEXTURE}
  312.   GL_4D_COLOR_TEXTURE                 = $0604;
  313.   {$EXTERNALSYM GL_4D_COLOR_TEXTURE}
  314.  
  315. { FeedBackToken }
  316.   GL_PASS_THROUGH_TOKEN               = $0700;
  317.   {$EXTERNALSYM GL_PASS_THROUGH_TOKEN}
  318.   GL_POINT_TOKEN                      = $0701;
  319.   {$EXTERNALSYM GL_POINT_TOKEN}
  320.   GL_LINE_TOKEN                       = $0702;
  321.   {$EXTERNALSYM GL_LINE_TOKEN}
  322.   GL_POLYGON_TOKEN                    = $0703;
  323.   {$EXTERNALSYM GL_POLYGON_TOKEN}
  324.   GL_BITMAP_TOKEN                     = $0704;
  325.   {$EXTERNALSYM GL_BITMAP_TOKEN}
  326.   GL_DRAW_PIXEL_TOKEN                 = $0705;
  327.   {$EXTERNALSYM GL_DRAW_PIXEL_TOKEN}
  328.   GL_COPY_PIXEL_TOKEN                 = $0706;
  329.   {$EXTERNALSYM GL_COPY_PIXEL_TOKEN}
  330.   GL_LINE_RESET_TOKEN                 = $0707;
  331.   {$EXTERNALSYM GL_LINE_RESET_TOKEN}
  332.  
  333. { FogMode }
  334. {      GL_LINEAR }
  335.   GL_EXP                              = $0800;
  336.   {$EXTERNALSYM GL_EXP}
  337.   GL_EXP2                             = $0801;
  338.   {$EXTERNALSYM GL_EXP2}
  339.  
  340. { FogParameter }
  341. {      GL_FOG_COLOR }
  342. {      GL_FOG_DENSITY }
  343. {      GL_FOG_END }
  344. {      GL_FOG_INDEX }
  345. {      GL_FOG_MODE }
  346. {      GL_FOG_START }
  347.  
  348. { FrontFaceDirection }
  349.   GL_CW                               = $0900;
  350.   {$EXTERNALSYM GL_CW}
  351.   GL_CCW                              = $0901;
  352.   {$EXTERNALSYM GL_CCW}
  353.  
  354. { GetMapTarget }
  355.   GL_COEFF                            = $0A00;
  356.   {$EXTERNALSYM GL_COEFF}
  357.   GL_ORDER                            = $0A01;
  358.   {$EXTERNALSYM GL_ORDER}
  359.   GL_DOMAIN                           = $0A02;
  360.   {$EXTERNALSYM GL_DOMAIN}
  361.  
  362. { GetPixelMap }
  363.   GL_PIXEL_MAP_I_TO_I                 = $0C70;
  364.   {$EXTERNALSYM GL_PIXEL_MAP_I_TO_I}
  365.   GL_PIXEL_MAP_S_TO_S                 = $0C71;
  366.   {$EXTERNALSYM GL_PIXEL_MAP_S_TO_S}
  367.   GL_PIXEL_MAP_I_TO_R                 = $0C72;
  368.   {$EXTERNALSYM GL_PIXEL_MAP_I_TO_R}
  369.   GL_PIXEL_MAP_I_TO_G                 = $0C73;
  370.   {$EXTERNALSYM GL_PIXEL_MAP_I_TO_G}
  371.   GL_PIXEL_MAP_I_TO_B                 = $0C74;
  372.   {$EXTERNALSYM GL_PIXEL_MAP_I_TO_B}
  373.   GL_PIXEL_MAP_I_TO_A                 = $0C75;
  374.   {$EXTERNALSYM GL_PIXEL_MAP_I_TO_A}
  375.   GL_PIXEL_MAP_R_TO_R                 = $0C76;
  376.   {$EXTERNALSYM GL_PIXEL_MAP_R_TO_R}
  377.   GL_PIXEL_MAP_G_TO_G                 = $0C77;
  378.   {$EXTERNALSYM GL_PIXEL_MAP_G_TO_G}
  379.   GL_PIXEL_MAP_B_TO_B                 = $0C78;
  380.   {$EXTERNALSYM GL_PIXEL_MAP_B_TO_B}
  381.   GL_PIXEL_MAP_A_TO_A                 = $0C79;
  382.   {$EXTERNALSYM GL_PIXEL_MAP_A_TO_A}
  383.  
  384. { GetTarget }
  385.   GL_CURRENT_COLOR                    = $0B00;
  386.   {$EXTERNALSYM GL_CURRENT_COLOR}
  387.   GL_CURRENT_INDEX                    = $0B01;
  388.   {$EXTERNALSYM GL_CURRENT_INDEX}
  389.   GL_CURRENT_NORMAL                   = $0B02;
  390.   {$EXTERNALSYM GL_CURRENT_NORMAL}
  391.   GL_CURRENT_TEXTURE_COORDS           = $0B03;
  392.   {$EXTERNALSYM GL_CURRENT_TEXTURE_COORDS}
  393.   GL_CURRENT_RASTER_COLOR             = $0B04;
  394.   {$EXTERNALSYM GL_CURRENT_RASTER_COLOR}
  395.   GL_CURRENT_RASTER_INDEX             = $0B05;
  396.   {$EXTERNALSYM GL_CURRENT_RASTER_INDEX}
  397.   GL_CURRENT_RASTER_TEXTURE_COORDS    = $0B06;
  398.   {$EXTERNALSYM GL_CURRENT_RASTER_TEXTURE_COORDS}
  399.   GL_CURRENT_RASTER_POSITION          = $0B07;
  400.   {$EXTERNALSYM GL_CURRENT_RASTER_POSITION}
  401.   GL_CURRENT_RASTER_POSITION_VALID    = $0B08;
  402.   {$EXTERNALSYM GL_CURRENT_RASTER_POSITION_VALID}
  403.   GL_CURRENT_RASTER_DISTANCE          = $0B09;
  404.   {$EXTERNALSYM GL_CURRENT_RASTER_DISTANCE}
  405.   GL_POINT_SMOOTH                     = $0B10;
  406.   {$EXTERNALSYM GL_POINT_SMOOTH}
  407.   GL_POINT_SIZE                       = $0B11;
  408.   {$EXTERNALSYM GL_POINT_SIZE}
  409.   GL_POINT_SIZE_RANGE                 = $0B12;
  410.   {$EXTERNALSYM GL_POINT_SIZE_RANGE}
  411.   GL_POINT_SIZE_GRANULARITY           = $0B13;
  412.   {$EXTERNALSYM GL_POINT_SIZE_GRANULARITY}
  413.   GL_LINE_SMOOTH                      = $0B20;
  414.   {$EXTERNALSYM GL_LINE_SMOOTH}
  415.   GL_LINE_WIDTH                       = $0B21;
  416.   {$EXTERNALSYM GL_LINE_WIDTH}
  417.   GL_LINE_WIDTH_RANGE                 = $0B22;
  418.   {$EXTERNALSYM GL_LINE_WIDTH_RANGE}
  419.   GL_LINE_WIDTH_GRANULARITY           = $0B23;
  420.   {$EXTERNALSYM GL_LINE_WIDTH_GRANULARITY}
  421.   GL_LINE_STIPPLE                     = $0B24;
  422.   {$EXTERNALSYM GL_LINE_STIPPLE}
  423.   GL_LINE_STIPPLE_PATTERN             = $0B25;
  424.   {$EXTERNALSYM GL_LINE_STIPPLE_PATTERN}
  425.   GL_LINE_STIPPLE_REPEAT              = $0B26;
  426.   {$EXTERNALSYM GL_LINE_STIPPLE_REPEAT}
  427.   GL_LIST_MODE                        = $0B30;
  428.   {$EXTERNALSYM GL_LIST_MODE}
  429.   GL_MAX_LIST_NESTING                 = $0B31;
  430.   {$EXTERNALSYM GL_MAX_LIST_NESTING}
  431.   GL_LIST_BASE                        = $0B32;
  432.   {$EXTERNALSYM GL_LIST_BASE}
  433.   GL_LIST_INDEX                       = $0B33;
  434.   {$EXTERNALSYM GL_LIST_INDEX}
  435.   GL_POLYGON_MODE                     = $0B40;
  436.   {$EXTERNALSYM GL_POLYGON_MODE}
  437.   GL_POLYGON_SMOOTH                   = $0B41;
  438.   {$EXTERNALSYM GL_POLYGON_SMOOTH}
  439.   GL_POLYGON_STIPPLE                  = $0B42;
  440.   {$EXTERNALSYM GL_POLYGON_STIPPLE}
  441.   GL_EDGE_FLAG                        = $0B43;
  442.   {$EXTERNALSYM GL_EDGE_FLAG}
  443.   GL_CULL_FACE                        = $0B44;
  444.   {$EXTERNALSYM GL_CULL_FACE}
  445.   GL_CULL_FACE_MODE                   = $0B45;
  446.   {$EXTERNALSYM GL_CULL_FACE_MODE}
  447.   GL_FRONT_FACE                       = $0B46;
  448.   {$EXTERNALSYM GL_FRONT_FACE}
  449.   GL_LIGHTING                         = $0B50;
  450.   {$EXTERNALSYM GL_LIGHTING}
  451.   GL_LIGHT_MODEL_LOCAL_VIEWER         = $0B51;
  452.   {$EXTERNALSYM GL_LIGHT_MODEL_LOCAL_VIEWER}
  453.   GL_LIGHT_MODEL_TWO_SIDE             = $0B52;
  454.   {$EXTERNALSYM GL_LIGHT_MODEL_TWO_SIDE}
  455.   GL_LIGHT_MODEL_AMBIENT              = $0B53;
  456.   {$EXTERNALSYM GL_LIGHT_MODEL_AMBIENT}
  457.   GL_SHADE_MODEL                      = $0B54;
  458.   {$EXTERNALSYM GL_SHADE_MODEL}
  459.   GL_COLOR_MATERIAL_FACE              = $0B55;
  460.   {$EXTERNALSYM GL_COLOR_MATERIAL_FACE}
  461.   GL_COLOR_MATERIAL_PARAMETER         = $0B56;
  462.   {$EXTERNALSYM GL_COLOR_MATERIAL_PARAMETER}
  463.   GL_COLOR_MATERIAL                   = $0B57;
  464.   {$EXTERNALSYM GL_COLOR_MATERIAL}
  465.   GL_FOG                              = $0B60;
  466.   {$EXTERNALSYM GL_FOG}
  467.   GL_FOG_INDEX                        = $0B61;
  468.   {$EXTERNALSYM GL_FOG_INDEX}
  469.   GL_FOG_DENSITY                      = $0B62;
  470.   {$EXTERNALSYM GL_FOG_DENSITY}
  471.   GL_FOG_START                        = $0B63;
  472.   {$EXTERNALSYM GL_FOG_START}
  473.   GL_FOG_END                          = $0B64;
  474.   {$EXTERNALSYM GL_FOG_END}
  475.   GL_FOG_MODE                         = $0B65;
  476.   {$EXTERNALSYM GL_FOG_MODE}
  477.   GL_FOG_COLOR                        = $0B66;
  478.   {$EXTERNALSYM GL_FOG_COLOR}
  479.   GL_DEPTH_RANGE                      = $0B70;
  480.   {$EXTERNALSYM GL_DEPTH_RANGE}
  481.   GL_DEPTH_TEST                       = $0B71;
  482.   {$EXTERNALSYM GL_DEPTH_TEST}
  483.   GL_DEPTH_WRITEMASK                  = $0B72;
  484.   {$EXTERNALSYM GL_DEPTH_WRITEMASK}
  485.   GL_DEPTH_CLEAR_VALUE                = $0B73;
  486.   {$EXTERNALSYM GL_DEPTH_CLEAR_VALUE}
  487.   GL_DEPTH_FUNC                       = $0B74;
  488.   {$EXTERNALSYM GL_DEPTH_FUNC}
  489.   GL_ACCUM_CLEAR_VALUE                = $0B80;
  490.   {$EXTERNALSYM GL_ACCUM_CLEAR_VALUE}
  491.   GL_STENCIL_TEST                     = $0B90;
  492.   {$EXTERNALSYM GL_STENCIL_TEST}
  493.   GL_STENCIL_CLEAR_VALUE              = $0B91;
  494.   {$EXTERNALSYM GL_STENCIL_CLEAR_VALUE}
  495.   GL_STENCIL_FUNC                     = $0B92;
  496.   {$EXTERNALSYM GL_STENCIL_FUNC}
  497.   GL_STENCIL_VALUE_MASK               = $0B93;
  498.   {$EXTERNALSYM GL_STENCIL_VALUE_MASK}
  499.   GL_STENCIL_FAIL                     = $0B94;
  500.   {$EXTERNALSYM GL_STENCIL_FAIL}
  501.   GL_STENCIL_PASS_DEPTH_FAIL          = $0B95;
  502.   {$EXTERNALSYM GL_STENCIL_PASS_DEPTH_FAIL}
  503.   GL_STENCIL_PASS_DEPTH_PASS          = $0B96;
  504.   {$EXTERNALSYM GL_STENCIL_PASS_DEPTH_PASS}
  505.   GL_STENCIL_REF                      = $0B97;
  506.   {$EXTERNALSYM GL_STENCIL_REF}
  507.   GL_STENCIL_WRITEMASK                = $0B98;
  508.   {$EXTERNALSYM GL_STENCIL_WRITEMASK}
  509.   GL_MATRIX_MODE                      = $0BA0;
  510.   {$EXTERNALSYM GL_MATRIX_MODE}
  511.   GL_NORMALIZE                        = $0BA1;
  512.   {$EXTERNALSYM GL_NORMALIZE}
  513.   GL_VIEWPORT                         = $0BA2;
  514.   {$EXTERNALSYM GL_VIEWPORT}
  515.   GL_MODELVIEW_STACK_DEPTH            = $0BA3;
  516.   {$EXTERNALSYM GL_MODELVIEW_STACK_DEPTH}
  517.   GL_PROJECTION_STACK_DEPTH           = $0BA4;
  518.   {$EXTERNALSYM GL_PROJECTION_STACK_DEPTH}
  519.   GL_TEXTURE_STACK_DEPTH              = $0BA5;
  520.   {$EXTERNALSYM GL_TEXTURE_STACK_DEPTH}
  521.   GL_MODELVIEW_MATRIX                 = $0BA6;
  522.   {$EXTERNALSYM GL_MODELVIEW_MATRIX}
  523.   GL_PROJECTION_MATRIX                = $0BA7;
  524.   {$EXTERNALSYM GL_PROJECTION_MATRIX}
  525.   GL_TEXTURE_MATRIX                   = $0BA8;
  526.   {$EXTERNALSYM GL_TEXTURE_MATRIX}
  527.   GL_ATTRIB_STACK_DEPTH               = $0BB0;
  528.   {$EXTERNALSYM GL_ATTRIB_STACK_DEPTH}
  529.   GL_ALPHA_TEST                       = $0BC0;
  530.   {$EXTERNALSYM GL_ALPHA_TEST}
  531.   GL_ALPHA_TEST_FUNC                  = $0BC1;
  532.   {$EXTERNALSYM GL_ALPHA_TEST_FUNC}
  533.   GL_ALPHA_TEST_REF                   = $0BC2;
  534.   {$EXTERNALSYM GL_ALPHA_TEST_REF}
  535.   GL_DITHER                           = $0BD0;
  536.   {$EXTERNALSYM GL_DITHER}
  537.   GL_BLEND_DST                        = $0BE0;
  538.   {$EXTERNALSYM GL_BLEND_DST}
  539.   GL_BLEND_SRC                        = $0BE1;
  540.   {$EXTERNALSYM GL_BLEND_SRC}
  541.   GL_BLEND                            = $0BE2;
  542.   {$EXTERNALSYM GL_BLEND}
  543.   GL_LOGIC_OP_MODE                    = $0BF0;
  544.   {$EXTERNALSYM GL_LOGIC_OP_MODE}
  545.   GL_LOGIC_OP                         = $0BF1;
  546.   {$EXTERNALSYM GL_LOGIC_OP}
  547.   GL_AUX_BUFFERS                      = $0C00;
  548.   {$EXTERNALSYM GL_AUX_BUFFERS}
  549.   GL_DRAW_BUFFER                      = $0C01;
  550.   {$EXTERNALSYM GL_DRAW_BUFFER}
  551.   GL_READ_BUFFER                      = $0C02;
  552.   {$EXTERNALSYM GL_READ_BUFFER}
  553.   GL_SCISSOR_BOX                      = $0C10;
  554.   {$EXTERNALSYM GL_SCISSOR_BOX}
  555.   GL_SCISSOR_TEST                     = $0C11;
  556.   {$EXTERNALSYM GL_SCISSOR_TEST}
  557.   GL_INDEX_CLEAR_VALUE                = $0C20;
  558.   {$EXTERNALSYM GL_INDEX_CLEAR_VALUE}
  559.   GL_INDEX_WRITEMASK                  = $0C21;
  560.   {$EXTERNALSYM GL_INDEX_WRITEMASK}
  561.   GL_COLOR_CLEAR_VALUE                = $0C22;
  562.   {$EXTERNALSYM GL_COLOR_CLEAR_VALUE}
  563.   GL_COLOR_WRITEMASK                  = $0C23;
  564.   {$EXTERNALSYM GL_COLOR_WRITEMASK}
  565.   GL_INDEX_MODE                       = $0C30;
  566.   {$EXTERNALSYM GL_INDEX_MODE}
  567.   GL_RGBA_MODE                        = $0C31;
  568.   {$EXTERNALSYM GL_RGBA_MODE}
  569.   GL_DOUBLEBUFFER                     = $0C32;
  570.   {$EXTERNALSYM GL_DOUBLEBUFFER}
  571.   GL_STEREO                           = $0C33;
  572.   {$EXTERNALSYM GL_STEREO}
  573.   GL_RENDER_MODE                      = $0C40;
  574.   {$EXTERNALSYM GL_RENDER_MODE}
  575.   GL_PERSPECTIVE_CORRECTION_HINT      = $0C50;
  576.   {$EXTERNALSYM GL_PERSPECTIVE_CORRECTION_HINT}
  577.   GL_POINT_SMOOTH_HINT                = $0C51;
  578.   {$EXTERNALSYM GL_POINT_SMOOTH_HINT}
  579.   GL_LINE_SMOOTH_HINT                 = $0C52;
  580.   {$EXTERNALSYM GL_LINE_SMOOTH_HINT}
  581.   GL_POLYGON_SMOOTH_HINT              = $0C53;
  582.   {$EXTERNALSYM GL_POLYGON_SMOOTH_HINT}
  583.   GL_FOG_HINT                         = $0C54;
  584.   {$EXTERNALSYM GL_FOG_HINT}
  585.   GL_TEXTURE_GEN_S                    = $0C60;
  586.   {$EXTERNALSYM GL_TEXTURE_GEN_S}
  587.   GL_TEXTURE_GEN_T                    = $0C61;
  588.   {$EXTERNALSYM GL_TEXTURE_GEN_T}
  589.   GL_TEXTURE_GEN_R                    = $0C62;
  590.   {$EXTERNALSYM GL_TEXTURE_GEN_R}
  591.   GL_TEXTURE_GEN_Q                    = $0C63;
  592.   {$EXTERNALSYM GL_TEXTURE_GEN_Q}
  593.   GL_PIXEL_MAP_I_TO_I_SIZE            = $0CB0;
  594.   {$EXTERNALSYM GL_PIXEL_MAP_I_TO_I_SIZE}
  595.   GL_PIXEL_MAP_S_TO_S_SIZE            = $0CB1;
  596.   {$EXTERNALSYM GL_PIXEL_MAP_S_TO_S_SIZE}
  597.   GL_PIXEL_MAP_I_TO_R_SIZE            = $0CB2;
  598.   {$EXTERNALSYM GL_PIXEL_MAP_I_TO_R_SIZE}
  599.   GL_PIXEL_MAP_I_TO_G_SIZE            = $0CB3;
  600.   {$EXTERNALSYM GL_PIXEL_MAP_I_TO_G_SIZE}
  601.   GL_PIXEL_MAP_I_TO_B_SIZE            = $0CB4;
  602.   {$EXTERNALSYM GL_PIXEL_MAP_I_TO_B_SIZE}
  603.   GL_PIXEL_MAP_I_TO_A_SIZE            = $0CB5;
  604.   {$EXTERNALSYM GL_PIXEL_MAP_I_TO_A_SIZE}
  605.   GL_PIXEL_MAP_R_TO_R_SIZE            = $0CB6;
  606.   {$EXTERNALSYM GL_PIXEL_MAP_R_TO_R_SIZE}
  607.   GL_PIXEL_MAP_G_TO_G_SIZE            = $0CB7;
  608.   {$EXTERNALSYM GL_PIXEL_MAP_G_TO_G_SIZE}
  609.   GL_PIXEL_MAP_B_TO_B_SIZE            = $0CB8;
  610.   {$EXTERNALSYM GL_PIXEL_MAP_B_TO_B_SIZE}
  611.   GL_PIXEL_MAP_A_TO_A_SIZE            = $0CB9;
  612.   {$EXTERNALSYM GL_PIXEL_MAP_A_TO_A_SIZE}
  613.   GL_UNPACK_SWAP_BYTES                = $0CF0;
  614.   {$EXTERNALSYM GL_UNPACK_SWAP_BYTES}
  615.   GL_UNPACK_LSB_FIRST                 = $0CF1;
  616.   {$EXTERNALSYM GL_UNPACK_LSB_FIRST}
  617.   GL_UNPACK_ROW_LENGTH                = $0CF2;
  618.   {$EXTERNALSYM GL_UNPACK_ROW_LENGTH}
  619.   GL_UNPACK_SKIP_ROWS                 = $0CF3;
  620.   {$EXTERNALSYM GL_UNPACK_SKIP_ROWS}
  621.   GL_UNPACK_SKIP_PIXELS               = $0CF4;
  622.   {$EXTERNALSYM GL_UNPACK_SKIP_PIXELS}
  623.   GL_UNPACK_ALIGNMENT                 = $0CF5;
  624.   {$EXTERNALSYM GL_UNPACK_ALIGNMENT}
  625.   GL_PACK_SWAP_BYTES                  = $0D00;
  626.   {$EXTERNALSYM GL_PACK_SWAP_BYTES}
  627.   GL_PACK_LSB_FIRST                   = $0D01;
  628.   {$EXTERNALSYM GL_PACK_LSB_FIRST}
  629.   GL_PACK_ROW_LENGTH                  = $0D02;
  630.   {$EXTERNALSYM GL_PACK_ROW_LENGTH}
  631.   GL_PACK_SKIP_ROWS                   = $0D03;
  632.   {$EXTERNALSYM GL_PACK_SKIP_ROWS}
  633.   GL_PACK_SKIP_PIXELS                 = $0D04;
  634.   {$EXTERNALSYM GL_PACK_SKIP_PIXELS}
  635.   GL_PACK_ALIGNMENT                   = $0D05;
  636.   {$EXTERNALSYM GL_PACK_ALIGNMENT}
  637.   GL_MAP_COLOR                        = $0D10;
  638.   {$EXTERNALSYM GL_MAP_COLOR}
  639.   GL_MAP_STENCIL                      = $0D11;
  640.   {$EXTERNALSYM GL_MAP_STENCIL}
  641.   GL_INDEX_SHIFT                      = $0D12;
  642.   {$EXTERNALSYM GL_INDEX_SHIFT}
  643.   GL_INDEX_OFFSET                     = $0D13;
  644.   {$EXTERNALSYM GL_INDEX_OFFSET}
  645.   GL_RED_SCALE                        = $0D14;
  646.   {$EXTERNALSYM GL_RED_SCALE}
  647.   GL_RED_BIAS                         = $0D15;
  648.   {$EXTERNALSYM GL_RED_BIAS}
  649.   GL_ZOOM_X                           = $0D16;
  650.   {$EXTERNALSYM GL_ZOOM_X}
  651.   GL_ZOOM_Y                           = $0D17;
  652.   {$EXTERNALSYM GL_ZOOM_Y}
  653.   GL_GREEN_SCALE                      = $0D18;
  654.   {$EXTERNALSYM GL_GREEN_SCALE}
  655.   GL_GREEN_BIAS                       = $0D19;
  656.   {$EXTERNALSYM GL_GREEN_BIAS}
  657.   GL_BLUE_SCALE                       = $0D1A;
  658.   {$EXTERNALSYM GL_BLUE_SCALE}
  659.   GL_BLUE_BIAS                        = $0D1B;
  660.   {$EXTERNALSYM GL_BLUE_BIAS}
  661.   GL_ALPHA_SCALE                      = $0D1C;
  662.   {$EXTERNALSYM GL_ALPHA_SCALE}
  663.   GL_ALPHA_BIAS                       = $0D1D;
  664.   {$EXTERNALSYM GL_ALPHA_BIAS}
  665.   GL_DEPTH_SCALE                      = $0D1E;
  666.   {$EXTERNALSYM GL_DEPTH_SCALE}
  667.   GL_DEPTH_BIAS                       = $0D1F;
  668.   {$EXTERNALSYM GL_DEPTH_BIAS}
  669.   GL_MAX_EVAL_ORDER                   = $0D30;
  670.   {$EXTERNALSYM GL_MAX_EVAL_ORDER}
  671.   GL_MAX_LIGHTS                       = $0D31;
  672.   {$EXTERNALSYM GL_MAX_EVAL_ORDER}
  673.   GL_MAX_CLIP_PLANES                  = $0D32;
  674.   {$EXTERNALSYM GL_MAX_CLIP_PLANES}
  675.   GL_MAX_TEXTURE_SIZE                 = $0D33;
  676.   {$EXTERNALSYM GL_MAX_TEXTURE_SIZE}
  677.   GL_MAX_PIXEL_MAP_TABLE              = $0D34;
  678.   {$EXTERNALSYM GL_MAX_PIXEL_MAP_TABLE}
  679.   GL_MAX_ATTRIB_STACK_DEPTH           = $0D35;
  680.   {$EXTERNALSYM GL_MAX_ATTRIB_STACK_DEPTH}
  681.   GL_MAX_MODELVIEW_STACK_DEPTH        = $0D36;
  682.   {$EXTERNALSYM GL_MAX_MODELVIEW_STACK_DEPTH}
  683.   GL_MAX_NAME_STACK_DEPTH             = $0D37;
  684.   {$EXTERNALSYM GL_MAX_NAME_STACK_DEPTH}
  685.   GL_MAX_PROJECTION_STACK_DEPTH       = $0D38;
  686.   {$EXTERNALSYM GL_MAX_PROJECTION_STACK_DEPTH}
  687.   GL_MAX_TEXTURE_STACK_DEPTH          = $0D39;
  688.   {$EXTERNALSYM GL_MAX_TEXTURE_STACK_DEPTH}
  689.   GL_MAX_VIEWPORT_DIMS                = $0D3A;
  690.   {$EXTERNALSYM GL_MAX_VIEWPORT_DIMS}
  691.   GL_SUBPIXEL_BITS                    = $0D50;
  692.   {$EXTERNALSYM GL_SUBPIXEL_BITS}
  693.   GL_INDEX_BITS                       = $0D51;
  694.   {$EXTERNALSYM GL_INDEX_BITS}
  695.   GL_RED_BITS                         = $0D52;
  696.   {$EXTERNALSYM GL_RED_BITS}
  697.   GL_GREEN_BITS                       = $0D53;
  698.   {$EXTERNALSYM GL_GREEN_BITS}
  699.   GL_BLUE_BITS                        = $0D54;
  700.   {$EXTERNALSYM GL_BLUE_BITS}
  701.   GL_ALPHA_BITS                       = $0D55;
  702.   {$EXTERNALSYM GL_ALPHA_BITS}
  703.   GL_DEPTH_BITS                       = $0D56;
  704.   {$EXTERNALSYM GL_DEPTH_BITS}
  705.   GL_STENCIL_BITS                     = $0D57;
  706.   {$EXTERNALSYM GL_STENCIL_BITS}
  707.   GL_ACCUM_RED_BITS                   = $0D58;
  708.   {$EXTERNALSYM GL_ACCUM_RED_BITS}
  709.   GL_ACCUM_GREEN_BITS                 = $0D59;
  710.   {$EXTERNALSYM GL_ACCUM_GREEN_BITS}
  711.   GL_ACCUM_BLUE_BITS                  = $0D5A;
  712.   {$EXTERNALSYM GL_ACCUM_BLUE_BITS}
  713.   GL_ACCUM_ALPHA_BITS                 = $0D5B;
  714.   {$EXTERNALSYM GL_ACCUM_ALPHA_BITS}
  715.   GL_NAME_STACK_DEPTH                 = $0D70;
  716.   {$EXTERNALSYM GL_NAME_STACK_DEPTH}
  717.   GL_AUTO_NORMAL                      = $0D80;
  718.   {$EXTERNALSYM GL_AUTO_NORMAL}
  719.   GL_MAP1_COLOR_4                     = $0D90;
  720.   {$EXTERNALSYM GL_MAP1_COLOR_4}
  721.   GL_MAP1_INDEX                       = $0D91;
  722.   {$EXTERNALSYM GL_MAP1_INDEX}
  723.   GL_MAP1_NORMAL                      = $0D92;
  724.   {$EXTERNALSYM GL_MAP1_NORMAL}
  725.   GL_MAP1_TEXTURE_COORD_1             = $0D93;
  726.   {$EXTERNALSYM GL_MAP1_TEXTURE_COORD_1}
  727.   GL_MAP1_TEXTURE_COORD_2             = $0D94;
  728.   {$EXTERNALSYM GL_MAP1_TEXTURE_COORD_2}
  729.   GL_MAP1_TEXTURE_COORD_3             = $0D95;
  730.   {$EXTERNALSYM GL_MAP1_TEXTURE_COORD_3}
  731.   GL_MAP1_TEXTURE_COORD_4             = $0D96;
  732.   {$EXTERNALSYM GL_MAP1_TEXTURE_COORD_4}
  733.   GL_MAP1_VERTEX_3                    = $0D97;
  734.   {$EXTERNALSYM GL_MAP1_VERTEX_3}
  735.   GL_MAP1_VERTEX_4                    = $0D98;
  736.   {$EXTERNALSYM GL_MAP1_VERTEX_4}
  737.   GL_MAP2_COLOR_4                     = $0DB0;
  738.   {$EXTERNALSYM GL_MAP2_COLOR_4}
  739.   GL_MAP2_INDEX                       = $0DB1;
  740.   {$EXTERNALSYM GL_MAP2_INDEX}
  741.   GL_MAP2_NORMAL                      = $0DB2;
  742.   {$EXTERNALSYM GL_MAP2_NORMAL}
  743.   GL_MAP2_TEXTURE_COORD_1             = $0DB3;
  744.   {$EXTERNALSYM GL_MAP2_TEXTURE_COORD_1}
  745.   GL_MAP2_TEXTURE_COORD_2             = $0DB4;
  746.   {$EXTERNALSYM GL_MAP2_TEXTURE_COORD_2}
  747.   GL_MAP2_TEXTURE_COORD_3             = $0DB5;
  748.   {$EXTERNALSYM GL_MAP2_TEXTURE_COORD_3}
  749.   GL_MAP2_TEXTURE_COORD_4             = $0DB6;
  750.   {$EXTERNALSYM GL_MAP2_TEXTURE_COORD_4}
  751.   GL_MAP2_VERTEX_3                    = $0DB7;
  752.   {$EXTERNALSYM GL_MAP2_VERTEX_3}
  753.   GL_MAP2_VERTEX_4                    = $0DB8;
  754.   {$EXTERNALSYM GL_MAP2_VERTEX_4}
  755.   GL_MAP1_GRID_DOMAIN                 = $0DD0;
  756.   {$EXTERNALSYM GL_MAP1_GRID_DOMAIN}
  757.   GL_MAP1_GRID_SEGMENTS               = $0DD1;
  758.   {$EXTERNALSYM GL_MAP1_GRID_SEGMENTS}
  759.   GL_MAP2_GRID_DOMAIN                 = $0DD2;
  760.   {$EXTERNALSYM GL_MAP2_GRID_DOMAIN}
  761.   GL_MAP2_GRID_SEGMENTS               = $0DD3;
  762.   {$EXTERNALSYM GL_MAP2_GRID_SEGMENTS}
  763.   GL_TEXTURE_1D                       = $0DE0;
  764.   {$EXTERNALSYM GL_TEXTURE_1D}
  765.   GL_TEXTURE_2D                       = $0DE1;
  766.   {$EXTERNALSYM GL_TEXTURE_2D}
  767.  
  768. { GetTextureParameter }
  769. {      GL_TEXTURE_MAG_FILTER }
  770. {      GL_TEXTURE_MIN_FILTER }
  771. {      GL_TEXTURE_WRAP_S }
  772. {      GL_TEXTURE_WRAP_T }
  773.   GL_TEXTURE_WIDTH                    = $1000;
  774.   {$EXTERNALSYM GL_TEXTURE_WIDTH}
  775.   GL_TEXTURE_HEIGHT                   = $1001;
  776.   {$EXTERNALSYM GL_TEXTURE_HEIGHT}
  777.   GL_TEXTURE_COMPONENTS               = $1003;
  778.   {$EXTERNALSYM GL_TEXTURE_COMPONENTS}
  779.   GL_TEXTURE_BORDER_COLOR             = $1004;
  780.   {$EXTERNALSYM GL_TEXTURE_BORDER_COLOR}
  781.   GL_TEXTURE_BORDER                   = $1005;
  782.   {$EXTERNALSYM GL_TEXTURE_BORDER}
  783.  
  784. { HintMode }
  785.   GL_DONT_CARE                        = $1100;
  786.   {$EXTERNALSYM GL_DONT_CARE}
  787.   GL_FASTEST                          = $1101;
  788.   {$EXTERNALSYM GL_FASTEST}
  789.   GL_NICEST                           = $1102;
  790.   {$EXTERNALSYM GL_NICEST}
  791.  
  792. { HintTarget }
  793. {      GL_PERSPECTIVE_CORRECTION_HINT }
  794. {      GL_POINT_SMOOTH_HINT }
  795. {      GL_LINE_SMOOTH_HINT }
  796. {      GL_POLYGON_SMOOTH_HINT }
  797. {      GL_FOG_HINT }
  798.  
  799. { LightModelParameter }
  800. {      GL_LIGHT_MODEL_AMBIENT }
  801. {      GL_LIGHT_MODEL_LOCAL_VIEWER }
  802. {      GL_LIGHT_MODEL_TWO_SIDE }
  803.  
  804. { LightParameter }
  805.   GL_AMBIENT                          = $1200;
  806.   {$EXTERNALSYM GL_AMBIENT}
  807.   GL_DIFFUSE                          = $1201;
  808.   {$EXTERNALSYM GL_DIFFUSE}
  809.   GL_SPECULAR                         = $1202;
  810.   {$EXTERNALSYM GL_SPECULAR}
  811.   GL_POSITION                         = $1203;
  812.   {$EXTERNALSYM GL_POSITION}
  813.   GL_SPOT_DIRECTION                   = $1204;
  814.   {$EXTERNALSYM GL_SPOT_DIRECTION}
  815.   GL_SPOT_EXPONENT                    = $1205;
  816.   {$EXTERNALSYM GL_SPOT_EXPONENT}
  817.   GL_SPOT_CUTOFF                      = $1206;
  818.   {$EXTERNALSYM GL_SPOT_CUTOFF}
  819.   GL_CONSTANT_ATTENUATION             = $1207;
  820.   {$EXTERNALSYM GL_CONSTANT_ATTENUATION}
  821.   GL_LINEAR_ATTENUATION               = $1208;
  822.   {$EXTERNALSYM GL_LINEAR_ATTENUATION}
  823.   GL_QUADRATIC_ATTENUATION            = $1209;
  824.   {$EXTERNALSYM GL_QUADRATIC_ATTENUATION}
  825.  
  826. { ListMode }
  827.   GL_COMPILE                          = $1300;
  828.   {$EXTERNALSYM GL_COMPILE}
  829.   GL_COMPILE_AND_EXECUTE              = $1301;
  830.   {$EXTERNALSYM GL_COMPILE_AND_EXECUTE}
  831.  
  832. { ListNameType }
  833.   GL_BYTE                             = $1400;
  834.   {$EXTERNALSYM GL_BYTE}
  835.   GL_UNSIGNED_BYTE                    = $1401;
  836.   {$EXTERNALSYM GL_UNSIGNED_BYTE}
  837.   GL_SHORT                            = $1402;
  838.   {$EXTERNALSYM GL_SHORT}
  839.   GL_UNSIGNED_SHORT                   = $1403;
  840.   {$EXTERNALSYM GL_UNSIGNED_SHORT}
  841.   GL_INT                              = $1404;
  842.   {$EXTERNALSYM GL_INT}
  843.   GL_UNSIGNED_INT                     = $1405;
  844.   {$EXTERNALSYM GL_UNSIGNED_INT}
  845.   GL_FLOAT                            = $1406;
  846.   {$EXTERNALSYM GL_FLOAT}
  847.   GL_2_BYTES                          = $1407;
  848.   {$EXTERNALSYM GL_2_BYTES}
  849.   GL_3_BYTES                          = $1408;
  850.   {$EXTERNALSYM GL_3_BYTES}
  851.   GL_4_BYTES                          = $1409;
  852.   {$EXTERNALSYM GL_4_BYTES}
  853.  
  854. { LogicOp }
  855.   GL_CLEAR                            = $1500;
  856.   {$EXTERNALSYM GL_CLEAR}
  857.   GL_AND                              = $1501;
  858.   {$EXTERNALSYM GL_AND}
  859.   GL_AND_REVERSE                      = $1502;
  860.   {$EXTERNALSYM GL_AND_REVERSE}
  861.   GL_COPY                             = $1503;
  862.   {$EXTERNALSYM GL_COPY}
  863.   GL_AND_INVERTED                     = $1504;
  864.   {$EXTERNALSYM GL_AND_INVERTED}
  865.   GL_NOOP                             = $1505;
  866.   {$EXTERNALSYM GL_NOOP}
  867.   GL_XOR                              = $1506;
  868.   {$EXTERNALSYM GL_XOR}
  869.   GL_OR                               = $1507;
  870.   {$EXTERNALSYM GL_OR}
  871.   GL_NOR                              = $1508;
  872.   {$EXTERNALSYM GL_NOR}
  873.   GL_EQUIV                            = $1509;
  874.   {$EXTERNALSYM GL_EQUIV}
  875.   GL_INVERT                           = $150A;
  876.   {$EXTERNALSYM GL_INVERT}
  877.   GL_OR_REVERSE                       = $150B;
  878.   {$EXTERNALSYM GL_OR_REVERSE}
  879.   GL_COPY_INVERTED                    = $150C;
  880.   {$EXTERNALSYM GL_COPY_INVERTED}
  881.   GL_OR_INVERTED                      = $150D;
  882.   {$EXTERNALSYM GL_OR_INVERTED}
  883.   GL_NAND                             = $150E;
  884.   {$EXTERNALSYM GL_NAND}
  885.   GL_SET                              = $150F;
  886.   {$EXTERNALSYM GL_SET}
  887.  
  888. { MapTarget }
  889. {      GL_MAP1_COLOR_4 }
  890. {      GL_MAP1_INDEX }
  891. {      GL_MAP1_NORMAL }
  892. {      GL_MAP1_TEXTURE_COORD_1 }
  893. {      GL_MAP1_TEXTURE_COORD_2 }
  894. {      GL_MAP1_TEXTURE_COORD_3 }
  895. {      GL_MAP1_TEXTURE_COORD_4 }
  896. {      GL_MAP1_VERTEX_3 }
  897. {      GL_MAP1_VERTEX_4 }
  898. {      GL_MAP2_COLOR_4 }
  899. {      GL_MAP2_INDEX }
  900. {      GL_MAP2_NORMAL }
  901. {      GL_MAP2_TEXTURE_COORD_1 }
  902. {      GL_MAP2_TEXTURE_COORD_2 }
  903. {      GL_MAP2_TEXTURE_COORD_3 }
  904. {      GL_MAP2_TEXTURE_COORD_4 }
  905. {      GL_MAP2_VERTEX_3 }
  906. {      GL_MAP2_VERTEX_4 }
  907.  
  908. { MaterialFace }
  909. {      GL_FRONT }
  910. {      GL_BACK }
  911. {      GL_FRONT_AND_BACK }
  912.  
  913. { MaterialParameter }
  914.   GL_EMISSION                         = $1600;
  915.   {$EXTERNALSYM GL_EMISSION}
  916.   GL_SHININESS                        = $1601;
  917.   {$EXTERNALSYM GL_SHININESS}
  918.   GL_AMBIENT_AND_DIFFUSE              = $1602;
  919.   {$EXTERNALSYM GL_AMBIENT_AND_DIFFUSE}
  920.   GL_COLOR_INDEXES                    = $1603;
  921.   {$EXTERNALSYM GL_COLOR_INDEXES}
  922. {      GL_AMBIENT }
  923. {      GL_DIFFUSE }
  924. {      GL_SPECULAR }
  925.  
  926. { MatrixMode }
  927.   GL_MODELVIEW                        = $1700;
  928.   {$EXTERNALSYM GL_MODELVIEW}
  929.   GL_PROJECTION                       = $1701;
  930.   {$EXTERNALSYM GL_PROJECTION}
  931.   GL_TEXTURE                          = $1702;
  932.   {$EXTERNALSYM GL_TEXTURE}
  933.  
  934. { MeshMode1 }
  935. {      GL_POINT }
  936. {      GL_LINE }
  937.  
  938. { MeshMode2 }
  939. {      GL_POINT }
  940. {      GL_LINE }
  941. {      GL_FILL }
  942.  
  943. { PixelCopyType }
  944.   GL_COLOR                            = $1800;
  945.   {$EXTERNALSYM GL_COLOR}
  946.   GL_DEPTH                            = $1801;
  947.   {$EXTERNALSYM GL_DEPTH}
  948.   GL_STENCIL                          = $1802;
  949.   {$EXTERNALSYM GL_STENCIL}
  950.  
  951. { PixelFormat }
  952.   GL_COLOR_INDEX                      = $1900;
  953.   {$EXTERNALSYM GL_COLOR_INDEX}
  954.   GL_STENCIL_INDEX                    = $1901;
  955.   {$EXTERNALSYM GL_STENCIL_INDEX}
  956.   GL_DEPTH_COMPONENT                  = $1902;
  957.   {$EXTERNALSYM GL_DEPTH_COMPONENT}
  958.   GL_RED                              = $1903;
  959.   {$EXTERNALSYM GL_RED}
  960.   GL_GREEN                            = $1904;
  961.   {$EXTERNALSYM GL_GREEN}
  962.   GL_BLUE                             = $1905;
  963.   {$EXTERNALSYM GL_BLUE}
  964.   GL_ALPHA                            = $1906;
  965.   {$EXTERNALSYM GL_ALPHA}
  966.   GL_RGB                              = $1907;
  967.   {$EXTERNALSYM GL_RGB}
  968.   GL_RGBA                             = $1908;
  969.   {$EXTERNALSYM GL_RGBA}
  970.   GL_LUMINANCE                        = $1909;
  971.   {$EXTERNALSYM GL_LUMINANCE}
  972.   GL_LUMINANCE_ALPHA                  = $190A;
  973.   {$EXTERNALSYM GL_LUMINANCE_ALPHA}
  974.  
  975. { PixelMap }
  976. {      GL_PIXEL_MAP_I_TO_I }
  977. {      GL_PIXEL_MAP_S_TO_S }
  978. {      GL_PIXEL_MAP_I_TO_R }
  979. {      GL_PIXEL_MAP_I_TO_G }
  980. {      GL_PIXEL_MAP_I_TO_B }
  981. {      GL_PIXEL_MAP_I_TO_A }
  982. {      GL_PIXEL_MAP_R_TO_R }
  983. {      GL_PIXEL_MAP_G_TO_G }
  984. {      GL_PIXEL_MAP_B_TO_B }
  985. {      GL_PIXEL_MAP_A_TO_A }
  986.  
  987. { PixelStore }
  988. {      GL_UNPACK_SWAP_BYTES }
  989. {      GL_UNPACK_LSB_FIRST }
  990. {      GL_UNPACK_ROW_LENGTH }
  991. {      GL_UNPACK_SKIP_ROWS }
  992. {      GL_UNPACK_SKIP_PIXELS }
  993. {      GL_UNPACK_ALIGNMENT }
  994. {      GL_PACK_SWAP_BYTES }
  995. {      GL_PACK_LSB_FIRST }
  996. {      GL_PACK_ROW_LENGTH }
  997. {      GL_PACK_SKIP_ROWS }
  998. {      GL_PACK_SKIP_PIXELS }
  999. {      GL_PACK_ALIGNMENT }
  1000.  
  1001. { PixelTransfer }
  1002. {      GL_MAP_COLOR }
  1003. {      GL_MAP_STENCIL }
  1004. {      GL_INDEX_SHIFT }
  1005. {      GL_INDEX_OFFSET }
  1006. {      GL_RED_SCALE }
  1007. {      GL_RED_BIAS }
  1008. {      GL_GREEN_SCALE }
  1009. {      GL_GREEN_BIAS }
  1010. {      GL_BLUE_SCALE }
  1011. {      GL_BLUE_BIAS }
  1012. {      GL_ALPHA_SCALE }
  1013. {      GL_ALPHA_BIAS }
  1014. {      GL_DEPTH_SCALE }
  1015. {      GL_DEPTH_BIAS }
  1016.  
  1017. { PixelType }
  1018.   GL_BITMAP                           = $1A00;
  1019.   {$EXTERNALSYM GL_BITMAP}
  1020. {      GL_BYTE }
  1021. {      GL_UNSIGNED_BYTE }
  1022. {      GL_SHORT }
  1023. {      GL_UNSIGNED_SHORT }
  1024. {      GL_INT }
  1025. {      GL_UNSIGNED_INT }
  1026. {      GL_FLOAT }
  1027.  
  1028. { PolygonMode }
  1029.   GL_POINT                            = $1B00;
  1030.   {$EXTERNALSYM GL_POINT}
  1031.   GL_LINE                             = $1B01;
  1032.   {$EXTERNALSYM GL_LINE}
  1033.   GL_FILL                             = $1B02;
  1034.   {$EXTERNALSYM GL_FILL}
  1035.  
  1036. { ReadBufferMode }
  1037. {      GL_FRONT_LEFT }
  1038. {      GL_FRONT_RIGHT }
  1039. {      GL_BACK_LEFT }
  1040. {      GL_BACK_RIGHT }
  1041. {      GL_FRONT }
  1042. {      GL_BACK }
  1043. {      GL_LEFT }
  1044. {      GL_RIGHT }
  1045. {      GL_AUX0 }
  1046. {      GL_AUX1 }
  1047. {      GL_AUX2 }
  1048. {      GL_AUX3 }
  1049.  
  1050. { RenderingMode }
  1051.   GL_RENDER                           = $1C00;
  1052.   {$EXTERNALSYM GL_RENDER}
  1053.   GL_FEEDBACK                         = $1C01;
  1054.   {$EXTERNALSYM GL_FEEDBACK}
  1055.   GL_SELECT                           = $1C02;
  1056.   {$EXTERNALSYM GL_SELECT}
  1057.  
  1058. { ShadingModel }
  1059.   GL_FLAT                             = $1D00;
  1060.   {$EXTERNALSYM GL_FLAT}
  1061.   GL_SMOOTH                           = $1D01;
  1062.   {$EXTERNALSYM GL_SMOOTH}
  1063.  
  1064. { StencilFunction }
  1065. {      GL_NEVER }
  1066. {      GL_LESS }
  1067. {      GL_EQUAL }
  1068. {      GL_LEQUAL }
  1069. {      GL_GREATER }
  1070. {      GL_NOTEQUAL }
  1071. {      GL_GEQUAL }
  1072. {      GL_ALWAYS }
  1073.  
  1074. { StencilOp }
  1075. {      GL_ZERO }
  1076.   GL_KEEP                             = $1E00;
  1077.   {$EXTERNALSYM GL_KEEP}
  1078.   GL_REPLACE                          = $1E01;
  1079.   {$EXTERNALSYM GL_REPLACE}
  1080.   GL_INCR                             = $1E02;
  1081.   {$EXTERNALSYM GL_INCR}
  1082.   GL_DECR                             = $1E03;
  1083.   {$EXTERNALSYM GL_DECR}
  1084. {      GL_INVERT }
  1085.  
  1086. { StringName }
  1087.   GL_VENDOR                           = $1F00;
  1088.   {$EXTERNALSYM GL_VENDOR}
  1089.   GL_RENDERER                         = $1F01;
  1090.   {$EXTERNALSYM GL_RENDERER}
  1091.   GL_VERSION                          = $1F02;
  1092.   {$EXTERNALSYM GL_VERSION}
  1093.   GL_EXTENSIONS                       = $1F03;
  1094.   {$EXTERNALSYM GL_EXTENSIONS}
  1095.  
  1096. { TextureCoordName }
  1097.   GL_S                                = $2000;
  1098.   {$EXTERNALSYM GL_S}
  1099.   GL_T                                = $2001;
  1100.   {$EXTERNALSYM GL_T}
  1101.   GL_R                                = $2002;
  1102.   {$EXTERNALSYM GL_R}
  1103.   GL_Q                                = $2003;
  1104.   {$EXTERNALSYM GL_Q}
  1105.  
  1106. { TextureEnvMode }
  1107.   GL_MODULATE                         = $2100;
  1108.   {$EXTERNALSYM GL_MODULATE}
  1109.   GL_DECAL                            = $2101;
  1110.   {$EXTERNALSYM GL_DECAL}
  1111. {      GL_BLEND }
  1112.  
  1113. { TextureEnvParameter }
  1114.   GL_TEXTURE_ENV_MODE                 = $2200;
  1115.   {$EXTERNALSYM GL_TEXTURE_ENV_MODE}
  1116.   GL_TEXTURE_ENV_COLOR                = $2201;
  1117.   {$EXTERNALSYM GL_TEXTURE_ENV_COLOR}
  1118.  
  1119. { TextureEnvTarget }
  1120.   GL_TEXTURE_ENV                      = $2300;
  1121.   {$EXTERNALSYM GL_TEXTURE_ENV}
  1122.  
  1123. { TextureGenMode }
  1124.   GL_EYE_LINEAR                       = $2400;
  1125.   {$EXTERNALSYM GL_EYE_LINEAR}
  1126.   GL_OBJECT_LINEAR                    = $2401;
  1127.   {$EXTERNALSYM GL_OBJECT_LINEAR}
  1128.   GL_SPHERE_MAP                       = $2402;
  1129.   {$EXTERNALSYM GL_SPHERE_MAP}
  1130.  
  1131. { TextureGenParameter }
  1132.   GL_TEXTURE_GEN_MODE                 = $2500;
  1133.   {$EXTERNALSYM GL_TEXTURE_GEN_MODE}
  1134.   GL_OBJECT_PLANE                     = $2501;
  1135.   {$EXTERNALSYM GL_OBJECT_PLANE}
  1136.   GL_EYE_PLANE                        = $2502;
  1137.   {$EXTERNALSYM GL_EYE_PLANE}
  1138.  
  1139. { TextureMagFilter }
  1140.   GL_NEAREST                          = $2600;
  1141.   {$EXTERNALSYM GL_NEAREST}
  1142.   GL_LINEAR                           = $2601;
  1143.   {$EXTERNALSYM GL_LINEAR}
  1144.  
  1145. { TextureMinFilter }
  1146. {      GL_NEAREST }
  1147. {      GL_LINEAR }
  1148.   GL_NEAREST_MIPMAP_NEAREST           = $2700;
  1149.   {$EXTERNALSYM GL_NEAREST_MIPMAP_NEAREST}
  1150.   GL_LINEAR_MIPMAP_NEAREST            = $2701;
  1151.   {$EXTERNALSYM GL_LINEAR_MIPMAP_NEAREST}
  1152.   GL_NEAREST_MIPMAP_LINEAR            = $2702;
  1153.   {$EXTERNALSYM GL_NEAREST_MIPMAP_LINEAR}
  1154.   GL_LINEAR_MIPMAP_LINEAR             = $2703;
  1155.   {$EXTERNALSYM GL_LINEAR_MIPMAP_LINEAR}
  1156.  
  1157. { TextureParameterName }
  1158.   GL_TEXTURE_MAG_FILTER               = $2800;
  1159.   {$EXTERNALSYM GL_TEXTURE_MAG_FILTER}
  1160.   GL_TEXTURE_MIN_FILTER               = $2801;
  1161.   {$EXTERNALSYM GL_TEXTURE_MIN_FILTER}
  1162.   GL_TEXTURE_WRAP_S                   = $2802;
  1163.   {$EXTERNALSYM GL_TEXTURE_WRAP_S}
  1164.   GL_TEXTURE_WRAP_T                   = $2803;
  1165.   {$EXTERNALSYM GL_TEXTURE_WRAP_T}
  1166. {      GL_TEXTURE_BORDER_COLOR }
  1167.  
  1168. { TextureTarget }
  1169. {      GL_TEXTURE_1D }
  1170. {      GL_TEXTURE_2D }
  1171.  
  1172. { TextureWrapMode }
  1173.   GL_CLAMP                            = $2900;
  1174.   {$EXTERNALSYM GL_CLAMP}
  1175.   GL_REPEAT                           = $2901;
  1176.   {$EXTERNALSYM GL_REPEAT}
  1177.  
  1178. { ClipPlaneName }
  1179.   GL_CLIP_PLANE0                      = $3000;
  1180.   {$EXTERNALSYM GL_CLIP_PLANE0}
  1181.   GL_CLIP_PLANE1                      = $3001;
  1182.   {$EXTERNALSYM GL_CLIP_PLANE1}
  1183.   GL_CLIP_PLANE2                      = $3002;
  1184.   {$EXTERNALSYM GL_CLIP_PLANE2}
  1185.   GL_CLIP_PLANE3                      = $3003;
  1186.   {$EXTERNALSYM GL_CLIP_PLANE3}
  1187.   GL_CLIP_PLANE4                      = $3004;
  1188.   {$EXTERNALSYM GL_CLIP_PLANE4}
  1189.   GL_CLIP_PLANE5                      = $3005;
  1190.   {$EXTERNALSYM GL_CLIP_PLANE5}
  1191.  
  1192. { LightName }
  1193.   GL_LIGHT0                           = $4000;
  1194.   {$EXTERNALSYM GL_LIGHT0}
  1195.   GL_LIGHT1                           = $4001;
  1196.   {$EXTERNALSYM GL_LIGHT1}
  1197.   GL_LIGHT2                           = $4002;
  1198.   {$EXTERNALSYM GL_LIGHT2}
  1199.   GL_LIGHT3                           = $4003;
  1200.   {$EXTERNALSYM GL_LIGHT3}
  1201.   GL_LIGHT4                           = $4004;
  1202.   {$EXTERNALSYM GL_LIGHT4}
  1203.   GL_LIGHT5                           = $4005;
  1204.   {$EXTERNALSYM GL_LIGHT5}
  1205.   GL_LIGHT6                           = $4006;
  1206.   {$EXTERNALSYM GL_LIGHT6}
  1207.   GL_LIGHT7                           = $4007;
  1208.   {$EXTERNALSYM GL_LIGHT7}
  1209.  
  1210. // Extensions
  1211.   GL_EXT_vertex_array                 = 1;
  1212.   {$EXTERNALSYM GL_EXT_vertex_array}
  1213.   GL_WIN_swap_hint                    = 1;
  1214.   {$EXTERNALSYM GL_WIN_swap_hint}
  1215.  
  1216. // EXT_vertex_array
  1217.   GL_VERTEX_ARRAY_EXT               = $8074;
  1218.   {$EXTERNALSYM GL_VERTEX_ARRAY_EXT}
  1219.   GL_NORMAL_ARRAY_EXT               = $8075;
  1220.   {$EXTERNALSYM GL_NORMAL_ARRAY_EXT}
  1221.   GL_COLOR_ARRAY_EXT                = $8076;
  1222.   {$EXTERNALSYM GL_COLOR_ARRAY_EXT}
  1223.   GL_INDEX_ARRAY_EXT                = $8077;
  1224.   {$EXTERNALSYM GL_INDEX_ARRAY_EXT}
  1225.   GL_TEXTURE_COORD_ARRAY_EXT        = $8078;
  1226.   {$EXTERNALSYM GL_TEXTURE_COORD_ARRAY_EXT}
  1227.   GL_EDGE_FLAG_ARRAY_EXT            = $8079;
  1228.   {$EXTERNALSYM GL_EDGE_FLAG_ARRAY_EXT}
  1229.   GL_VERTEX_ARRAY_SIZE_EXT          = $807A;
  1230.   {$EXTERNALSYM GL_VERTEX_ARRAY_SIZE_EXT}
  1231.   GL_VERTEX_ARRAY_TYPE_EXT          = $807B;
  1232.   {$EXTERNALSYM GL_VERTEX_ARRAY_TYPE_EXT}
  1233.   GL_VERTEX_ARRAY_STRIDE_EXT        = $807C;
  1234.   {$EXTERNALSYM GL_VERTEX_ARRAY_STRIDE_EXT}
  1235.   GL_VERTEX_ARRAY_COUNT_EXT         = $807D;
  1236.   {$EXTERNALSYM GL_VERTEX_ARRAY_COUNT_EXT}
  1237.   GL_NORMAL_ARRAY_TYPE_EXT          = $807E;
  1238.   {$EXTERNALSYM GL_NORMAL_ARRAY_TYPE_EXT}
  1239.   GL_NORMAL_ARRAY_STRIDE_EXT        = $807F;
  1240.   {$EXTERNALSYM GL_NORMAL_ARRAY_STRIDE_EXT}
  1241.   GL_NORMAL_ARRAY_COUNT_EXT         = $8080;
  1242.   {$EXTERNALSYM GL_NORMAL_ARRAY_COUNT_EXT}
  1243.   GL_COLOR_ARRAY_SIZE_EXT           = $8081;
  1244.   {$EXTERNALSYM GL_COLOR_ARRAY_SIZE_EXT}
  1245.   GL_COLOR_ARRAY_TYPE_EXT           = $8082;
  1246.   {$EXTERNALSYM GL_COLOR_ARRAY_TYPE_EXT}
  1247.   GL_COLOR_ARRAY_STRIDE_EXT         = $8083;
  1248.   {$EXTERNALSYM GL_COLOR_ARRAY_STRIDE_EXT}
  1249.   GL_COLOR_ARRAY_COUNT_EXT          = $8084;
  1250.   {$EXTERNALSYM GL_COLOR_ARRAY_COUNT_EXT}
  1251.   GL_INDEX_ARRAY_TYPE_EXT           = $8085;
  1252.   {$EXTERNALSYM GL_INDEX_ARRAY_TYPE_EXT}
  1253.   GL_INDEX_ARRAY_STRIDE_EXT         = $8086;
  1254.   {$EXTERNALSYM GL_INDEX_ARRAY_STRIDE_EXT}
  1255.   GL_INDEX_ARRAY_COUNT_EXT          = $8087;
  1256.   {$EXTERNALSYM GL_INDEX_ARRAY_COUNT_EXT}
  1257.   GL_TEXTURE_COORD_ARRAY_SIZE_EXT   = $8088;
  1258.   {$EXTERNALSYM GL_TEXTURE_COORD_ARRAY_SIZE_EXT}
  1259.   GL_TEXTURE_COORD_ARRAY_TYPE_EXT   = $8089;
  1260.   {$EXTERNALSYM GL_TEXTURE_COORD_ARRAY_TYPE_EXT}
  1261.   GL_TEXTURE_COORD_ARRAY_STRIDE_EXT = $808A;
  1262.   {$EXTERNALSYM GL_TEXTURE_COORD_ARRAY_STRIDE_EXT}
  1263.   GL_TEXTURE_COORD_ARRAY_COUNT_EXT  = $808B;
  1264.   {$EXTERNALSYM GL_TEXTURE_COORD_ARRAY_COUNT_EXT}
  1265.   GL_EDGE_FLAG_ARRAY_STRIDE_EXT     = $808C;
  1266.   {$EXTERNALSYM GL_EDGE_FLAG_ARRAY_STRIDE_EXT}
  1267.   GL_EDGE_FLAG_ARRAY_COUNT_EXT      = $808D;
  1268.   {$EXTERNALSYM GL_EDGE_FLAG_ARRAY_COUNT_EXT}
  1269.   GL_VERTEX_ARRAY_POINTER_EXT       = $808E;
  1270.   {$EXTERNALSYM GL_VERTEX_ARRAY_POINTER_EXT}
  1271.   GL_NORMAL_ARRAY_POINTER_EXT       = $808F;
  1272.   {$EXTERNALSYM GL_NORMAL_ARRAY_POINTER_EXT}
  1273.   GL_COLOR_ARRAY_POINTER_EXT        = $8090;
  1274.   {$EXTERNALSYM GL_COLOR_ARRAY_POINTER_EXT}
  1275.   GL_INDEX_ARRAY_POINTER_EXT        = $8091;
  1276.   {$EXTERNALSYM GL_INDEX_ARRAY_POINTER_EXT}
  1277.   GL_TEXTURE_COORD_ARRAY_POINTER_EXT = $8092;
  1278.   {$EXTERNALSYM GL_TEXTURE_COORD_ARRAY_POINTER_EXT}
  1279.   GL_EDGE_FLAG_ARRAY_POINTER_EXT    = $8093;
  1280.   {$EXTERNALSYM GL_EDGE_FLAG_ARRAY_POINTER_EXT}
  1281.  
  1282. type
  1283.   PPointFloat = ^TPointFloat;
  1284.   {$EXTERNALSYM _POINTFLOAT}
  1285.   _POINTFLOAT = record
  1286.     X,Y: Single;
  1287.   end;
  1288.   TPointFloat = _POINTFLOAT;
  1289.   {$EXTERNALSYM POINTFLOAT}
  1290.   POINTFLOAT = _POINTFLOAT;
  1291.  
  1292.   PGlyphMetricsFloat = ^TGlyphMetricsFloat;
  1293.   {$EXTERNALSYM _GLYPHMETRICSFLOAT}
  1294.   _GLYPHMETRICSFLOAT = record
  1295.     gmfBlackBoxX: Single;
  1296.     gmfBlackBoxY: Single;
  1297.     gmfptGlyphOrigin: TPointFloat;
  1298.     gmfCellIncX: Single;
  1299.     gmfCellIncY: Single;
  1300.   end;
  1301.   TGlyphMetricsFloat = _GLYPHMETRICSFLOAT;
  1302.   {$EXTERNALSYM GLYPHMETRICSFLOAT}
  1303.   GLYPHMETRICSFLOAT = _GLYPHMETRICSFLOAT;
  1304.  
  1305. const
  1306.   {$EXTERNALSYM WGL_FONT_LINES}
  1307.   WGL_FONT_LINES      = 0;
  1308.   {$EXTERNALSYM WGL_FONT_POLYGONS}
  1309.   WGL_FONT_POLYGONS   = 1;
  1310.  
  1311. {***********************************************************}
  1312.  
  1313. procedure glAccum (op: GLenum; value: GLfloat); stdcall;
  1314.   {$EXTERNALSYM glAccum}
  1315. procedure glAlphaFunc (func: GLenum; ref: GLclampf); stdcall;
  1316.   {$EXTERNALSYM glAlphaFunc}
  1317. procedure glBegin (mode: GLenum); stdcall;
  1318.   {$EXTERNALSYM glBegin}
  1319. procedure glBitmap (width, height: GLsizei; xorig, yorig: GLfloat;
  1320.                     xmove, ymove: GLfloat; bitmap: Pointer); stdcall;
  1321.   {$EXTERNALSYM glBitmap}
  1322. procedure glBlendFunc (sfactor, dfactor: GLenum); stdcall;
  1323.   {$EXTERNALSYM glBlendFunc}
  1324. procedure glCallList (list: GLuint); stdcall;
  1325.   {$EXTERNALSYM glCallList}
  1326. procedure glCallLists (n: GLsizei; cltype: GLenum; lists: Pointer); stdcall;
  1327.   {$EXTERNALSYM glCallLists}
  1328. procedure glClear (mask: GLbitfield); stdcall;
  1329.   {$EXTERNALSYM glClear}
  1330. procedure glClearAccum (red, green, blue, alpha: GLfloat); stdcall;
  1331.   {$EXTERNALSYM glClearAccum}
  1332. procedure glClearColor (red, green, blue, alpha: GLclampf); stdcall;
  1333.   {$EXTERNALSYM glClearColor}
  1334. procedure glClearDepth (depth: GLclampd); stdcall;
  1335.   {$EXTERNALSYM glClearDepth}
  1336. procedure glClearIndex (c: GLfloat); stdcall;
  1337.   {$EXTERNALSYM glClearIndex}
  1338. procedure glClearStencil (s: GLint); stdcall;
  1339.   {$EXTERNALSYM glClearStencil}
  1340. procedure glClipPlane (plane: GLenum; equation: PGLDouble); stdcall;
  1341.   {$EXTERNALSYM glClipPlane}
  1342.  
  1343. procedure glColor3b (red, green, blue: GLbyte); stdcall;
  1344.   {$EXTERNALSYM glColor3b}
  1345. procedure glColor3bv (v: PGLByte); stdcall;
  1346.   {$EXTERNALSYM glColor3bv}
  1347. procedure glColor3d (red, green, blue: GLdouble); stdcall;
  1348.   {$EXTERNALSYM glColor3d}
  1349. procedure glColor3dv (v: PGLdouble); stdcall;
  1350.   {$EXTERNALSYM glColor3dv}
  1351. procedure glColor3f (red, green, blue: GLfloat); stdcall;
  1352.   {$EXTERNALSYM glColor3f}
  1353. procedure glColor3fv (v: PGLfloat); stdcall;
  1354.   {$EXTERNALSYM glColor3fv}
  1355. procedure glColor3i (red, green, blue: GLint); stdcall;
  1356.   {$EXTERNALSYM glColor3i}
  1357. procedure glColor3iv (v: PGLint); stdcall;
  1358.   {$EXTERNALSYM glColor3iv}
  1359. procedure glColor3s (red, green, blue: GLshort); stdcall;
  1360.   {$EXTERNALSYM glColor3s}
  1361. procedure glColor3sv (v: PGLshort); stdcall;
  1362.   {$EXTERNALSYM glColor3sv}
  1363. procedure glColor3ub (red, green, blue: GLubyte); stdcall;
  1364.   {$EXTERNALSYM glColor3ub}
  1365. procedure glColor3ubv (v: PGLubyte); stdcall;
  1366.   {$EXTERNALSYM glColor3ubv}
  1367. procedure glColor3ui (red, green, blue: GLuint); stdcall;
  1368.   {$EXTERNALSYM glColor3ui}
  1369. procedure glColor3uiv (v: PGLuint); stdcall;
  1370.   {$EXTERNALSYM glColor3uiv}
  1371. procedure glColor3us (red, green, blue: GLushort); stdcall;
  1372.   {$EXTERNALSYM glColor3us}
  1373. procedure glColor3usv (v: PGLushort); stdcall;
  1374.   {$EXTERNALSYM glColor3usv}
  1375. procedure glColor4b (red, green, blue, alpha: GLbyte); stdcall;
  1376.   {$EXTERNALSYM glColor4b}
  1377. procedure glColor4bv (v: PGLbyte); stdcall;
  1378.   {$EXTERNALSYM glColor4bv}
  1379. procedure glColor4d (red, green, blue, alpha: GLdouble); stdcall;
  1380.   {$EXTERNALSYM glColor4d}
  1381. procedure glColor4dv (v: PGLdouble); stdcall;
  1382.   {$EXTERNALSYM glColor4dv}
  1383. procedure glColor4f (red, green, blue, alpha: GLfloat); stdcall;
  1384.   {$EXTERNALSYM glColor4f}
  1385. procedure glColor4fv (v: PGLfloat); stdcall;
  1386.   {$EXTERNALSYM glColor4fv}
  1387. procedure glColor4i (red, green, blue, alpha: GLint); stdcall;
  1388.   {$EXTERNALSYM glColor4i}
  1389. procedure glColor4iv (v: PGLint); stdcall;
  1390.   {$EXTERNALSYM glColor4iv}
  1391. procedure glColor4s (red, green, blue, alpha: GLshort); stdcall;
  1392.   {$EXTERNALSYM glColor4s}
  1393. procedure glColor4sv (v: PGLshort); stdcall;
  1394.   {$EXTERNALSYM glColor4sv}
  1395. procedure glColor4ub (red, green, blue, alpha: GLubyte); stdcall;
  1396.   {$EXTERNALSYM glColor4ub}
  1397. procedure glColor4ubv (v: PGLubyte); stdcall;
  1398.   {$EXTERNALSYM glColor4ubv}
  1399. procedure glColor4ui (red, green, blue, alpha: GLuint); stdcall;
  1400.   {$EXTERNALSYM glColor4ui}
  1401. procedure glColor4uiv (v: PGLuint); stdcall;
  1402.   {$EXTERNALSYM glColor4uiv}
  1403. procedure glColor4us (red, green, blue, alpha: GLushort); stdcall;
  1404.   {$EXTERNALSYM glColor4us}
  1405. procedure glColor4usv (v: PGLushort); stdcall;
  1406.   {$EXTERNALSYM glColor4usv}
  1407. procedure glColor(red, green, blue: GLbyte); stdcall; overload;
  1408.   {$EXTERNALSYM glColor}
  1409. procedure glColor(red, green, blue: GLdouble); stdcall; overload;
  1410.   {$EXTERNALSYM glColor}
  1411. procedure glColor(red, green, blue: GLfloat); stdcall; overload;
  1412.   {$EXTERNALSYM glColor}
  1413. procedure glColor(red, green, blue: GLint); stdcall; overload;
  1414.   {$EXTERNALSYM glColor}
  1415. procedure glColor(red, green, blue: GLshort); stdcall; overload;
  1416.   {$EXTERNALSYM glColor}
  1417. procedure glColor(red, green, blue: GLubyte); stdcall; overload;
  1418.   {$EXTERNALSYM glColor}
  1419. procedure glColor(red, green, blue: GLuint); stdcall; overload;
  1420.   {$EXTERNALSYM glColor}
  1421. procedure glColor(red, green, blue: GLushort); stdcall; overload;
  1422.   {$EXTERNALSYM glColor}
  1423. procedure glColor(red, green, blue, alpha: GLbyte); stdcall; overload;
  1424.   {$EXTERNALSYM glColor}
  1425. procedure glColor(red, green, blue, alpha: GLdouble); stdcall; overload;
  1426.   {$EXTERNALSYM glColor}
  1427. procedure glColor(red, green, blue, alpha: GLfloat); stdcall; overload;
  1428.   {$EXTERNALSYM glColor}
  1429. procedure glColor(red, green, blue, alpha: GLint); stdcall; overload;
  1430.   {$EXTERNALSYM glColor}
  1431. procedure glColor(red, green, blue, alpha: GLshort); stdcall; overload;
  1432.   {$EXTERNALSYM glColor}
  1433. procedure glColor(red, green, blue, alpha: GLubyte); stdcall; overload;
  1434.   {$EXTERNALSYM glColor}
  1435. procedure glColor(red, green, blue, alpha: GLuint); stdcall; overload;
  1436.   {$EXTERNALSYM glColor}
  1437. procedure glColor(red, green, blue, alpha: GLushort); stdcall; overload;
  1438.   {$EXTERNALSYM glColor}
  1439. procedure glColor3(v: PGLbyte); stdcall; overload;
  1440.   {$EXTERNALSYM glColor3}
  1441. procedure glColor3(v: PGLdouble); stdcall; overload;
  1442.   {$EXTERNALSYM glColor3}
  1443. procedure glColor3(v: PGLfloat); stdcall; overload;
  1444.   {$EXTERNALSYM glColor3}
  1445. procedure glColor3(v: PGLint); stdcall; overload;
  1446.   {$EXTERNALSYM glColor3}
  1447. procedure glColor3(v: PGLshort); stdcall; overload;
  1448.   {$EXTERNALSYM glColor3}
  1449. procedure glColor3(v: PGLubyte); stdcall; overload;
  1450.   {$EXTERNALSYM glColor3}
  1451. procedure glColor3(v: PGLuint); stdcall; overload;
  1452.   {$EXTERNALSYM glColor3}
  1453. procedure glColor3(v: PGLushort); stdcall; overload;
  1454.   {$EXTERNALSYM glColor3}
  1455. procedure glColor4(v: PGLbyte); stdcall; overload;
  1456.   {$EXTERNALSYM glColor4}
  1457. procedure glColor4(v: PGLdouble); stdcall; overload;
  1458.   {$EXTERNALSYM glColor4}
  1459. procedure glColor4(v: PGLfloat); stdcall; overload;
  1460.   {$EXTERNALSYM glColor4}
  1461. procedure glColor4(v: PGLint); stdcall; overload;
  1462.   {$EXTERNALSYM glColor4}
  1463. procedure glColor4(v: PGLshort); stdcall; overload;
  1464.   {$EXTERNALSYM glColor4}
  1465. procedure glColor4(v: PGLubyte); stdcall; overload;
  1466.   {$EXTERNALSYM glColor4}
  1467. procedure glColor4(v: PGLuint); stdcall; overload;
  1468.   {$EXTERNALSYM glColor4}
  1469. procedure glColor4(v: PGLushort); stdcall; overload;
  1470.   {$EXTERNALSYM glColor4}
  1471.  
  1472. procedure glColorMask (red, green, blue, alpha: GLboolean); stdcall;
  1473.   {$EXTERNALSYM glColorMask}
  1474. procedure glColorMaterial (face, mode: GLenum); stdcall;
  1475.   {$EXTERNALSYM glColorMaterial}
  1476. procedure glCopyPixels (x,y: GLint; width, height: GLsizei; pixeltype: GLenum); stdcall;
  1477.   {$EXTERNALSYM glCopyPixels}
  1478. procedure glCullFace (mode: GLenum); stdcall;
  1479.   {$EXTERNALSYM glCullFace}
  1480. procedure glDeleteLists (list: GLuint; range: GLsizei); stdcall;
  1481.   {$EXTERNALSYM glDeleteLists}
  1482. procedure glDepthFunc (func: GLenum); stdcall;
  1483.   {$EXTERNALSYM glDepthFunc}
  1484. procedure glDepthMask (flag: GLboolean); stdcall;
  1485.   {$EXTERNALSYM glDepthMask}
  1486. procedure glDepthRange (zNear, zFar: GLclampd); stdcall;
  1487.   {$EXTERNALSYM glDepthRange}
  1488. procedure glDisable (cap: GLenum); stdcall;
  1489.   {$EXTERNALSYM glDisable}
  1490. procedure glDrawBuffer (mode: GLenum); stdcall;
  1491.   {$EXTERNALSYM glDrawBuffer}
  1492. procedure glDrawPixels (width, height: GLsizei; format, pixeltype: GLenum;
  1493.              pixels: Pointer); stdcall;
  1494.   {$EXTERNALSYM glDrawPixels}
  1495. procedure glEdgeFlag (flag: GLboolean); stdcall;
  1496.   {$EXTERNALSYM glEdgeFlag}
  1497. procedure glEdgeFlagv (flag: PGLboolean); stdcall;
  1498.   {$EXTERNALSYM glEdgeFlagv}
  1499. procedure glEnable (cap: GLenum); stdcall;
  1500.   {$EXTERNALSYM glEnable}
  1501. procedure glEnd; stdcall;
  1502.   {$EXTERNALSYM glEnd}
  1503. procedure glEndList; stdcall;
  1504.   {$EXTERNALSYM glEndList}
  1505.  
  1506. procedure glEvalCoord1d (u: GLdouble); stdcall;
  1507.   {$EXTERNALSYM glEvalCoord1d}
  1508. procedure glEvalCoord1dv (u: PGLdouble); stdcall;
  1509.   {$EXTERNALSYM glEvalCoord1dv}
  1510. procedure glEvalCoord1f (u: GLfloat); stdcall;
  1511.   {$EXTERNALSYM glEvalCoord1f}
  1512. procedure glEvalCoord1fv (u: PGLfloat); stdcall;
  1513.   {$EXTERNALSYM glEvalCoord1fv}
  1514. procedure glEvalCoord2d (u,v: GLdouble); stdcall;
  1515.   {$EXTERNALSYM glEvalCoord2d}
  1516. procedure glEvalCoord2dv (u: PGLdouble); stdcall;
  1517.   {$EXTERNALSYM glEvalCoord2dv}
  1518. procedure glEvalCoord2f (u,v: GLfloat); stdcall;
  1519.   {$EXTERNALSYM glEvalCoord2f}
  1520. procedure glEvalCoord2fv (u: PGLfloat); stdcall;
  1521.   {$EXTERNALSYM glEvalCoord2fv}
  1522. procedure glEvalCoord(u: GLdouble); stdcall; overload;
  1523.   {$EXTERNALSYM glEvalCoord}
  1524. procedure glEvalCoord(u: GLfloat); stdcall; overload;
  1525.   {$EXTERNALSYM glEvalCoord}
  1526. procedure glEvalCoord(u,v: GLdouble); stdcall; overload;
  1527.   {$EXTERNALSYM glEvalCoord}
  1528. procedure glEvalCoord(u,v: GLfloat); stdcall; overload;
  1529.   {$EXTERNALSYM glEvalCoord}
  1530. procedure glEvalCoord1(v: PGLdouble); stdcall; overload;
  1531.   {$EXTERNALSYM glEvalCoord1}
  1532. procedure glEvalCoord1(v: PGLfloat); stdcall; overload;
  1533.   {$EXTERNALSYM glEvalCoord1}
  1534. procedure glEvalCoord2(v: PGLdouble); stdcall; overload;
  1535.   {$EXTERNALSYM glEvalCoord2}
  1536. procedure glEvalCoord2(v: PGLfloat); stdcall; overload;
  1537.   {$EXTERNALSYM glEvalCoord2}
  1538.  
  1539. procedure glEvalMesh1 (mode: GLenum; i1, i2: GLint); stdcall;
  1540.   {$EXTERNALSYM glEvalMesh1}
  1541. procedure glEvalMesh2 (mode: GLenum; i1, i2, j1, j2: GLint); stdcall;
  1542.   {$EXTERNALSYM glEvalMesh2}
  1543. procedure glEvalMesh(mode: GLenum; i1, i2: GLint); stdcall; overload;
  1544.   {$EXTERNALSYM glEvalMesh}
  1545. procedure glEvalMesh(mode: GLenum; i1, i2, j1, j2: GLint); stdcall; overload;
  1546.   {$EXTERNALSYM glEvalMesh}
  1547.  
  1548. procedure glEvalPoint1 (i: GLint); stdcall;
  1549.   {$EXTERNALSYM glEvalPoint1}
  1550. procedure glEvalPoint2 (i,j: GLint); stdcall;
  1551.   {$EXTERNALSYM glEvalPoint2}
  1552. procedure glEvalPoint(i: GLint); stdcall; overload;
  1553.   {$EXTERNALSYM glEvalPoint}
  1554. procedure glEvalPoint(i,j: GLint); stdcall; overload;
  1555.   {$EXTERNALSYM glEvalPoint}
  1556.  
  1557. procedure glFeedbackBuffer (size: GLsizei; buftype: GLenum; buffer: PGLFloat); stdcall;
  1558.   {$EXTERNALSYM glFeedbackBuffer}
  1559. procedure glFinish; stdcall;
  1560.   {$EXTERNALSYM glFinish}
  1561. procedure glFlush; stdcall;
  1562.   {$EXTERNALSYM glFlush}
  1563.  
  1564. procedure glFogf (pname: GLenum; param: GLfloat); stdcall;
  1565.   {$EXTERNALSYM glFogf}
  1566. procedure glFogfv (pname: GLenum; params: PGLfloat); stdcall;
  1567.   {$EXTERNALSYM glFogfv}
  1568. procedure glFogi (pname: GLenum; param: GLint); stdcall;
  1569.   {$EXTERNALSYM glFogi}
  1570. procedure glFogiv (pname: GLenum; params: PGLint); stdcall;
  1571.   {$EXTERNALSYM glFogiv}
  1572. procedure glFog(pname: GLenum; param: GLfloat); stdcall; overload;
  1573.   {$EXTERNALSYM glFog}
  1574. procedure glFog(pname: GLenum; params: PGLfloat); stdcall; overload;
  1575.   {$EXTERNALSYM glFog}
  1576. procedure glFog(pname: GLenum; param: GLint); stdcall; overload;
  1577.   {$EXTERNALSYM glFog}
  1578. procedure glFog(pname: GLenum; params: PGLint); stdcall; overload;
  1579.   {$EXTERNALSYM glFog}
  1580.  
  1581. procedure glFrontFace (mode: GLenum); stdcall;
  1582.   {$EXTERNALSYM glFrontFace}
  1583. procedure glFrustum (left, right, bottom, top, zNear, zFar: GLdouble); stdcall;
  1584.   {$EXTERNALSYM glFrustum}
  1585. function  glGenLists (range: GLsizei): GLuint; stdcall;
  1586.   {$EXTERNALSYM glGenLists}
  1587. procedure glGetBooleanv (pname: GLenum; params: PGLboolean); stdcall;
  1588.   {$EXTERNALSYM glGetBooleanv}
  1589. procedure glGetClipPlane (plane: GLenum; equation: PGLdouble); stdcall;
  1590.   {$EXTERNALSYM glGetClipPlane}
  1591. procedure glGetDoublev (pname: GLenum; params: PGLdouble); stdcall;
  1592.   {$EXTERNALSYM glGetDoublev}
  1593. function  glGetError: GLenum; stdcall;
  1594.   {$EXTERNALSYM glGetError}
  1595. procedure glGetFloatv (pname: GLenum; params: PGLfloat); stdcall;
  1596.   {$EXTERNALSYM glGetFloatv}
  1597. procedure glGetIntegerv (pname: GLenum; params: PGLint); stdcall;
  1598.   {$EXTERNALSYM glGetIntegerv}
  1599.  
  1600. procedure glGetLightfv (light: GLenum; pname: GLenum; params: PGLfloat); stdcall;
  1601.   {$EXTERNALSYM glGetLightfv}
  1602. procedure glGetLightiv (light: GLenum; pname: GLenum; params: PGLint); stdcall;
  1603.   {$EXTERNALSYM glGetLightiv}
  1604. procedure glGetLight(light: GLenum; pname: GLenum; params: PGLfloat); stdcall; overload;
  1605.   {$EXTERNALSYM glGetLight}
  1606. procedure glGetLight(light: GLenum; pname: GLenum; params: PGLint); stdcall; overload;
  1607.   {$EXTERNALSYM glGetLight}
  1608.  
  1609. procedure glGetMapdv (target: GLenum; query: GLenum; v: PGLdouble); stdcall;
  1610.   {$EXTERNALSYM glGetMapdv}
  1611. procedure glGetMapfv (target: GLenum; query: GLenum; v: PGLfloat); stdcall;
  1612.   {$EXTERNALSYM glGetMapfv}
  1613. procedure glGetMapiv (target: GLenum; query: GLenum; v: PGLint); stdcall;
  1614.   {$EXTERNALSYM glGetMapiv}
  1615. procedure glGetMap(target: GLenum; query: GLenum; v: PGLdouble); stdcall; overload;
  1616.   {$EXTERNALSYM glGetMap}
  1617. procedure glGetMap(target: GLenum; query: GLenum; v: PGLfloat); stdcall; overload;
  1618.   {$EXTERNALSYM glGetMap}
  1619. procedure glGetMap(target: GLenum; query: GLenum; v: PGLint); stdcall; overload;
  1620.   {$EXTERNALSYM glGetMap}
  1621.  
  1622. procedure glGetMaterialfv (face: GLenum; pname: GLenum; params: PGLfloat); stdcall;
  1623.   {$EXTERNALSYM glGetMaterialfv}
  1624. procedure glGetMaterialiv (face: GLenum; pname: GLenum; params: PGLint); stdcall;
  1625.   {$EXTERNALSYM glGetMaterialiv}
  1626. procedure glGetMaterial(face: GLenum; pname: GLenum; params: PGLfloat); stdcall; overload;
  1627.   {$EXTERNALSYM glGetMaterial}
  1628. procedure glGetMaterial(face: GLenum; pname: GLenum; params: PGLint); stdcall; overload;
  1629.   {$EXTERNALSYM glGetMaterial}
  1630.  
  1631. procedure glGetPixelMapfv (map: GLenum; values: PGLfloat); stdcall;
  1632.   {$EXTERNALSYM glGetPixelMapfv}
  1633. procedure glGetPixelMapuiv (map: GLenum; values: PGLuint); stdcall;
  1634.   {$EXTERNALSYM glGetPixelMapuiv}
  1635. procedure glGetPixelMapusv (map: GLenum; values: PGLushort); stdcall;
  1636.   {$EXTERNALSYM glGetPixelMapusv}
  1637. procedure glGetPixelMap(map: GLenum; values: PGLfloat); stdcall; overload;
  1638.   {$EXTERNALSYM glGetPixelMap}
  1639. procedure glGetPixelMap(map: GLenum; values: PGLuint); stdcall; overload;
  1640.   {$EXTERNALSYM glGetPixelMap}
  1641. procedure glGetPixelMap(map: GLenum; values: PGLushort); stdcall; overload;
  1642.   {$EXTERNALSYM glGetPixelMap}
  1643.  
  1644. procedure glGetPolygonStipple (var mask: GLubyte); stdcall;
  1645.   {$EXTERNALSYM glGetPolygonStipple}
  1646. function  glGetString (name: GLenum): PChar; stdcall;
  1647.   {$EXTERNALSYM glGetString}
  1648.  
  1649. procedure glGetTexEnvfv (target: GLenum; pname: GLenum; params: PGLfloat); stdcall;
  1650.   {$EXTERNALSYM glGetTexEnvfv}
  1651. procedure glGetTexEnviv (target: GLenum; pname: GLenum; params: PGLint); stdcall;
  1652.   {$EXTERNALSYM glGetTexEnviv}
  1653. procedure glGetTexEnv(target: GLenum; pname: GLenum; params: PGLfloat); stdcall; overload;
  1654.   {$EXTERNALSYM glGetTexEnv}
  1655. procedure glGetTexEnv(target: GLenum; pname: GLenum; params: PGLint); stdcall; overload;
  1656.   {$EXTERNALSYM glGetTexEnv}
  1657.  
  1658. procedure glGetTexGendv (coord: GLenum; pname: GLenum; params: PGLdouble); stdcall;
  1659.   {$EXTERNALSYM glGetTexGendv}
  1660. procedure glGetTexGenfv (coord: GLenum; pname: GLenum; params: PGLfloat); stdcall;
  1661.   {$EXTERNALSYM glGetTexGenfv}
  1662. procedure glGetTexGeniv (coord: GLenum; pname: GLenum; params: PGLint); stdcall;
  1663.   {$EXTERNALSYM glGetTexGeniv}
  1664. procedure glGetTexGen(coord: GLenum; pname: GLenum; params: PGLdouble); stdcall; overload;
  1665.   {$EXTERNALSYM glGetTexGen}
  1666. procedure glGetTexGen(coord: GLenum; pname: GLenum; params: PGLfloat); stdcall; overload;
  1667.   {$EXTERNALSYM glGetTexGen}
  1668. procedure glGetTexGen(coord: GLenum; pname: GLenum; params: PGLint); stdcall; overload;
  1669.   {$EXTERNALSYM glGetTexGen}
  1670.  
  1671. procedure glGetTexImage (target: GLenum; level: GLint; format: GLenum; _type: GLenum; pixels: pointer); stdcall;
  1672.   {$EXTERNALSYM glGetTexImage}
  1673.  
  1674. procedure glGetTexLevelParameterfv (target: GLenum; level: GLint; pname: GLenum; params: PGLfloat); stdcall;
  1675.   {$EXTERNALSYM glGetTexLevelParameterfv}
  1676. procedure glGetTexLevelParameteriv (target: GLenum; level: GLint; pname: GLenum; params: PGLint); stdcall;
  1677.   {$EXTERNALSYM glGetTexLevelParameteriv}
  1678. procedure glGetTexLevelParameter(target: GLenum; level: GLint; pname: GLenum; params: PGLfloat); stdcall; overload;
  1679.   {$EXTERNALSYM glGetTexLevelParameter}
  1680. procedure glGetTexLevelParameter(target: GLenum; level: GLint; pname: GLenum; params: PGLint); stdcall; overload;
  1681.   {$EXTERNALSYM glGetTexLevelParameter}
  1682.  
  1683. procedure glGetTexParameterfv (target, pname: GLenum; params: PGLfloat); stdcall;
  1684.   {$EXTERNALSYM glGetTexParameterfv}
  1685. procedure glGetTexParameteriv (target, pname: GLenum; params: PGLint); stdcall;
  1686.   {$EXTERNALSYM glGetTexParameteriv}
  1687. procedure glGetTexParameter(target, pname: GLenum; params: PGLfloat); stdcall; overload;
  1688.   {$EXTERNALSYM glGetTexParameter}
  1689. procedure glGetTexParameter(target, pname: GLenum; params: PGLint); stdcall; overload;
  1690.   {$EXTERNALSYM glGetTexParameter}
  1691.  
  1692. procedure glHint (target, mode: GLenum); stdcall;
  1693.   {$EXTERNALSYM glHint}
  1694. procedure glIndexMask (mask: GLuint); stdcall;
  1695.   {$EXTERNALSYM glIndexMask}
  1696.  
  1697. procedure glIndexd (c: GLdouble); stdcall;
  1698.   {$EXTERNALSYM glIndexd}
  1699. procedure glIndexdv (c: PGLdouble); stdcall;
  1700.   {$EXTERNALSYM glIndexdv}
  1701. procedure glIndexf (c: GLfloat); stdcall;
  1702.   {$EXTERNALSYM glIndexf}
  1703. procedure glIndexfv (c: PGLfloat); stdcall;
  1704.   {$EXTERNALSYM glIndexfv}
  1705. procedure glIndexi (c: GLint); stdcall;
  1706.   {$EXTERNALSYM glIndexi}
  1707. procedure glIndexiv (c: PGLint); stdcall;
  1708.   {$EXTERNALSYM glIndexiv}
  1709. procedure glIndexs (c: GLshort); stdcall;
  1710.   {$EXTERNALSYM glIndexs}
  1711. procedure glIndexsv (c: PGLshort); stdcall;
  1712.   {$EXTERNALSYM glIndexsv}
  1713. procedure glIndex(c: GLdouble); stdcall; overload;
  1714.   {$EXTERNALSYM glIndex}
  1715. procedure glIndex(c: PGLdouble); stdcall; overload;
  1716.   {$EXTERNALSYM glIndex}
  1717. procedure glIndex(c: GLfloat); stdcall;  overload;
  1718.   {$EXTERNALSYM glIndex}
  1719. procedure glIndex(c: PGLfloat); stdcall; overload;
  1720.   {$EXTERNALSYM glIndex}
  1721. procedure glIndex(c: GLint); stdcall; overload;
  1722.   {$EXTERNALSYM glIndex}
  1723. procedure glIndex(c: PGLint); stdcall; overload;
  1724.   {$EXTERNALSYM glIndex}
  1725. procedure glIndex(c: GLshort); stdcall; overload;
  1726.   {$EXTERNALSYM glIndex}
  1727. procedure glIndex(c: PGLshort); stdcall; overload;
  1728.   {$EXTERNALSYM glIndex}
  1729.  
  1730. procedure glInitNames; stdcall;
  1731.   {$EXTERNALSYM glInitNames}
  1732. function  glIsEnabled (cap: GLenum): GLBoolean; stdcall;
  1733.   {$EXTERNALSYM glIsEnabled}
  1734. function  glIsList (list: GLuint): GLBoolean;   stdcall;
  1735.   {$EXTERNALSYM glIsList}
  1736.  
  1737. procedure glLightModelf (pname: GLenum; param: GLfloat); stdcall;
  1738.   {$EXTERNALSYM glLightModelf}
  1739. procedure glLightModelfv (pname: GLenum; params: PGLfloat); stdcall;
  1740.   {$EXTERNALSYM glLightModelfv}
  1741. procedure glLightModeli (pname: GLenum; param: GLint); stdcall;
  1742.   {$EXTERNALSYM glLightModeli}
  1743. procedure glLightModeliv (pname: GLenum; params: PGLint); stdcall;
  1744.   {$EXTERNALSYM glLightModeliv}
  1745. procedure glLightModel(pname: GLenum; param: GLfloat); stdcall; overload;
  1746.   {$EXTERNALSYM glLightModel}
  1747. procedure glLightModel(pname: GLenum; params: PGLfloat); stdcall; overload;
  1748.   {$EXTERNALSYM glLightModel}
  1749. procedure glLightModel(pname: GLenum; param: GLint); stdcall; overload;
  1750.   {$EXTERNALSYM glLightModel}
  1751. procedure glLightModel(pname: GLenum; params: PGLint); stdcall; overload;
  1752.   {$EXTERNALSYM glLightModel}
  1753.  
  1754. procedure glLightf (light, pname: GLenum; param: GLfloat); stdcall;
  1755.   {$EXTERNALSYM glLightf}
  1756. procedure glLightfv (light, pname: GLenum; params: PGLfloat); stdcall;
  1757.   {$EXTERNALSYM glLightfv}
  1758. procedure glLighti (light, pname: GLenum; param: GLint); stdcall;
  1759.   {$EXTERNALSYM glLighti}
  1760. procedure glLightiv (light, pname: GLenum; params: PGLint); stdcall;
  1761.   {$EXTERNALSYM glLightiv}
  1762. procedure glLight(light, pname: GLenum; param: GLfloat); stdcall; overload;
  1763.   {$EXTERNALSYM glLight}
  1764. procedure glLight(light, pname: GLenum; params: PGLfloat); stdcall; overload;
  1765.   {$EXTERNALSYM glLight}
  1766. procedure glLight(light, pname: GLenum; param: GLint); stdcall; overload;
  1767.   {$EXTERNALSYM glLight}
  1768. procedure glLight(light, pname: GLenum; params: PGLint); stdcall; overload;
  1769.   {$EXTERNALSYM glLight}
  1770.  
  1771. procedure glLineStipple (factor: GLint; pattern: GLushort); stdcall;
  1772.   {$EXTERNALSYM glLineStipple}
  1773. procedure glLineWidth (width: GLfloat); stdcall;
  1774.   {$EXTERNALSYM glLineWidth}
  1775. procedure glListBase (base: GLuint); stdcall;
  1776.   {$EXTERNALSYM glListBase}
  1777. procedure glLoadIdentity; stdcall;
  1778.   {$EXTERNALSYM glLoadIdentity}
  1779.  
  1780. procedure glLoadMatrixd (m: PGLdouble); stdcall;
  1781.   {$EXTERNALSYM glLoadMatrixd}
  1782. procedure glLoadMatrixf (m: PGLfloat); stdcall;
  1783.   {$EXTERNALSYM glLoadMatrixf}
  1784. procedure glLoadMatrix(m: PGLdouble); stdcall; overload;
  1785.   {$EXTERNALSYM glLoadMatrix}
  1786. procedure glLoadMatrix(m: PGLfloat); stdcall; overload;
  1787.   {$EXTERNALSYM glLoadMatrix}
  1788.  
  1789. procedure glLoadName (name: GLuint); stdcall;
  1790.   {$EXTERNALSYM glLoadName}
  1791. procedure glLogicOp (opcode: GLenum); stdcall;
  1792.   {$EXTERNALSYM glLogicOp}
  1793.  
  1794. procedure glMap1d (target: GLenum; u1,u2: GLdouble; stride, order: GLint;
  1795.   Points: PGLdouble); stdcall;
  1796.   {$EXTERNALSYM glMap1d}
  1797. procedure glMap1f (target: GLenum; u1,u2: GLfloat; stride, order: GLint;
  1798.   Points: PGLfloat); stdcall;
  1799.   {$EXTERNALSYM glMap1f}
  1800. procedure glMap2d (target: GLenum;
  1801.   u1,u2: GLdouble; ustride, uorder: GLint;
  1802.   v1,v2: GLdouble; vstride, vorder: GLint; Points: PGLdouble); stdcall;
  1803.   {$EXTERNALSYM glMap2d}
  1804. procedure glMap2f (target: GLenum;
  1805.   u1,u2: GLfloat; ustride, uorder: GLint;
  1806.   v1,v2: GLfloat; vstride, vorder: GLint; Points: PGLfloat); stdcall;
  1807.   {$EXTERNALSYM glMap2f}
  1808. procedure glMap(target: GLenum; u1,u2: GLdouble; stride, order: GLint;
  1809.   Points: PGLdouble); stdcall; overload;
  1810.   {$EXTERNALSYM glMap}
  1811. procedure glMap(target: GLenum; u1,u2: GLfloat; stride, order: GLint;
  1812.   Points: PGLfloat); stdcall; overload;
  1813.   {$EXTERNALSYM glMap}
  1814. procedure glMap(target: GLenum;
  1815.   u1,u2: GLdouble; ustride, uorder: GLint;
  1816.   v1,v2: GLdouble; vstride, vorder: GLint; Points: PGLdouble); stdcall; overload;
  1817.   {$EXTERNALSYM glMap}
  1818. procedure glMap(target: GLenum;
  1819.   u1,u2: GLfloat; ustride, uorder: GLint;
  1820.   v1,v2: GLfloat; vstride, vorder: GLint; Points: PGLfloat); stdcall; overload;
  1821.   {$EXTERNALSYM glMap}
  1822.  
  1823. procedure glMapGrid1d (un: GLint; u1, u2: GLdouble); stdcall;
  1824.   {$EXTERNALSYM glMapGrid1d}
  1825. procedure glMapGrid1f (un: GLint; u1, u2: GLfloat); stdcall;
  1826.   {$EXTERNALSYM glMapGrid1f}
  1827. procedure glMapGrid2d (un: GLint; u1, u2: GLdouble;
  1828.                        vn: GLint; v1, v2: GLdouble); stdcall;
  1829.   {$EXTERNALSYM glMapGrid2d}
  1830. procedure glMapGrid2f (un: GLint; u1, u2: GLfloat;
  1831.                        vn: GLint; v1, v2: GLfloat); stdcall;
  1832.   {$EXTERNALSYM glMapGrid2f}
  1833. procedure glMapGrid(un: GLint; u1, u2: GLdouble); stdcall; overload;
  1834.   {$EXTERNALSYM glMapGrid}
  1835. procedure glMapGrid(un: GLint; u1, u2: GLfloat); stdcall;  overload;
  1836.   {$EXTERNALSYM glMapGrid}
  1837. procedure glMapGrid(un: GLint; u1, u2: GLdouble;
  1838.                     vn: GLint; v1, v2: GLdouble); stdcall; overload;
  1839.   {$EXTERNALSYM glMapGrid}
  1840. procedure glMapGrid(un: GLint; u1, u2: GLfloat;
  1841.                     vn: GLint; v1, v2: GLfloat); stdcall; overload;
  1842.   {$EXTERNALSYM glMapGrid}
  1843.  
  1844. procedure glMaterialf (face, pname: GLenum; param: GLfloat); stdcall;
  1845.   {$EXTERNALSYM glMaterialf}
  1846. procedure glMaterialfv (face, pname: GLenum; params: PGLfloat); stdcall;
  1847.   {$EXTERNALSYM glMaterialfv}
  1848. procedure glMateriali (face, pname: GLenum; param: GLint); stdcall;
  1849.   {$EXTERNALSYM glMateriali}
  1850. procedure glMaterialiv (face, pname: GLenum; params: PGLint); stdcall;
  1851.   {$EXTERNALSYM glMaterialiv}
  1852. procedure glMaterial(face, pname: GLenum; param: GLfloat); stdcall; overload;
  1853.   {$EXTERNALSYM glMaterial}
  1854. procedure glMaterial(face, pname: GLenum; params: PGLfloat); stdcall; overload;
  1855.   {$EXTERNALSYM glMaterial}
  1856. procedure glMaterial(face, pname: GLenum; param: GLint); stdcall; overload;
  1857.   {$EXTERNALSYM glMaterial}
  1858. procedure glMaterial(face, pname: GLenum; params: PGLint); stdcall; overload;
  1859.   {$EXTERNALSYM glMaterial}
  1860.  
  1861. procedure glMatrixMode (mode: GLenum); stdcall;
  1862.   {$EXTERNALSYM glMatrixMode}
  1863.  
  1864. procedure glMultMatrixd (m: PGLdouble); stdcall;
  1865.   {$EXTERNALSYM glMultMatrixd}
  1866. procedure glMultMatrixf (m: PGLfloat); stdcall;
  1867.   {$EXTERNALSYM glMultMatrixf}
  1868. procedure glMultMatrix(m: PGLdouble); stdcall; overload;
  1869.   {$EXTERNALSYM glMultMatrix}
  1870. procedure glMultMatrix(m: PGLfloat); stdcall; overload;
  1871.   {$EXTERNALSYM glMultMatrix}
  1872.  
  1873. procedure glNewList (ListIndex: GLuint; mode: GLenum); stdcall;
  1874.   {$EXTERNALSYM glNewList}
  1875.  
  1876. procedure glNormal3b (nx, ny, nz: GLbyte); stdcall;
  1877.   {$EXTERNALSYM glNormal3b}
  1878. procedure glNormal3bv (v: PGLbyte); stdcall;
  1879.   {$EXTERNALSYM glNormal3bv}
  1880. procedure glNormal3d (nx, ny, nz: GLdouble); stdcall;
  1881.   {$EXTERNALSYM glNormal3d}
  1882. procedure glNormal3dv (v: PGLdouble); stdcall;
  1883.   {$EXTERNALSYM glNormal3dv}
  1884. procedure glNormal3f (nx, ny, nz: GLFloat); stdcall;
  1885.   {$EXTERNALSYM glNormal3f}
  1886. procedure glNormal3fv (v: PGLfloat); stdcall;
  1887.   {$EXTERNALSYM glNormal3fv}
  1888. procedure glNormal3i (nx, ny, nz: GLint); stdcall;
  1889.   {$EXTERNALSYM glNormal3i}
  1890. procedure glNormal3iv (v: PGLint); stdcall;
  1891.   {$EXTERNALSYM glNormal3iv}
  1892. procedure glNormal3s (nx, ny, nz: GLshort); stdcall;
  1893.   {$EXTERNALSYM glNormal3s}
  1894. procedure glNormal3sv (v: PGLshort); stdcall;
  1895.   {$EXTERNALSYM glNormal3sv}
  1896. procedure glNormal(nx, ny, nz: GLbyte); stdcall; overload;
  1897.   {$EXTERNALSYM glNormal}
  1898. procedure glNormal3(v: PGLbyte); stdcall; overload;
  1899.   {$EXTERNALSYM glNormal3}
  1900. procedure glNormal(nx, ny, nz: GLdouble); stdcall; overload;
  1901.   {$EXTERNALSYM glNormal}
  1902. procedure glNormal3(v: PGLdouble); stdcall; overload;
  1903.   {$EXTERNALSYM glNormal3}
  1904. procedure glNormal(nx, ny, nz: GLFloat); stdcall; overload;
  1905.   {$EXTERNALSYM glNormal}
  1906. procedure glNormal3(v: PGLfloat); stdcall; overload;
  1907.   {$EXTERNALSYM glNormal3}
  1908. procedure glNormal(nx, ny, nz: GLint); stdcall; overload;
  1909.   {$EXTERNALSYM glNormal}
  1910. procedure glNormal3(v: PGLint); stdcall; overload;
  1911.   {$EXTERNALSYM glNormal3}
  1912. procedure glNormal(nx, ny, nz: GLshort); stdcall; overload;
  1913.   {$EXTERNALSYM glNormal}
  1914. procedure glNormal3(v: PGLshort); stdcall; overload;
  1915.   {$EXTERNALSYM glNormal3}
  1916.  
  1917. procedure glOrtho (left, right, bottom, top, zNear, zFar: GLdouble); stdcall;
  1918.   {$EXTERNALSYM glOrtho}
  1919. procedure glPassThrough (token: GLfloat); stdcall;
  1920.   {$EXTERNALSYM glPassThrough}
  1921.  
  1922. procedure glPixelMapfv (map: GLenum; mapsize: GLint; values: PGLfloat); stdcall;
  1923.   {$EXTERNALSYM glPixelMapfv}
  1924. procedure glPixelMapuiv (map: GLenum; mapsize: GLint; values: PGLuint); stdcall;
  1925.   {$EXTERNALSYM glPixelMapuiv}
  1926. procedure glPixelMapusv (map: GLenum; mapsize: GLint; values: PGLushort); stdcall;
  1927.   {$EXTERNALSYM glPixelMapusv}
  1928. procedure glPixelMap(map: GLenum; mapsize: GLint; values: PGLfloat); stdcall; overload;
  1929.   {$EXTERNALSYM glPixelMap}
  1930. procedure glPixelMap(map: GLenum; mapsize: GLint; values: PGLuint); stdcall;  overload;
  1931.   {$EXTERNALSYM glPixelMap}
  1932. procedure glPixelMap(map: GLenum; mapsize: GLint; values: PGLushort); stdcall; overload;
  1933.   {$EXTERNALSYM glPixelMap}
  1934.  
  1935. procedure glPixelStoref (pname: GLenum; param: GLfloat); stdcall;
  1936.   {$EXTERNALSYM glPixelStoref}
  1937. procedure glPixelStorei (pname: GLenum; param: GLint); stdcall;
  1938.   {$EXTERNALSYM glPixelStorei}
  1939. procedure glPixelStore(pname: GLenum; param: GLfloat); stdcall; overload;
  1940.   {$EXTERNALSYM glPixelStore}
  1941. procedure glPixelStore(pname: GLenum; param: GLint); stdcall; overload;
  1942.   {$EXTERNALSYM glPixelStore}
  1943.  
  1944. procedure glPixelTransferf (pname: GLenum; param: GLfloat); stdcall;
  1945.   {$EXTERNALSYM glPixelTransferf}
  1946. procedure glPixelTransferi (pname: GLenum; param: GLint); stdcall;
  1947.   {$EXTERNALSYM glPixelTransferi}
  1948. procedure glPixelTransfer(pname: GLenum; param: GLfloat); stdcall; overload;
  1949.   {$EXTERNALSYM glPixelTransfer}
  1950. procedure glPixelTransfer(pname: GLenum; param: GLint); stdcall; overload;
  1951.   {$EXTERNALSYM glPixelTransfer}
  1952.  
  1953. procedure glPixelZoom (xfactor, yfactor: GLfloat); stdcall;
  1954.   {$EXTERNALSYM glPixelZoom}
  1955. procedure glPointSize (size: GLfloat); stdcall;
  1956.   {$EXTERNALSYM glPointSize}
  1957. procedure glPolygonMode (face, mode: GLenum); stdcall;
  1958.   {$EXTERNALSYM glPolygonMode}
  1959. procedure glPolygonStipple (mask: PGLubyte); stdcall;
  1960.   {$EXTERNALSYM glPolygonStipple}
  1961. procedure glPopAttrib; stdcall;
  1962.   {$EXTERNALSYM glPopAttrib}
  1963. procedure glPopMatrix; stdcall;
  1964.   {$EXTERNALSYM glPopMatrix}
  1965. procedure glPopName; stdcall;
  1966.   {$EXTERNALSYM glPopName}
  1967. procedure glPushAttrib(mask: GLbitfield); stdcall;
  1968.   {$EXTERNALSYM glPushAttrib}
  1969. procedure glPushMatrix; stdcall;
  1970.   {$EXTERNALSYM glPushMatrix}
  1971. procedure glPushName(name: GLuint); stdcall;
  1972.   {$EXTERNALSYM glPushName}
  1973.  
  1974. procedure glRasterPos2d (x,y: GLdouble); stdcall;
  1975.   {$EXTERNALSYM glRasterPos2d}
  1976. procedure glRasterPos2dv (v: PGLdouble); stdcall;
  1977.   {$EXTERNALSYM glRasterPos2dv}
  1978. procedure glRasterPos2f (x,y: GLfloat); stdcall;
  1979.   {$EXTERNALSYM glRasterPos2f}
  1980. procedure glRasterPos2fv (v: PGLfloat); stdcall;
  1981.   {$EXTERNALSYM glRasterPos2fv}
  1982. procedure glRasterPos2i (x,y: GLint); stdcall;
  1983.   {$EXTERNALSYM glRasterPos2i}
  1984. procedure glRasterPos2iv (v: PGLint); stdcall;
  1985.   {$EXTERNALSYM glRasterPos2iv}
  1986. procedure glRasterPos2s (x,y: GLshort); stdcall;
  1987.   {$EXTERNALSYM glRasterPos2s}
  1988. procedure glRasterPos2sv (v: PGLshort); stdcall;
  1989.   {$EXTERNALSYM glRasterPos2sv}
  1990. procedure glRasterPos3d (x,y,z: GLdouble); stdcall;
  1991.   {$EXTERNALSYM glRasterPos3d}
  1992. procedure glRasterPos3dv (v: PGLdouble); stdcall;
  1993.   {$EXTERNALSYM glRasterPos3dv}
  1994. procedure glRasterPos3f (x,y,z: GLfloat); stdcall;
  1995.   {$EXTERNALSYM glRasterPos3f}
  1996. procedure glRasterPos3fv (v: PGLfloat); stdcall;
  1997.   {$EXTERNALSYM glRasterPos3fv}
  1998. procedure glRasterPos3i (x,y,z: GLint); stdcall;
  1999.   {$EXTERNALSYM glRasterPos3i}
  2000. procedure glRasterPos3iv (v: PGLint); stdcall;
  2001.   {$EXTERNALSYM glRasterPos3iv}
  2002. procedure glRasterPos3s (x,y,z: GLshort); stdcall;
  2003.   {$EXTERNALSYM glRasterPos3s}
  2004. procedure glRasterPos3sv (v: PGLshort); stdcall;
  2005.   {$EXTERNALSYM glRasterPos3sv}
  2006. procedure glRasterPos4d (x,y,z,w: GLdouble); stdcall;
  2007.   {$EXTERNALSYM glRasterPos4d}
  2008. procedure glRasterPos4dv (v: PGLdouble); stdcall;
  2009.   {$EXTERNALSYM glRasterPos4dv}
  2010. procedure glRasterPos4f (x,y,z,w: GLfloat); stdcall;
  2011.   {$EXTERNALSYM glRasterPos4f}
  2012. procedure glRasterPos4fv (v: PGLfloat); stdcall;
  2013.   {$EXTERNALSYM glRasterPos4fv}
  2014. procedure glRasterPos4i (x,y,z,w: GLint); stdcall;
  2015.   {$EXTERNALSYM glRasterPos4i}
  2016. procedure glRasterPos4iv (v: PGLint); stdcall;
  2017.   {$EXTERNALSYM glRasterPos4iv}
  2018. procedure glRasterPos4s (x,y,z,w: GLshort); stdcall;
  2019.   {$EXTERNALSYM glRasterPos4s}
  2020. procedure glRasterPos4sv (v: PGLshort); stdcall;
  2021.   {$EXTERNALSYM glRasterPos4sv}
  2022. procedure glRasterPos(x,y: GLdouble); stdcall; overload;
  2023.   {$EXTERNALSYM glRasterPos}
  2024. procedure glRasterPos2(v: PGLdouble); stdcall; overload;
  2025.   {$EXTERNALSYM glRasterPos2}
  2026. procedure glRasterPos(x,y: GLfloat); stdcall; overload;
  2027.   {$EXTERNALSYM glRasterPos}
  2028. procedure glRasterPos2(v: PGLfloat); stdcall; overload;
  2029.   {$EXTERNALSYM glRasterPos2}
  2030. procedure glRasterPos(x,y: GLint); stdcall; overload;
  2031.   {$EXTERNALSYM glRasterPos}
  2032. procedure glRasterPos2(v: PGLint); stdcall; overload;
  2033.   {$EXTERNALSYM glRasterPos2}
  2034. procedure glRasterPos(x,y: GLshort); stdcall; overload;
  2035.   {$EXTERNALSYM glRasterPos}
  2036. procedure glRasterPos2(v: PGLshort); stdcall; overload;
  2037.   {$EXTERNALSYM glRasterPos2}
  2038. procedure glRasterPos(x,y,z: GLdouble); stdcall; overload;
  2039.   {$EXTERNALSYM glRasterPos}
  2040. procedure glRasterPos3(v: PGLdouble); stdcall; overload;
  2041.   {$EXTERNALSYM glRasterPos3}
  2042. procedure glRasterPos(x,y,z: GLfloat); stdcall; overload;
  2043.   {$EXTERNALSYM glRasterPos}
  2044. procedure glRasterPos3(v: PGLfloat); stdcall; overload;
  2045.   {$EXTERNALSYM glRasterPos3}
  2046. procedure glRasterPos(x,y,z: GLint); stdcall; overload;
  2047.   {$EXTERNALSYM glRasterPos}
  2048. procedure glRasterPos3(v: PGLint); stdcall; overload;
  2049.   {$EXTERNALSYM glRasterPos3}
  2050. procedure glRasterPos(x,y,z: GLshort); stdcall; overload;
  2051.   {$EXTERNALSYM glRasterPos}
  2052. procedure glRasterPos3(v: PGLshort); stdcall; overload;
  2053.   {$EXTERNALSYM glRasterPos3}
  2054. procedure glRasterPos(x,y,z,w: GLdouble); stdcall; overload;
  2055.   {$EXTERNALSYM glRasterPos}
  2056. procedure glRasterPos4(v: PGLdouble); stdcall; overload;
  2057.   {$EXTERNALSYM glRasterPos4}
  2058. procedure glRasterPos(x,y,z,w: GLfloat); stdcall; overload;
  2059.   {$EXTERNALSYM glRasterPos}
  2060. procedure glRasterPos4(v: PGLfloat); stdcall; overload;
  2061.   {$EXTERNALSYM glRasterPos4}
  2062. procedure glRasterPos(x,y,z,w: GLint); stdcall; overload;
  2063.   {$EXTERNALSYM glRasterPos}
  2064. procedure glRasterPos4(v: PGLint); stdcall; overload;
  2065.   {$EXTERNALSYM glRasterPos4}
  2066. procedure glRasterPos(x,y,z,w: GLshort); stdcall; overload;
  2067.   {$EXTERNALSYM glRasterPos}
  2068. procedure glRasterPos4(v: PGLshort); stdcall; overload;
  2069.   {$EXTERNALSYM glRasterPos4}
  2070.  
  2071. procedure glReadBuffer (mode: GLenum); stdcall;
  2072.   {$EXTERNALSYM glReadBuffer}
  2073. procedure glReadPixels (x,y: GLint; width, height: GLsizei;
  2074.   format, _type: GLenum; pixels: Pointer); stdcall;
  2075.   {$EXTERNALSYM glReadPixels}
  2076.  
  2077. procedure glRectd (x1, y1, x2, y2: GLdouble); stdcall;
  2078.   {$EXTERNALSYM glRectd}
  2079. procedure glRectdv (v1, v2: PGLdouble); stdcall;
  2080.   {$EXTERNALSYM glRectdv}
  2081. procedure glRectf (x1, y1, x2, y2: GLfloat); stdcall;
  2082.   {$EXTERNALSYM glRectf}
  2083. procedure glRectfv (v1, v2: PGLfloat); stdcall;
  2084.   {$EXTERNALSYM glRectfv}
  2085. procedure glRecti (x1, y1, x2, y2: GLint); stdcall;
  2086.   {$EXTERNALSYM glRecti}
  2087. procedure glRectiv (v1, v2: PGLint); stdcall;
  2088.   {$EXTERNALSYM glRectiv}
  2089. procedure glRects (x1, y1, x2, y2: GLshort); stdcall;
  2090.   {$EXTERNALSYM glRects}
  2091. procedure glRectsv (v1, v2: PGLshort); stdcall;
  2092.   {$EXTERNALSYM glRectsv}
  2093. procedure glRect(x1, y1, x2, y2: GLdouble); stdcall; overload;
  2094.   {$EXTERNALSYM glRect}
  2095. procedure glRect(v1, v2: PGLdouble); stdcall; overload;
  2096.   {$EXTERNALSYM glRect}
  2097. procedure glRect(x1, y1, x2, y2: GLfloat); stdcall; overload;
  2098.   {$EXTERNALSYM glRect}
  2099. procedure glRect(v1, v2: PGLfloat); stdcall; overload;
  2100.   {$EXTERNALSYM glRect}
  2101. procedure glRect(x1, y1, x2, y2: GLint); stdcall; overload;
  2102.   {$EXTERNALSYM glRect}
  2103. procedure glRect(v1, v2: PGLint); stdcall; overload;
  2104.   {$EXTERNALSYM glRect}
  2105. procedure glRect(x1, y1, x2, y2: GLshort); stdcall; overload;
  2106.   {$EXTERNALSYM glRect}
  2107. procedure glRect(v1, v2: PGLshort); stdcall; overload;
  2108.   {$EXTERNALSYM glRect}
  2109.  
  2110. function  glRenderMode (mode: GLenum): GLint; stdcall;
  2111.   {$EXTERNALSYM glRenderMode}
  2112.  
  2113. procedure glRotated (angle, x,y,z: GLdouble); stdcall;
  2114.   {$EXTERNALSYM glRotated}
  2115. procedure glRotatef (angle, x,y,z: GLfloat); stdcall;
  2116.   {$EXTERNALSYM glRotatef}
  2117. procedure glRotate(angle, x,y,z: GLdouble); stdcall; overload;
  2118.   {$EXTERNALSYM glRotate}
  2119. procedure glRotate(angle, x,y,z: GLfloat); stdcall; overload;
  2120.   {$EXTERNALSYM glRotate}
  2121.  
  2122. procedure glScaled (x,y,z: GLdouble); stdcall;
  2123.   {$EXTERNALSYM glScaled}
  2124. procedure glScalef (x,y,z: GLfloat); stdcall;
  2125.   {$EXTERNALSYM glScalef}
  2126. procedure glScale(x,y,z: GLdouble); stdcall; overload;
  2127.   {$EXTERNALSYM glScale}
  2128. procedure glScale(x,y,z: GLfloat); stdcall; overload;
  2129.   {$EXTERNALSYM glScale}
  2130.  
  2131. procedure glScissor (x,y: GLint; width, height: GLsizei); stdcall;
  2132.   {$EXTERNALSYM glScissor}
  2133. procedure glSelectBuffer (size: GLsizei; buffer: PGLuint); stdcall;
  2134.   {$EXTERNALSYM glSelectBuffer}
  2135. procedure glShadeModel (mode: GLenum); stdcall;
  2136.   {$EXTERNALSYM glShadeModel}
  2137. procedure glStencilFunc (func: GLenum; ref: GLint; mask: GLuint); stdcall;
  2138.   {$EXTERNALSYM glStencilFunc}
  2139. procedure glStencilMask (mask: GLuint); stdcall;
  2140.   {$EXTERNALSYM glStencilMask}
  2141. procedure glStencilOp (fail, zfail, zpass: GLenum); stdcall;
  2142.   {$EXTERNALSYM glStencilOp}
  2143.  
  2144. procedure glTexCoord1d (s: GLdouble); stdcall;
  2145.   {$EXTERNALSYM glTexCoord1d}
  2146. procedure glTexCoord1dv (v: PGLdouble); stdcall;
  2147.   {$EXTERNALSYM glTexCoord1dv}
  2148. procedure glTexCoord1f (s: GLfloat); stdcall;
  2149.   {$EXTERNALSYM glTexCoord1f}
  2150. procedure glTexCoord1fv (v: PGLfloat); stdcall;
  2151.   {$EXTERNALSYM glTexCoord1fv}
  2152. procedure glTexCoord1i (s: GLint); stdcall;
  2153.   {$EXTERNALSYM glTexCoord1i}
  2154. procedure glTexCoord1iv (v: PGLint); stdcall;
  2155.   {$EXTERNALSYM glTexCoord1iv}
  2156. procedure glTexCoord1s (s: GLshort); stdcall;
  2157.   {$EXTERNALSYM glTexCoord1s}
  2158. procedure glTexCoord1sv (v: PGLshort); stdcall;
  2159.   {$EXTERNALSYM glTexCoord1sv}
  2160. procedure glTexCoord2d (s,t: GLdouble); stdcall;
  2161.   {$EXTERNALSYM glTexCoord2d}
  2162. procedure glTexCoord2dv (v: PGLdouble); stdcall;
  2163.   {$EXTERNALSYM glTexCoord2dv}
  2164. procedure glTexCoord2f (s,t: GLfloat); stdcall;
  2165.   {$EXTERNALSYM glTexCoord2f}
  2166. procedure glTexCoord2fv (v: PGLfloat); stdcall;
  2167.   {$EXTERNALSYM glTexCoord2fv}
  2168. procedure glTexCoord2i (s,t: GLint); stdcall;
  2169.   {$EXTERNALSYM glTexCoord2i}
  2170. procedure glTexCoord2iv (v: PGLint); stdcall;
  2171.   {$EXTERNALSYM glTexCoord2iv}
  2172. procedure glTexCoord2s (s,t: GLshort); stdcall;
  2173.   {$EXTERNALSYM glTexCoord2s}
  2174. procedure glTexCoord2sv (v: PGLshort); stdcall;
  2175.   {$EXTERNALSYM glTexCoord2sv}
  2176. procedure glTexCoord3d (s,t,r: GLdouble); stdcall;
  2177.   {$EXTERNALSYM glTexCoord3d}
  2178. procedure glTexCoord3dv (v: PGLdouble); stdcall;
  2179.   {$EXTERNALSYM glTexCoord3dv}
  2180. procedure glTexCoord3f (s,t,r: GLfloat); stdcall;
  2181.   {$EXTERNALSYM glTexCoord3f}
  2182. procedure glTexCoord3fv (v: PGLfloat); stdcall;
  2183.   {$EXTERNALSYM glTexCoord3fv}
  2184. procedure glTexCoord3i (s,t,r: GLint); stdcall;
  2185.   {$EXTERNALSYM glTexCoord3i}
  2186. procedure glTexCoord3iv (v: PGLint); stdcall;
  2187.   {$EXTERNALSYM glTexCoord3iv}
  2188. procedure glTexCoord3s (s,t,r: GLshort); stdcall;
  2189.   {$EXTERNALSYM glTexCoord3s}
  2190. procedure glTexCoord3sv (v: PGLshort); stdcall;
  2191.   {$EXTERNALSYM glTexCoord3sv}
  2192. procedure glTexCoord4d (s,t,r,q: GLdouble); stdcall;
  2193.   {$EXTERNALSYM glTexCoord4d}
  2194. procedure glTexCoord4dv (v: PGLdouble); stdcall;
  2195.   {$EXTERNALSYM glTexCoord4dv}
  2196. procedure glTexCoord4f (s,t,r,q: GLfloat); stdcall;
  2197.   {$EXTERNALSYM glTexCoord4f}
  2198. procedure glTexCoord4fv (v: PGLfloat); stdcall;
  2199.   {$EXTERNALSYM glTexCoord4fv}
  2200. procedure glTexCoord4i (s,t,r,q: GLint); stdcall;
  2201.   {$EXTERNALSYM glTexCoord4i}
  2202. procedure glTexCoord4iv (v: PGLint); stdcall;
  2203.   {$EXTERNALSYM glTexCoord4iv}
  2204. procedure glTexCoord4s (s,t,r,q: GLshort); stdcall;
  2205.   {$EXTERNALSYM glTexCoord4s}
  2206. procedure glTexCoord4sv (v: PGLshort); stdcall;
  2207.   {$EXTERNALSYM glTexCoord4sv}
  2208. procedure glTexCoord(s: GLdouble); stdcall; overload;
  2209.   {$EXTERNALSYM glTexCoord}
  2210. procedure glTexCoord1(v: PGLdouble); stdcall; overload;
  2211.   {$EXTERNALSYM glTexCoord1}
  2212. procedure glTexCoord(s: GLfloat); stdcall; overload;
  2213.   {$EXTERNALSYM glTexCoord}
  2214. procedure glTexCoord1(v: PGLfloat); stdcall; overload;
  2215.   {$EXTERNALSYM glTexCoord1}
  2216. procedure glTexCoord(s: GLint); stdcall; overload;
  2217.   {$EXTERNALSYM glTexCoord}
  2218. procedure glTexCoord1(v: PGLint); stdcall; overload;
  2219.   {$EXTERNALSYM glTexCoord1}
  2220. procedure glTexCoord(s: GLshort); stdcall; overload;
  2221.   {$EXTERNALSYM glTexCoord}
  2222. procedure glTexCoord1(v: PGLshort); stdcall; overload;
  2223.   {$EXTERNALSYM glTexCoord1}
  2224. procedure glTexCoord(s,t: GLdouble); stdcall; overload;
  2225.   {$EXTERNALSYM glTexCoord}
  2226. procedure glTexCoord2(v: PGLdouble); stdcall; overload;
  2227.   {$EXTERNALSYM glTexCoord2}
  2228. procedure glTexCoord(s,t: GLfloat); stdcall; overload;
  2229.   {$EXTERNALSYM glTexCoord}
  2230. procedure glTexCoord2(v: PGLfloat); stdcall; overload;
  2231.   {$EXTERNALSYM glTexCoord2}
  2232. procedure glTexCoord(s,t: GLint); stdcall; overload;
  2233.   {$EXTERNALSYM glTexCoord}
  2234. procedure glTexCoord2(v: PGLint); stdcall; overload;
  2235.   {$EXTERNALSYM glTexCoord2}
  2236. procedure glTexCoord(s,t: GLshort); stdcall; overload;
  2237.   {$EXTERNALSYM glTexCoord}
  2238. procedure glTexCoord2(v: PGLshort); stdcall; overload;
  2239.   {$EXTERNALSYM glTexCoord2}
  2240. procedure glTexCoord(s,t,r: GLdouble); stdcall; overload;
  2241.   {$EXTERNALSYM glTexCoord}
  2242. procedure glTexCoord3(v: PGLdouble); stdcall; overload;
  2243.   {$EXTERNALSYM glTexCoord3}
  2244. procedure glTexCoord(s,t,r: GLfloat); stdcall; overload;
  2245.   {$EXTERNALSYM glTexCoord}
  2246. procedure glTexCoord3(v: PGLfloat); stdcall; overload;
  2247.   {$EXTERNALSYM glTexCoord3}
  2248. procedure glTexCoord(s,t,r: GLint); stdcall; overload;
  2249.   {$EXTERNALSYM glTexCoord}
  2250. procedure glTexCoord3(v: PGLint); stdcall; overload;
  2251.   {$EXTERNALSYM glTexCoord3}
  2252. procedure glTexCoord(s,t,r: GLshort); stdcall; overload;
  2253.   {$EXTERNALSYM glTexCoord}
  2254. procedure glTexCoord3(v: PGLshort); stdcall; overload;
  2255.   {$EXTERNALSYM glTexCoord3}
  2256. procedure glTexCoord(s,t,r,q: GLdouble); stdcall; overload;
  2257.   {$EXTERNALSYM glTexCoord}
  2258. procedure glTexCoord4(v: PGLdouble); stdcall; overload;
  2259.   {$EXTERNALSYM glTexCoord4}
  2260. procedure glTexCoord(s,t,r,q: GLfloat); stdcall; overload;
  2261.   {$EXTERNALSYM glTexCoord}
  2262. procedure glTexCoord4(v: PGLfloat); stdcall; overload;
  2263.   {$EXTERNALSYM glTexCoord4}
  2264. procedure glTexCoord(s,t,r,q: GLint); stdcall; overload;
  2265.   {$EXTERNALSYM glTexCoord}
  2266. procedure glTexCoord4(v: PGLint); stdcall; overload;
  2267.   {$EXTERNALSYM glTexCoord4}
  2268. procedure glTexCoord(s,t,r,q: GLshort); stdcall; overload;
  2269.   {$EXTERNALSYM glTexCoord}
  2270. procedure glTexCoord4(v: PGLshort); stdcall; overload;
  2271.   {$EXTERNALSYM glTexCoord4}
  2272.  
  2273. procedure glTexEnvf (target, pname: GLenum; param: GLfloat); stdcall;
  2274.   {$EXTERNALSYM glTexEnvf}
  2275. procedure glTexEnvfv (target, pname: GLenum; params: PGLfloat); stdcall;
  2276.   {$EXTERNALSYM glTexEnvfv}
  2277. procedure glTexEnvi (target, pname: GLenum; param: GLint); stdcall;
  2278.   {$EXTERNALSYM glTexEnvi}
  2279. procedure glTexEnviv (target, pname: GLenum; params: PGLint); stdcall;
  2280.   {$EXTERNALSYM glTexEnviv}
  2281. procedure glTexEnv(target, pname: GLenum; param: GLfloat); stdcall; overload;
  2282.   {$EXTERNALSYM glTexEnv}
  2283. procedure glTexEnv(target, pname: GLenum; params: PGLfloat); stdcall; overload;
  2284.   {$EXTERNALSYM glTexEnv}
  2285. procedure glTexEnv(target, pname: GLenum; param: GLint); stdcall; overload;
  2286.   {$EXTERNALSYM glTexEnv}
  2287. procedure glTexEnv(target, pname: GLenum; params: PGLint); stdcall; overload;
  2288.   {$EXTERNALSYM glTexEnv}
  2289.  
  2290. procedure glTexGend (coord, pname: GLenum; param: GLdouble); stdcall;
  2291.   {$EXTERNALSYM glTexGend}
  2292. procedure glTexGendv (coord, pname: GLenum; params: PGLdouble); stdcall;
  2293.   {$EXTERNALSYM glTexGendv}
  2294. procedure glTexGenf (coord, pname: GLenum; param: GLfloat); stdcall;
  2295.   {$EXTERNALSYM glTexGenf}
  2296. procedure glTexGenfv (coord, pname: GLenum; params: PGLfloat); stdcall;
  2297.   {$EXTERNALSYM glTexGenfv}
  2298. procedure glTexGeni (coord, pname: GLenum; param: GLint); stdcall;
  2299.   {$EXTERNALSYM glTexGeni}
  2300. procedure glTexGeniv (coord, pname: GLenum; params: PGLint); stdcall;
  2301.   {$EXTERNALSYM glTexGeniv}
  2302. procedure glTexGen(coord, pname: GLenum; param: GLdouble); stdcall; overload;
  2303.   {$EXTERNALSYM glTexGen}
  2304. procedure glTexGen(coord, pname: GLenum; params: PGLdouble); stdcall; overload;
  2305.   {$EXTERNALSYM glTexGen}
  2306. procedure glTexGen(coord, pname: GLenum; param: GLfloat); stdcall; overload;
  2307.   {$EXTERNALSYM glTexGen}
  2308. procedure glTexGen(coord, pname: GLenum; params: PGLfloat); stdcall; overload;
  2309.   {$EXTERNALSYM glTexGen}
  2310. procedure glTexGen(coord, pname: GLenum; param: GLint); stdcall; overload;
  2311.   {$EXTERNALSYM glTexGen}
  2312. procedure glTexGen(coord, pname: GLenum; params: PGLint); stdcall; overload;
  2313.   {$EXTERNALSYM glTexGen}
  2314.  
  2315. procedure glTexImage1D (target: GLenum; level, components: GLint;
  2316.   width: GLsizei; border: GLint; format, _type: GLenum; pixels: Pointer); stdcall;
  2317.   {$EXTERNALSYM glTexImage1D}
  2318. procedure glTexImage2D (target: GLenum; level, components: GLint;
  2319.   width, height: GLsizei; border: GLint; format, _type: GLenum; pixels: Pointer); stdcall;
  2320.   {$EXTERNALSYM glTexImage2D}
  2321.  
  2322. procedure glTexParameterf (target, pname: GLenum; param: GLfloat); stdcall;
  2323.   {$EXTERNALSYM glTexParameterf}
  2324. procedure glTexParameterfv (target, pname: GLenum; params: PGLfloat); stdcall;
  2325.   {$EXTERNALSYM glTexParameterfv}
  2326. procedure glTexParameteri (target, pname: GLenum; param: GLint); stdcall;
  2327.   {$EXTERNALSYM glTexParameteri}
  2328. procedure glTexParameteriv (target, pname: GLenum; params: PGLint); stdcall;
  2329.   {$EXTERNALSYM glTexParameteriv}
  2330. procedure glTexParameter(target, pname: GLenum; param: GLfloat); stdcall; overload;
  2331.   {$EXTERNALSYM glTexParameter}
  2332. procedure glTexParameter(target, pname: GLenum; params: PGLfloat); stdcall; overload;
  2333.   {$EXTERNALSYM glTexParameter}
  2334. procedure glTexParameter(target, pname: GLenum; param: GLint); stdcall; overload;
  2335.   {$EXTERNALSYM glTexParameter}
  2336. procedure glTexParameter(target, pname: GLenum; params: PGLint); stdcall; overload;
  2337.   {$EXTERNALSYM glTexParameter}
  2338.  
  2339. procedure glTranslated (x,y,z: GLdouble); stdcall;
  2340.   {$EXTERNALSYM glTranslated}
  2341. procedure glTranslatef (x,y,z: GLfloat); stdcall;
  2342.   {$EXTERNALSYM glTranslatef}
  2343. procedure glTranslate(x,y,z: GLdouble); stdcall; overload;
  2344.   {$EXTERNALSYM glTranslate}
  2345. procedure glTranslate(x,y,z: GLfloat); stdcall; overload;
  2346.   {$EXTERNALSYM glTranslate}
  2347.  
  2348. procedure glVertex2d (x,y: GLdouble); stdcall;
  2349.   {$EXTERNALSYM glVertex2d}
  2350. procedure glVertex2dv (v: PGLdouble); stdcall;
  2351.   {$EXTERNALSYM glVertex2dv}
  2352. procedure glVertex2f (x,y: GLfloat); stdcall;
  2353.   {$EXTERNALSYM glVertex2f}
  2354. procedure glVertex2fv (v: PGLfloat); stdcall;
  2355.   {$EXTERNALSYM glVertex2fv}
  2356. procedure glVertex2i (x,y: GLint); stdcall;
  2357.   {$EXTERNALSYM glVertex2i}
  2358. procedure glVertex2iv (v: PGLint); stdcall;
  2359.   {$EXTERNALSYM glVertex2iv}
  2360. procedure glVertex2s (x,y: GLshort); stdcall;
  2361.   {$EXTERNALSYM glVertex2s}
  2362. procedure glVertex2sv (v: PGLshort); stdcall;
  2363.   {$EXTERNALSYM glVertex2sv}
  2364. procedure glVertex3d (x,y,z: GLdouble); stdcall;
  2365.   {$EXTERNALSYM glVertex3d}
  2366. procedure glVertex3dv (v: PGLdouble); stdcall;
  2367.   {$EXTERNALSYM glVertex3dv}
  2368. procedure glVertex3f (x,y,z: GLfloat); stdcall;
  2369.   {$EXTERNALSYM glVertex3f}
  2370. procedure glVertex3fv (v: PGLfloat); stdcall;
  2371.   {$EXTERNALSYM glVertex3fv}
  2372. procedure glVertex3i (x,y,z: GLint); stdcall;
  2373.   {$EXTERNALSYM glVertex3i}
  2374. procedure glVertex3iv (v: PGLint); stdcall;
  2375.   {$EXTERNALSYM glVertex3iv}
  2376. procedure glVertex3s (x,y,z: GLshort); stdcall;
  2377.   {$EXTERNALSYM glVertex3s}
  2378. procedure glVertex3sv (v: PGLshort); stdcall;
  2379.   {$EXTERNALSYM glVertex3sv}
  2380. procedure glVertex4d (x,y,z,w: GLdouble); stdcall;
  2381.   {$EXTERNALSYM glVertex4d}
  2382. procedure glVertex4dv (v: PGLdouble); stdcall;
  2383.   {$EXTERNALSYM glVertex4dv}
  2384. procedure glVertex4f (x,y,z,w: GLfloat); stdcall;
  2385.   {$EXTERNALSYM glVertex4f}
  2386. procedure glVertex4fv (v: PGLfloat); stdcall;
  2387.   {$EXTERNALSYM glVertex4fv}
  2388. procedure glVertex4i (x,y,z,w: GLint); stdcall;
  2389.   {$EXTERNALSYM glVertex4i}
  2390. procedure glVertex4iv (v: PGLint); stdcall;
  2391.   {$EXTERNALSYM glVertex4iv}
  2392. procedure glVertex4s (x,y,z,w: GLshort); stdcall;
  2393.   {$EXTERNALSYM glVertex4s}
  2394. procedure glVertex4sv (v: PGLshort); stdcall;
  2395.   {$EXTERNALSYM glVertex4sv}
  2396. procedure glVertex(x,y: GLdouble); stdcall; overload;
  2397.   {$EXTERNALSYM glVertex}
  2398. procedure glVertex2(v: PGLdouble); stdcall; overload;
  2399.   {$EXTERNALSYM glVertex2}
  2400. procedure glVertex(x,y: GLfloat); stdcall; overload;
  2401.   {$EXTERNALSYM glVertex}
  2402. procedure glVertex2(v: PGLfloat); stdcall; overload;
  2403.   {$EXTERNALSYM glVertex2}
  2404. procedure glVertex(x,y: GLint); stdcall; overload;
  2405.   {$EXTERNALSYM glVertex}
  2406. procedure glVertex2(v: PGLint); stdcall; overload;
  2407.   {$EXTERNALSYM glVertex2}
  2408. procedure glVertex(x,y: GLshort); stdcall; overload;
  2409.   {$EXTERNALSYM glVertex}
  2410. procedure glVertex2(v: PGLshort); stdcall; overload;
  2411.   {$EXTERNALSYM glVertex2}
  2412. procedure glVertex(x,y,z: GLdouble); stdcall; overload;
  2413.   {$EXTERNALSYM glVertex}
  2414. procedure glVertex3(v: PGLdouble); stdcall; overload;
  2415.   {$EXTERNALSYM glVertex3}
  2416. procedure glVertex(x,y,z: GLfloat); stdcall; overload;
  2417.   {$EXTERNALSYM glVertex}
  2418. procedure glVertex3(v: PGLfloat); stdcall; overload;
  2419.   {$EXTERNALSYM glVertex3}
  2420. procedure glVertex(x,y,z: GLint); stdcall; overload;
  2421.   {$EXTERNALSYM glVertex}
  2422. procedure glVertex3(v: PGLint); stdcall; overload;
  2423.   {$EXTERNALSYM glVertex3}
  2424. procedure glVertex(x,y,z: GLshort); stdcall; overload;
  2425.   {$EXTERNALSYM glVertex}
  2426. procedure glVertex3(v: PGLshort); stdcall; overload;
  2427.   {$EXTERNALSYM glVertex3}
  2428. procedure glVertex(x,y,z,w: GLdouble); stdcall; overload;
  2429.   {$EXTERNALSYM glVertex}
  2430. procedure glVertex4(v: PGLdouble); stdcall; overload;
  2431.   {$EXTERNALSYM glVertex4}
  2432. procedure glVertex(x,y,z,w: GLfloat); stdcall; overload;
  2433.   {$EXTERNALSYM glVertex}
  2434. procedure glVertex4(v: PGLfloat); stdcall; overload;
  2435.   {$EXTERNALSYM glVertex4}
  2436. procedure glVertex(x,y,z,w: GLint); stdcall; overload;
  2437.   {$EXTERNALSYM glVertex}
  2438. procedure glVertex4(v: PGLint); stdcall; overload;
  2439.   {$EXTERNALSYM glVertex4}
  2440. procedure glVertex(x,y,z,w: GLshort); stdcall; overload;
  2441.   {$EXTERNALSYM glVertex}
  2442. procedure glVertex4(v: PGLshort); stdcall; overload;
  2443.   {$EXTERNALSYM glVertex4}
  2444.  
  2445. procedure glViewport (x,y: GLint; width, height: GLsizei); stdcall;
  2446.   {$EXTERNALSYM glViewport}
  2447.  
  2448. type
  2449.  
  2450. // EXT_vertex_array
  2451.   PFNGLARRAYELEMENTEXTPROC = procedure (i: GLint) stdcall;
  2452.   {$EXTERNALSYM PFNGLARRAYELEMENTEXTPROC}
  2453.   TGLARRAYELEMENTEXTPROC = PFNGLARRAYELEMENTEXTPROC;
  2454.   PFNGLDRAWARRAYSEXTPROC = procedure (mode: GLenum; first: GLint; count: GLsizei) stdcall;
  2455.   {$EXTERNALSYM PFNGLDRAWARRAYSEXTPROC}
  2456.   TGLDRAWARRAYSEXTPROC = PFNGLDRAWARRAYSEXTPROC;
  2457.   PFNGLVERTEXPOINTEREXTPROC = procedure (size: GLint; type_: GLenum;
  2458.     stride, count: GLsizei; P: Pointer) stdcall;
  2459.   {$EXTERNALSYM PFNGLVERTEXPOINTEREXTPROC}
  2460.   TGLVERTEXPOINTEREXTPROC = PFNGLVERTEXPOINTEREXTPROC;
  2461.   PFNGLNORMALPOINTEREXTPROC = procedure (type_: GLenum; stride, count: GLsizei;
  2462.     P: Pointer) stdcall;
  2463.   {$EXTERNALSYM PFNGLNORMALPOINTEREXTPROC}
  2464.   TGLNORMALPOINTEREXTPROC = PFNGLNORMALPOINTEREXTPROC;
  2465.   PFNGLCOLORPOINTEREXTPROC = procedure (size: GLint; type_: GLenum;
  2466.     stride, count: GLsizei; P: Pointer) stdcall;
  2467.   {$EXTERNALSYM PFNGLCOLORPOINTEREXTPROC}
  2468.   TGLCOLORPOINTEREXTPROC = PFNGLCOLORPOINTEREXTPROC;
  2469.   PFNGLINDEXPOINTEREXTPROC = procedure (type_: GLenum; stride, count: GLsizei;
  2470.     P: Pointer) stdcall;
  2471.   {$EXTERNALSYM PFNGLINDEXPOINTEREXTPROC}
  2472.   TGLINDEXPOINTEREXTPROC = PFNGLINDEXPOINTEREXTPROC;
  2473.   PFNGLTEXCOORDPOINTEREXTPROC = procedure (size: GLint; type_: GLenum;
  2474.     stride, count: GLsizei; P: Pointer) stdcall;
  2475.   {$EXTERNALSYM PFNGLTEXCOORDPOINTEREXTPROC}
  2476.   TGLTEXCOORDPOINTEREXTPROC = PFNGLTEXCOORDPOINTEREXTPROC;
  2477.   PFNGLEDGEFLAGPOINTEREXTPROC = procedure (stride, count: GLsizei;
  2478.     P: PGLboolean) stdcall;
  2479.   {$EXTERNALSYM PFNGLEDGEFLAGPOINTEREXTPROC}
  2480.   TGLEDGEFLAGPOINTEREXTPROC = PFNGLEDGEFLAGPOINTEREXTPROC;
  2481.   PFNGLGETPOINTERVEXTPROC = procedure (pname: GLenum; var Params) stdcall;
  2482.   {$EXTERNALSYM PFNGLGETPOINTERVEXTPROC}
  2483.   TGLGETPOINTERVEXTPROC = PFNGLGETPOINTERVEXTPROC;
  2484.  
  2485. // WIN_swap_hint
  2486.  
  2487.   PFNGLADDSWAPHINTRECTWINPROC = procedure (x, y: GLint; width, height: GLsizei) stdcall;
  2488.   {$EXTERNALSYM PFNGLADDSWAPHINTRECTWINPROC}
  2489.   TGLADDSWAPHINTRECTWINPROC = PFNGLADDSWAPHINTRECTWINPROC;
  2490.  
  2491. { OpenGL Utility routines (glu.h) =======================================}
  2492.  
  2493. function gluErrorString (errCode: GLenum): PChar; stdcall;
  2494.   {$EXTERNALSYM gluErrorString}
  2495. function gluErrorUnicodeStringEXT (errCode: GLenum): PWChar; stdcall;
  2496.   {$EXTERNALSYM gluErrorUnicodeStringEXT}
  2497. function gluGetString (name: GLenum): PChar; stdcall;
  2498.   {$EXTERNALSYM gluGetString}
  2499.  
  2500. procedure gluLookAt(eyex, eyey, eyez,
  2501.                     centerx, centery, centerz,
  2502.                     upx, upy, upz: GLdouble); stdcall;
  2503.   {$EXTERNALSYM gluLookAt}
  2504. procedure gluOrtho2D(left, right, bottom, top: GLdouble); stdcall;
  2505.   {$EXTERNALSYM gluOrtho2D}
  2506. procedure gluPerspective(fovy, aspect, zNear, zFar: GLdouble); stdcall;
  2507.   {$EXTERNALSYM gluPerspective}
  2508. procedure gluPickMatrix (x, y, width, height: GLdouble; viewport: PGLint); stdcall;
  2509.   {$EXTERNALSYM gluPickMatrix}
  2510. function  gluProject (objx, objy, obyz: GLdouble;
  2511.                       modelMatrix: PGLdouble;
  2512.                       projMatrix: PGLdouble;
  2513.                       viewport: PGLint;
  2514.                       var winx, winy, winz: GLDouble): Integer; stdcall;
  2515.   {$EXTERNALSYM gluProject}
  2516. function  gluUnProject(winx, winy, winz: GLdouble;
  2517.                       modelMatrix: PGLdouble;
  2518.                       projMatrix: PGLdouble;
  2519.                       viewport: PGLint;
  2520.                       var objx, objy, objz: GLdouble): Integer; stdcall;
  2521.   {$EXTERNALSYM gluUnProject}
  2522. function  gluScaleImage(format: GLenum;
  2523.    widthin, heightin: GLint; typein: GLenum; datain: Pointer;
  2524.    widthout, heightout: GLint; typeout: GLenum; dataout: Pointer): Integer; stdcall;
  2525.   {$EXTERNALSYM gluScaleImage}
  2526.  
  2527. function  gluBuild1DMipmaps (target: GLenum; components, width: GLint;
  2528.                              format, atype: GLenum; data: Pointer): Integer; stdcall;
  2529.   {$EXTERNALSYM gluBuild1DMipmaps}
  2530. function  gluBuild2DMipmaps (target: GLenum; components, width: GLint;
  2531.                              format, atype: GLenum; data: Pointer): Integer; stdcall;
  2532.   {$EXTERNALSYM gluBuild2DMipmaps}
  2533.  
  2534. type
  2535.   _GLUquadricObj = record end;
  2536.   GLUquadricObj = ^_GLUquadricObj;
  2537.   {$EXTERNALSYM GLUquadricObj}
  2538.  
  2539.   GLUquadricErrorProc = procedure (error: GLenum) stdcall;
  2540.   TGLUquadricErrorProc = GLUquadricErrorProc;
  2541.   {$EXTERNALSYM GLUquadricErrorProc}
  2542.  
  2543. function  gluNewQuadric: GLUquadricObj; stdcall;
  2544.   {$EXTERNALSYM gluNewQuadric}
  2545. procedure gluDeleteQuadric (state: GLUquadricObj); stdcall;
  2546.   {$EXTERNALSYM gluDeleteQuadric}
  2547. procedure gluQuadricNormals (quadObject: GLUquadricObj; normals: GLenum);  stdcall;
  2548.   {$EXTERNALSYM gluQuadricNormals}
  2549. procedure gluQuadricTexture (quadObject: GLUquadricObj; textureCoords: GLboolean );stdcall;
  2550.   {$EXTERNALSYM gluQuadricTexture}
  2551. procedure gluQuadricOrientation (quadObject: GLUquadricObj; orientation: GLenum); stdcall;
  2552.   {$EXTERNALSYM gluQuadricOrientation}
  2553. procedure gluQuadricDrawStyle (quadObject: GLUquadricObj; drawStyle: GLenum); stdcall;
  2554.   {$EXTERNALSYM gluQuadricDrawStyle}
  2555. procedure gluCylinder (quadObject: GLUquadricObj;
  2556.   baseRadius, topRadius, height: GLdouble; slices, stacks: GLint); stdcall;
  2557.   {$EXTERNALSYM gluCylinder}
  2558. procedure gluDisk (quadObject: GLUquadricObj;
  2559.   innerRadius, outerRadius: GLdouble; slices, loops: GLint); stdcall;
  2560.   {$EXTERNALSYM gluDisk}
  2561. procedure gluPartialDisk (quadObject: GLUquadricObj;
  2562.   innerRadius, outerRadius: GLdouble; slices, loops: GLint;
  2563.   startAngle, sweepAngle: GLdouble); stdcall;
  2564.   {$EXTERNALSYM gluPartialDisk}
  2565. procedure gluSphere (quadObject: GLUquadricObj; radius: GLdouble; slices, loops: GLint); stdcall;
  2566. procedure gluQuadricCallback (quadObject: GLUquadricObj; which: GLenum;
  2567.   callback: Pointer); stdcall;
  2568.   {$EXTERNALSYM gluSphere}
  2569.  
  2570. type
  2571.   _GLUtesselator = record end;
  2572.   GLUtesselator = ^_GLUtesselator;
  2573.   {$EXTERNALSYM GLUtesselator}
  2574.  
  2575.   // tesselator callback procedure types
  2576.   GLUtessBeginProc = procedure (a: GLenum) stdcall;
  2577.   {$EXTERNALSYM GLUtessBeginProc}
  2578.   TGLUtessBeginProc = GLUtessBeginProc;
  2579.   GLUtessEdgeFlagProc = procedure (flag: GLboolean) stdcall;
  2580.   {$EXTERNALSYM GLUtessEdgeFlagProc}
  2581.   TGLUtessEdgeFlagProc = GLUtessEdgeFlagProc;
  2582.   GLUtessVertexProc = procedure (p: Pointer) stdcall;
  2583.   {$EXTERNALSYM GLUtessVertexProc}
  2584.   TGLUtessVertexProc = GLUtessVertexProc;
  2585.   GLUtessEndProc = procedure stdcall;
  2586.   {$EXTERNALSYM GLUtessEndProc}
  2587.   TGLUtessEndProc = GLUtessEndProc;
  2588.   GLUtessErrorProc = TGLUquadricErrorProc;
  2589.   {$EXTERNALSYM GLUtessErrorProc}
  2590.   GLUtessCombineProc = procedure (a: PGLdouble; b: Pointer;
  2591.                                    c: PGLfloat; var d: Pointer) stdcall;
  2592.   {$EXTERNALSYM GLUtessCombineProc}
  2593.   TGLUtessCombineProc = GLUtessCombineProc;
  2594.  
  2595. function gluNewTess: GLUtesselator; stdcall;
  2596.   {$EXTERNALSYM gluNewTess}
  2597. procedure gluDeleteTess( tess: GLUtesselator ); stdcall;
  2598.   {$EXTERNALSYM gluDeleteTess}
  2599. procedure gluTessBeginPolygon( tess: GLUtesselator ); stdcall;
  2600.   {$EXTERNALSYM gluTessBeginPolygon}
  2601. procedure gluTessBeginContour( tess: GLUtesselator ); stdcall;
  2602.   {$EXTERNALSYM gluTessBeginContour}
  2603. procedure gluTessVertex( tess: GLUtesselator; coords: PGLdouble; data: Pointer ); stdcall;
  2604.   {$EXTERNALSYM gluTessVertex}
  2605. procedure gluTessEndContour( tess: GLUtesselator ); stdcall;
  2606.   {$EXTERNALSYM gluTessEndContour}
  2607. procedure gluTessEndPolygon( tess: GLUtesselator ); stdcall;
  2608.   {$EXTERNALSYM gluTessEndPolygon}
  2609. procedure gluTessProperty( tess: GLUtesselator; which: GLenum; value: GLdouble); stdcall;
  2610.   {$EXTERNALSYM gluTessProperty}
  2611. procedure gluTessNormal( tess: GLUtesselator; x,y,z: GLdouble); stdcall;
  2612.   {$EXTERNALSYM gluTessNormal}
  2613. procedure gluTessCallback( tess: GLUtesselator; which: GLenum; callback: pointer); stdcall;
  2614.   {$EXTERNALSYM gluTessCallback}
  2615.  
  2616. type
  2617.   TGLUnurbsObj = record end;
  2618.   GLUnurbsObj = ^TGLUnurbsObj;
  2619.   {$EXTERNALSYM GLUnurbsObj}
  2620.  
  2621.   GLUnurbsErrorProc = GLUquadricErrorProc;
  2622.   {$EXTERNALSYM GLUnurbsErrorProc}
  2623.   TGLUnurbsErrorProc = GLUnurbsErrorProc;
  2624.  
  2625. function gluNewNurbsRenderer: GLUnurbsObj; stdcall;
  2626.   {$EXTERNALSYM gluNewNurbsRenderer}
  2627. procedure gluDeleteNurbsRenderer (nobj: GLUnurbsObj); stdcall;
  2628.   {$EXTERNALSYM gluDeleteNurbsRenderer}
  2629. procedure gluBeginSurface (nobj: GLUnurbsObj); stdcall;
  2630.   {$EXTERNALSYM gluBeginSurface}
  2631. procedure gluBeginCurve (nobj: GLUnurbsObj); stdcall;
  2632.   {$EXTERNALSYM gluBeginCurve}
  2633. procedure gluEndCurve (nobj: GLUnurbsObj); stdcall;
  2634.   {$EXTERNALSYM gluEndCurve}
  2635. procedure gluEndSurface (nobj: GLUnurbsObj); stdcall;
  2636.   {$EXTERNALSYM gluEndSurface}
  2637. procedure gluBeginTrim (nobj: GLUnurbsObj); stdcall;
  2638.   {$EXTERNALSYM gluBeginTrim}
  2639. procedure gluEndTrim (nobj: GLUnurbsObj); stdcall;
  2640.   {$EXTERNALSYM gluEndTrim}
  2641. procedure gluPwlCurve (nobj: GLUnurbsObj; count: GLint; points: PGLfloat;
  2642.   stride: GLint; _type: GLenum); stdcall;
  2643.   {$EXTERNALSYM gluPwlCurve}
  2644. procedure gluNurbsCurve (nobj: GLUnurbsObj; nknots: GLint; knot: PGLfloat;
  2645.   stride: GLint; ctlpts: PGLfloat; order: GLint; _type: GLenum); stdcall;
  2646.   {$EXTERNALSYM gluNurbsCurve}
  2647. procedure gluNurbsSurface (nobj: GLUnurbsObj;
  2648.   sknot_count: GLint; sknot: PGLfloat;
  2649.   tknot_count: GLint; tknot: PGLfloat;
  2650.   s_stride, t_stride: GLint;
  2651.   ctlpts: PGLfloat; sorder, torder: GLint; _type: GLenum); stdcall;
  2652.   {$EXTERNALSYM gluNurbsSurface}
  2653. procedure gluLoadSamplingMatrices (nobj: GLUnurbsObj;
  2654.   modelMatrix: PGLdouble; projMatrix: PGLdouble; viewport: PGLint); stdcall;
  2655.   {$EXTERNALSYM gluLoadSamplingMatrices}
  2656. procedure gluNurbsProperty (nobj: GLUnurbsObj; prop: GLenum; value: GLfloat); stdcall;
  2657.   {$EXTERNALSYM gluNurbsProperty}
  2658. procedure gluGetNurbsProperty (nobj: GLUnurbsObj; prop: GLenum; var value: GLfloat); stdcall;
  2659.   {$EXTERNALSYM gluGetNurbsProperty}
  2660. procedure gluNurbsCallback (nobj: GLUnurbsObj; which: GLenum; callback: pointer); stdcall;
  2661.   {$EXTERNALSYM gluNurbsCallback}
  2662.  
  2663. {****           Generic constants               ****}
  2664. const
  2665.   GLU_VERSION_1_1  =               1;
  2666.   {$EXTERNALSYM GLU_VERSION_1_1}
  2667.  
  2668. { Errors: (return value 0 = no error) }
  2669.   GLU_INVALID_ENUM       = 100900;
  2670.   {$EXTERNALSYM GLU_INVALID_ENUM}
  2671.   GLU_INVALID_VALUE      = 100901;
  2672.   {$EXTERNALSYM GLU_INVALID_VALUE}
  2673.   GLU_OUT_OF_MEMORY      = 100902;
  2674.   {$EXTERNALSYM GLU_OUT_OF_MEMORY}
  2675.   GLU_INCOMPATIBLE_GL_VERSION  =   100903;
  2676.   {$EXTERNALSYM GLU_INCOMPATIBLE_GL_VERSION}
  2677.  
  2678. { gets }
  2679.   GLU_VERSION            = 100800;
  2680.   {$EXTERNALSYM GLU_VERSION}
  2681.   GLU_EXTENSIONS         = 100801;
  2682.   {$EXTERNALSYM GLU_EXTENSIONS}
  2683.  
  2684. { For laughs: }
  2685.   GLU_TRUE               = GL_TRUE;
  2686.   {$EXTERNALSYM GLU_TRUE}
  2687.   GLU_FALSE              = GL_FALSE;
  2688.   {$EXTERNALSYM GLU_FALSE}
  2689.  
  2690. {***           Quadric constants               ***}
  2691.  
  2692. { Types of normals: }
  2693.   GLU_SMOOTH             = 100000;
  2694.   {$EXTERNALSYM GLU_SMOOTH}
  2695.   GLU_FLAT               = 100001;
  2696.   {$EXTERNALSYM GLU_FLAT}
  2697.   GLU_NONE               = 100002;
  2698.   {$EXTERNALSYM GLU_NONE}
  2699.  
  2700. { DrawStyle types: }
  2701.   GLU_POINT              = 100010;
  2702.   {$EXTERNALSYM GLU_POINT}
  2703.   GLU_LINE               = 100011;
  2704.   {$EXTERNALSYM GLU_LINE}
  2705.   GLU_FILL               = 100012;
  2706.   {$EXTERNALSYM GLU_FILL}
  2707.   GLU_SILHOUETTE         = 100013;
  2708.   {$EXTERNALSYM GLU_SILHOUETTE}
  2709.  
  2710. { Orientation types: }
  2711.   GLU_OUTSIDE            = 100020;
  2712.   {$EXTERNALSYM GLU_OUTSIDE}
  2713.   GLU_INSIDE             = 100021;
  2714.   {$EXTERNALSYM GLU_INSIDE}
  2715.  
  2716. { Callback types: }
  2717. {      GLU_ERROR               100103 }
  2718.  
  2719.  
  2720. {***           Tesselation constants           ***}
  2721.  
  2722.   GLU_TESS_MAX_COORD     =         1.0e150;
  2723.   {$EXTERNALSYM GLU_TESS_MAX_COORD}
  2724.  
  2725. { Property types: }
  2726.   GLU_TESS_WINDING_RULE  =         100110;
  2727.   {$EXTERNALSYM GLU_TESS_WINDING_RULE}
  2728.   GLU_TESS_BOUNDARY_ONLY =         100111;
  2729.   {$EXTERNALSYM GLU_TESS_BOUNDARY_ONLY}
  2730.   GLU_TESS_TOLERANCE     =         100112;
  2731.   {$EXTERNALSYM GLU_TESS_TOLERANCE}
  2732.  
  2733. { Possible winding rules: }
  2734.   GLU_TESS_WINDING_ODD          =  100130;
  2735.   {$EXTERNALSYM GLU_TESS_WINDING_ODD}
  2736.   GLU_TESS_WINDING_NONZERO      =  100131;
  2737.   {$EXTERNALSYM GLU_TESS_WINDING_NONZERO}
  2738.   GLU_TESS_WINDING_POSITIVE     =  100132;
  2739.   {$EXTERNALSYM GLU_TESS_WINDING_POSITIVE}
  2740.   GLU_TESS_WINDING_NEGATIVE     =  100133;
  2741.   {$EXTERNALSYM GLU_TESS_WINDING_NEGATIVE}
  2742.   GLU_TESS_WINDING_ABS_GEQ_TWO  =  100134;
  2743.   {$EXTERNALSYM GLU_TESS_WINDING_ABS_GEQ_TWO}
  2744.  
  2745. { Callback types: }
  2746.   GLU_TESS_BEGIN     = 100100 ;     { void (*)(GLenum    type)         }
  2747.   {$EXTERNALSYM GLU_TESS_BEGIN}
  2748.   GLU_TESS_VERTEX    = 100101 ;     { void (*)(void      *data)        }
  2749.   {$EXTERNALSYM GLU_TESS_VERTEX}
  2750.   GLU_TESS_END       = 100102 ;     { void (*)(void)                   }
  2751.   {$EXTERNALSYM GLU_TESS_END}
  2752.   GLU_TESS_ERROR     = 100103 ;     { void (*)(GLenum    errno)        }
  2753.   {$EXTERNALSYM GLU_TESS_ERROR}
  2754.   GLU_TESS_EDGE_FLAG = 100104 ;     { void (*)(GLboolean boundaryEdge) }
  2755.   {$EXTERNALSYM GLU_TESS_EDGE_FLAG}
  2756.   GLU_TESS_COMBINE   = 100105 ;     { void (*)(GLdouble  coords[3],;
  2757.                                                     void      *data[4],;
  2758.                                                     GLfloat   weight[4],;
  2759.                                                     void      **dataOut)    }
  2760.   {$EXTERNALSYM GLU_TESS_COMBINE}
  2761.  
  2762. { Errors: }
  2763.   GLU_TESS_ERROR1    = 100151;
  2764.   {$EXTERNALSYM GLU_TESS_ERROR1}
  2765.   GLU_TESS_ERROR2    = 100152;
  2766.   {$EXTERNALSYM GLU_TESS_ERROR2}
  2767.   GLU_TESS_ERROR3    = 100153;
  2768.   {$EXTERNALSYM GLU_TESS_ERROR3}
  2769.   GLU_TESS_ERROR4    = 100154;
  2770.   {$EXTERNALSYM GLU_TESS_ERROR4}
  2771.   GLU_TESS_ERROR5    = 100155;
  2772.   {$EXTERNALSYM GLU_TESS_ERROR5}
  2773.   GLU_TESS_ERROR6    = 100156;
  2774.   {$EXTERNALSYM GLU_TESS_ERROR6}
  2775.   GLU_TESS_ERROR7    = 100157;
  2776.   {$EXTERNALSYM GLU_TESS_ERROR7}
  2777.   GLU_TESS_ERROR8    = 100158;
  2778.   {$EXTERNALSYM GLU_TESS_ERROR8}
  2779.  
  2780.   GLU_TESS_MISSING_BEGIN_POLYGON  = GLU_TESS_ERROR1;
  2781.   {$EXTERNALSYM GLU_TESS_MISSING_BEGIN_POLYGON}
  2782.   GLU_TESS_MISSING_BEGIN_CONTOUR  = GLU_TESS_ERROR2;
  2783.   {$EXTERNALSYM GLU_TESS_MISSING_BEGIN_CONTOUR}
  2784.   GLU_TESS_MISSING_END_POLYGON    = GLU_TESS_ERROR3;
  2785.   {$EXTERNALSYM GLU_TESS_MISSING_END_POLYGON}
  2786.   GLU_TESS_MISSING_END_CONTOUR    = GLU_TESS_ERROR4;
  2787.   {$EXTERNALSYM GLU_TESS_MISSING_END_CONTOUR}
  2788.   GLU_TESS_COORD_TOO_LARGE        = GLU_TESS_ERROR5;
  2789.   {$EXTERNALSYM GLU_TESS_COORD_TOO_LARGE}
  2790.   GLU_TESS_NEED_COMBINE_CALLBACK  = GLU_TESS_ERROR6;
  2791.   {$EXTERNALSYM GLU_TESS_NEED_COMBINE_CALLBACK}
  2792.  
  2793. {***           NURBS constants                 ***}
  2794.  
  2795. { Properties: }
  2796.   GLU_AUTO_LOAD_MATRIX          =  100200;
  2797.   {$EXTERNALSYM GLU_AUTO_LOAD_MATRIX}
  2798.   GLU_CULLING                   =  100201;
  2799.   {$EXTERNALSYM GLU_CULLING}
  2800.   GLU_SAMPLING_TOLERANCE        =  100203;
  2801.   {$EXTERNALSYM GLU_SAMPLING_TOLERANCE}
  2802.   GLU_DISPLAY_MODE              =  100204;
  2803.   {$EXTERNALSYM GLU_DISPLAY_MODE}
  2804.   GLU_PARAMETRIC_TOLERANCE      =  100202;
  2805.   {$EXTERNALSYM GLU_PARAMETRIC_TOLERANCE}
  2806.   GLU_SAMPLING_METHOD           =  100205;
  2807.   {$EXTERNALSYM GLU_SAMPLING_METHOD}
  2808.   GLU_U_STEP                    =  100206;
  2809.   {$EXTERNALSYM GLU_U_STEP}
  2810.   GLU_V_STEP                    =  100207;
  2811.   {$EXTERNALSYM GLU_V_STEP}
  2812.  
  2813. { Sampling methods: }
  2814.   GLU_PATH_LENGTH               =  100215;
  2815.   {$EXTERNALSYM GLU_PATH_LENGTH}
  2816.   GLU_PARAMETRIC_ERROR          =  100216;
  2817.   {$EXTERNALSYM GLU_PARAMETRIC_ERROR}
  2818.   GLU_DOMAIN_DISTANCE           =  100217;
  2819.   {$EXTERNALSYM GLU_DOMAIN_DISTANCE}
  2820.  
  2821. { Trimming curve types }
  2822.   GLU_MAP1_TRIM_2       =  100210;
  2823.   {$EXTERNALSYM GLU_MAP1_TRIM_2}
  2824.   GLU_MAP1_TRIM_3       =  100211;
  2825.   {$EXTERNALSYM GLU_MAP1_TRIM_3}
  2826.  
  2827. { Display modes: }
  2828. {      GLU_FILL                100012 }
  2829.   GLU_OUTLINE_POLYGON    = 100240;
  2830.   {$EXTERNALSYM GLU_OUTLINE_POLYGON}
  2831.   GLU_OUTLINE_PATCH      = 100241;
  2832.   {$EXTERNALSYM GLU_OUTLINE_PATCH}
  2833.  
  2834. { Callbacks: }
  2835. {      GLU_ERROR               100103 }
  2836.  
  2837. { Errors: }
  2838.   GLU_NURBS_ERROR1       = 100251;
  2839.   {$EXTERNALSYM GLU_NURBS_ERROR1}
  2840.   GLU_NURBS_ERROR2       = 100252;
  2841.   {$EXTERNALSYM GLU_NURBS_ERROR2}
  2842.   GLU_NURBS_ERROR3       = 100253;
  2843.   {$EXTERNALSYM GLU_NURBS_ERROR3}
  2844.   GLU_NURBS_ERROR4       = 100254;
  2845.   {$EXTERNALSYM GLU_NURBS_ERROR4}
  2846.   GLU_NURBS_ERROR5       = 100255;
  2847.   {$EXTERNALSYM GLU_NURBS_ERROR5}
  2848.   GLU_NURBS_ERROR6       = 100256;
  2849.   {$EXTERNALSYM GLU_NURBS_ERROR6}
  2850.   GLU_NURBS_ERROR7       = 100257;
  2851.   {$EXTERNALSYM GLU_NURBS_ERROR7}
  2852.   GLU_NURBS_ERROR8       = 100258;
  2853.   {$EXTERNALSYM GLU_NURBS_ERROR8}
  2854.   GLU_NURBS_ERROR9       = 100259;
  2855.   {$EXTERNALSYM GLU_NURBS_ERROR9}
  2856.   GLU_NURBS_ERROR10      = 100260;
  2857.   {$EXTERNALSYM GLU_NURBS_ERROR10}
  2858.   GLU_NURBS_ERROR11      = 100261;
  2859.   {$EXTERNALSYM GLU_NURBS_ERROR11}
  2860.   GLU_NURBS_ERROR12      = 100262;
  2861.   {$EXTERNALSYM GLU_NURBS_ERROR12}
  2862.   GLU_NURBS_ERROR13      = 100263;
  2863.   {$EXTERNALSYM GLU_NURBS_ERROR13}
  2864.   GLU_NURBS_ERROR14      = 100264;
  2865.   {$EXTERNALSYM GLU_NURBS_ERROR14}
  2866.   GLU_NURBS_ERROR15      = 100265;
  2867.   {$EXTERNALSYM GLU_NURBS_ERROR15}
  2868.   GLU_NURBS_ERROR16      = 100266;
  2869.   {$EXTERNALSYM GLU_NURBS_ERROR16}
  2870.   GLU_NURBS_ERROR17      = 100267;
  2871.   {$EXTERNALSYM GLU_NURBS_ERROR17}
  2872.   GLU_NURBS_ERROR18      = 100268;
  2873.   {$EXTERNALSYM GLU_NURBS_ERROR18}
  2874.   GLU_NURBS_ERROR19      = 100269;
  2875.   {$EXTERNALSYM GLU_NURBS_ERROR19}
  2876.   GLU_NURBS_ERROR20      = 100270;
  2877.   {$EXTERNALSYM GLU_NURBS_ERROR20}
  2878.   GLU_NURBS_ERROR21      = 100271;
  2879.   {$EXTERNALSYM GLU_NURBS_ERROR21}
  2880.   GLU_NURBS_ERROR22      = 100272;
  2881.   {$EXTERNALSYM GLU_NURBS_ERROR22}
  2882.   GLU_NURBS_ERROR23      = 100273;
  2883.   {$EXTERNALSYM GLU_NURBS_ERROR23}
  2884.   GLU_NURBS_ERROR24      = 100274;
  2885.   {$EXTERNALSYM GLU_NURBS_ERROR24}
  2886.   GLU_NURBS_ERROR25      = 100275;
  2887.   {$EXTERNALSYM GLU_NURBS_ERROR25}
  2888.   GLU_NURBS_ERROR26      = 100276;
  2889.   {$EXTERNALSYM GLU_NURBS_ERROR26}
  2890.   GLU_NURBS_ERROR27      = 100277;
  2891.   {$EXTERNALSYM GLU_NURBS_ERROR27}
  2892.   GLU_NURBS_ERROR28      = 100278;
  2893.   {$EXTERNALSYM GLU_NURBS_ERROR28}
  2894.   GLU_NURBS_ERROR29      = 100279;
  2895.   {$EXTERNALSYM GLU_NURBS_ERROR29}
  2896.   GLU_NURBS_ERROR30      = 100280;
  2897.   {$EXTERNALSYM GLU_NURBS_ERROR30}
  2898.   GLU_NURBS_ERROR31      = 100281;
  2899.   {$EXTERNALSYM GLU_NURBS_ERROR31}
  2900.   GLU_NURBS_ERROR32      = 100282;
  2901.   {$EXTERNALSYM GLU_NURBS_ERROR32}
  2902.   GLU_NURBS_ERROR33      = 100283;
  2903.   {$EXTERNALSYM GLU_NURBS_ERROR33}
  2904.   GLU_NURBS_ERROR34      = 100284;
  2905.   {$EXTERNALSYM GLU_NURBS_ERROR34}
  2906.   GLU_NURBS_ERROR35      = 100285;
  2907.   {$EXTERNALSYM GLU_NURBS_ERROR35}
  2908.   GLU_NURBS_ERROR36      = 100286;
  2909.   {$EXTERNALSYM GLU_NURBS_ERROR36}
  2910.   GLU_NURBS_ERROR37      = 100287;
  2911.   {$EXTERNALSYM GLU_NURBS_ERROR37}
  2912.  
  2913. {
  2914. /****           Backwards compatibility for old tesselator           ****/
  2915.  
  2916. typedef GLUtesselator GLUtriangulatorObj;
  2917.  
  2918. procedure   gluBeginPolygon( tess: GLUtesselator );
  2919.  
  2920. procedure   gluNextContour(  tess: GLUtesselator,
  2921.                                  GLenum        type );
  2922.  
  2923. procedure   gluEndPolygon(   tess: GLUtesselator );
  2924.  
  2925. /* Contours types -- obsolete! */
  2926. #define GLU_CW          100120
  2927. #define GLU_CCW         100121
  2928. #define GLU_INTERIOR    100122
  2929. #define GLU_EXTERIOR    100123
  2930. #define GLU_UNKNOWN     100124
  2931.  
  2932. /* Names without "TESS_" prefix */
  2933. #define GLU_BEGIN       GLU_TESS_BEGIN
  2934. #define GLU_VERTEX      GLU_TESS_VERTEX
  2935. #define GLU_END         GLU_TESS_END
  2936. #define GLU_ERROR       GLU_TESS_ERROR
  2937. #define GLU_EDGE_FLAG   GLU_TESS_EDGE_FLAG
  2938. }
  2939.  
  2940. { GDI support routines for OpenGL ==========================================}
  2941.  
  2942. function wglGetProcAddress(ProcName: PChar): Pointer;  stdcall;
  2943.   {$EXTERNALSYM wglGetProcAddress}
  2944.  
  2945. const
  2946.   glu32 = 'glu32.dll';
  2947.  
  2948. implementation
  2949.  
  2950. procedure glAccum; external opengl32;
  2951. procedure glAlphaFunc; external opengl32;
  2952. procedure glBegin; external opengl32;
  2953. procedure glBitmap; external opengl32;
  2954. procedure glBlendFunc; external opengl32;
  2955. procedure glCallList; external opengl32;
  2956. procedure glCallLists; external opengl32;
  2957. procedure glClear; external opengl32;
  2958. procedure glClearAccum; external opengl32;
  2959. procedure glClearColor; external opengl32;
  2960. procedure glClearDepth; external opengl32;
  2961. procedure glClearIndex; external opengl32;
  2962. procedure glClearStencil; external opengl32;
  2963. procedure glClipPlane; external opengl32;
  2964. procedure glColor3b; external opengl32;
  2965. procedure glColor3bv; external opengl32;
  2966. procedure glColor3d; external opengl32;
  2967. procedure glColor3dv; external opengl32;
  2968. procedure glColor3f; external opengl32;
  2969. procedure glColor3fv; external opengl32;
  2970. procedure glColor3i; external opengl32;
  2971. procedure glColor3iv; external opengl32;
  2972. procedure glColor3s; external opengl32;
  2973. procedure glColor3sv; external opengl32;
  2974. procedure glColor3ub; external opengl32;
  2975. procedure glColor3ubv; external opengl32;
  2976. procedure glColor3ui; external opengl32;
  2977. procedure glColor3uiv; external opengl32;
  2978. procedure glColor3us; external opengl32;
  2979. procedure glColor3usv; external opengl32;
  2980. procedure glColor4b; external opengl32;
  2981. procedure glColor4bv; external opengl32;
  2982. procedure glColor4d; external opengl32;
  2983. procedure glColor4dv; external opengl32;
  2984. procedure glColor4f; external opengl32;
  2985. procedure glColor4fv; external opengl32;
  2986. procedure glColor4i; external opengl32;
  2987. procedure glColor4iv; external opengl32;
  2988. procedure glColor4s; external opengl32;
  2989. procedure glColor4sv; external opengl32;
  2990. procedure glColor4ub; external opengl32;
  2991. procedure glColor4ubv; external opengl32;
  2992. procedure glColor4ui; external opengl32;
  2993. procedure glColor4uiv; external opengl32;
  2994. procedure glColor4us; external opengl32;
  2995. procedure glColor4usv; external opengl32;
  2996. procedure glColor(red, green, blue: GLbyte); external opengl32 name 'glColor3b';
  2997. procedure glColor(red, green, blue: GLdouble); external opengl32 name 'glColor3d';
  2998. procedure glColor(red, green, blue: GLfloat); external opengl32 name 'glColor3f';
  2999. procedure glColor(red, green, blue: GLint); external opengl32 name 'glColor3i';
  3000. procedure glColor(red, green, blue: GLshort); external opengl32 name 'glColor3s';
  3001. procedure glColor(red, green, blue: GLubyte); external opengl32 name 'glColor3ub';
  3002. procedure glColor(red, green, blue: GLuint); external opengl32 name 'glColor3ui';
  3003. procedure glColor(red, green, blue: GLushort); external opengl32 name 'glColor3us';
  3004. procedure glColor(red, green, blue, alpha: GLbyte); external opengl32 name 'glColor4b';
  3005. procedure glColor(red, green, blue, alpha: GLdouble); external opengl32 name 'glColor4d';
  3006. procedure glColor(red, green, blue, alpha: GLfloat); external opengl32 name 'glColor4f';
  3007. procedure glColor(red, green, blue, alpha: GLint); external opengl32 name 'glColor4i';
  3008. procedure glColor(red, green, blue, alpha: GLshort); external opengl32 name 'glColor4s';
  3009. procedure glColor(red, green, blue, alpha: GLubyte); external opengl32 name 'glColor4ub';
  3010. procedure glColor(red, green, blue, alpha: GLuint); external opengl32 name 'glColor4ui';
  3011. procedure glColor(red, green, blue, alpha: GLushort); external opengl32 name 'glColor4us';
  3012. procedure glColor3(v: PGLbyte); external opengl32 name 'glColor3bv';
  3013. procedure glColor3(v: PGLdouble); external opengl32 name 'glColor3dv';
  3014. procedure glColor3(v: PGLfloat); external opengl32 name 'glColor3fv';
  3015. procedure glColor3(v: PGLint); external opengl32 name 'glColor3iv';
  3016. procedure glColor3(v: PGLshort); external opengl32 name 'glColor3sv';
  3017. procedure glColor3(v: PGLubyte); external opengl32 name 'glColor3ubv';
  3018. procedure glColor3(v: PGLuint); external opengl32 name 'glColor3uiv';
  3019. procedure glColor3(v: PGLushort); external opengl32 name 'glColor3usv';
  3020. procedure glColor4(v: PGLbyte); external opengl32 name 'glColor4bv';
  3021. procedure glColor4(v: PGLdouble); external opengl32 name 'glColor4dv';
  3022. procedure glColor4(v: PGLfloat); external opengl32 name 'glColor4fv';
  3023. procedure glColor4(v: PGLint); external opengl32 name 'glColor4iv';
  3024. procedure glColor4(v: PGLshort); external opengl32 name 'glColor4sv';
  3025. procedure glColor4(v: PGLubyte); external opengl32 name 'glColor4ubv';
  3026. procedure glColor4(v: PGLuint); external opengl32 name 'glColor4uiv';
  3027. procedure glColor4(v: PGLushort); external opengl32 name 'glColor4usv';
  3028. procedure glColorMask; external opengl32;
  3029. procedure glColorMaterial; external opengl32;
  3030. procedure glCopyPixels; external opengl32;
  3031. procedure glCullFace; external opengl32;
  3032. procedure glDeleteLists; external opengl32;
  3033. procedure glDepthFunc; external opengl32;
  3034. procedure glDepthMask; external opengl32;
  3035. procedure glDepthRange; external opengl32;
  3036. procedure glDisable; external opengl32;
  3037. procedure glDrawBuffer; external opengl32;
  3038. procedure glDrawPixels; external opengl32;
  3039. procedure glEdgeFlag; external opengl32;
  3040. procedure glEdgeFlagv; external opengl32;
  3041. procedure glEnable; external opengl32;
  3042. procedure glEnd; external opengl32;
  3043. procedure glEndList; external opengl32;
  3044. procedure glEvalCoord1d; external opengl32;
  3045. procedure glEvalCoord1dv; external opengl32;
  3046. procedure glEvalCoord1f; external opengl32;
  3047. procedure glEvalCoord1fv; external opengl32;
  3048. procedure glEvalCoord2d; external opengl32;
  3049. procedure glEvalCoord2dv; external opengl32;
  3050. procedure glEvalCoord2f; external opengl32;
  3051. procedure glEvalCoord2fv; external opengl32;
  3052. procedure glEvalCoord(u: GLdouble); external opengl32 name 'glEvalCoord1d';
  3053. procedure glEvalCoord(u: GLfloat); external opengl32 name 'glEvalCoord1f';
  3054. procedure glEvalCoord(u,v: GLdouble); external opengl32 name 'glEvalCoord2d';
  3055. procedure glEvalCoord(u,v: GLfloat); external opengl32 name 'glEvalCoord2f';
  3056. procedure glEvalCoord1(v: PGLdouble); external opengl32 name 'glEvalCoord1dv';
  3057. procedure glEvalCoord1(v: PGLfloat); external opengl32 name 'glEvalCoord1fv';
  3058. procedure glEvalCoord2(v: PGLdouble); external opengl32 name 'glEvalCoord2dv';
  3059. procedure glEvalCoord2(v: PGLfloat); external opengl32 name 'glEvalCoord2fv';
  3060. procedure glEvalMesh1; external opengl32;
  3061. procedure glEvalMesh2; external opengl32;
  3062. procedure glEvalMesh(mode: GLenum; i1, i2: GLint); external opengl32 name 'glEvalMesh1';
  3063. procedure glEvalMesh(mode: GLenum; i1, i2, j1, j2: GLint); external opengl32 name 'glEvalMesh2';
  3064. procedure glEvalPoint1; external opengl32;
  3065. procedure glEvalPoint2; external opengl32;
  3066. procedure glEvalPoint(i: GLint); external opengl32 name 'glEvalPoint1';
  3067. procedure glEvalPoint(i,j: GLint); external opengl32 name 'glEvalPoint2';
  3068. procedure glFeedbackBuffer; external opengl32;
  3069. procedure glFinish; external opengl32;
  3070. procedure glFlush; external opengl32;
  3071. procedure glFogf; external opengl32;
  3072. procedure glFogfv; external opengl32;
  3073. procedure glFogi; external opengl32;
  3074. procedure glFogiv; external opengl32;
  3075. procedure glFog(pname: GLenum; param: GLfloat); external opengl32 name 'glFogf';
  3076. procedure glFog(pname: GLenum; params: PGLfloat); external opengl32 name 'glFogfv';
  3077. procedure glFog(pname: GLenum; param: GLint); external opengl32 name 'glFogi';
  3078. procedure glFog(pname: GLenum; params: PGLint); external opengl32 name 'glFogiv';
  3079. procedure glFrontFace; external opengl32;
  3080. procedure glFrustum; external opengl32;
  3081. function  glGenLists; external opengl32;
  3082. procedure glGetBooleanv; external opengl32;
  3083. procedure glGetClipPlane; external opengl32;
  3084. procedure glGetDoublev; external opengl32;
  3085. function  glGetError: GLenum; external opengl32;
  3086. procedure glGetFloatv; external opengl32;
  3087. procedure glGetIntegerv; external opengl32;
  3088. procedure glGetLightfv; external opengl32;
  3089. procedure glGetLightiv; external opengl32;
  3090. procedure glGetLight(light: GLenum; pname: GLenum; params: PGLfloat); external opengl32 name 'glGetLightfv';
  3091. procedure glGetLight(light: GLenum; pname: GLenum; params: PGLint); external opengl32 name 'glGetLightiv';
  3092. procedure glGetMapdv; external opengl32;
  3093. procedure glGetMapfv; external opengl32;
  3094. procedure glGetMapiv; external opengl32;
  3095. procedure glGetMap(target: GLenum; query: GLenum; v: PGLdouble); external opengl32 name 'glGetMapdv';
  3096. procedure glGetMap(target: GLenum; query: GLenum; v: PGLfloat); external opengl32 name 'glGetMapfv';
  3097. procedure glGetMap(target: GLenum; query: GLenum; v: PGLint); external opengl32 name 'glGetMapiv';
  3098. procedure glGetMaterialfv; external opengl32;
  3099. procedure glGetMaterialiv; external opengl32;
  3100. procedure glGetMaterial(face: GLenum; pname: GLenum; params: PGLfloat); external opengl32 name 'glGetMaterialfv';
  3101. procedure glGetMaterial(face: GLenum; pname: GLenum; params: PGLint); external opengl32 name 'glGetMaterialiv';
  3102. procedure glGetPixelMapfv; external opengl32;
  3103. procedure glGetPixelMapuiv; external opengl32;
  3104. procedure glGetPixelMapusv; external opengl32;
  3105. procedure glGetPixelMap(map: GLenum; values: PGLfloat); external opengl32 name 'glGetPixelMapfv';
  3106. procedure glGetPixelMap(map: GLenum; values: PGLuint); external opengl32 name 'glGetPixelMapuiv';
  3107. procedure glGetPixelMap(map: GLenum; values: PGLushort); external opengl32 name 'glGetPixelMapusv';
  3108. procedure glGetPolygonStipple; external opengl32;
  3109. function  glGetString; external opengl32;
  3110. procedure glGetTexEnvfv; external opengl32;
  3111. procedure glGetTexEnviv; external opengl32;
  3112. procedure glGetTexEnv(target: GLenum; pname: GLenum; params: PGLfloat); external opengl32 name 'glGetTexEnvfv';
  3113. procedure glGetTexEnv(target: GLenum; pname: GLenum; params: PGLint); external opengl32 name 'glGetTexEnviv';
  3114. procedure glGetTexGendv; external opengl32;
  3115. procedure glGetTexGenfv; external opengl32;
  3116. procedure glGetTexGeniv; external opengl32;
  3117. procedure glGetTexGen(coord: GLenum; pname: GLenum; params: PGLdouble); external opengl32 name 'glGetTexGendv';
  3118. procedure glGetTexGen(coord: GLenum; pname: GLenum; params: PGLfloat); external opengl32 name 'glGetTexGenfv';
  3119. procedure glGetTexGen(coord: GLenum; pname: GLenum; params: PGLint); external opengl32 name 'glGetTexGeniv';
  3120. procedure glGetTexImage; external opengl32;
  3121. procedure glGetTexLevelParameterfv; external opengl32;
  3122. procedure glGetTexLevelParameteriv; external opengl32;
  3123. procedure glGetTexLevelParameter(target: GLenum; level: GLint; pname: GLenum; params: PGLfloat); external opengl32 name 'glGetTexLevelParameterfv';
  3124. procedure glGetTexLevelParameter(target: GLenum; level: GLint; pname: GLenum; params: PGLint); external opengl32 name 'glGetTexLevelParameteriv';
  3125. procedure glGetTexParameterfv; external opengl32;
  3126. procedure glGetTexParameteriv; external opengl32;
  3127. procedure glGetTexParameter(target, pname: GLenum; params: PGLfloat); external opengl32 name 'glGetTexParameterfv';
  3128. procedure glGetTexParameter(target, pname: GLenum; params: PGLint); external opengl32 name 'glGetTexParameteriv';
  3129. procedure glHint; external opengl32;
  3130. procedure glIndexMask; external opengl32;
  3131. procedure glIndexd; external opengl32;
  3132. procedure glIndexdv; external opengl32;
  3133. procedure glIndexf; external opengl32;
  3134. procedure glIndexfv; external opengl32;
  3135. procedure glIndexi; external opengl32;
  3136. procedure glIndexiv; external opengl32;
  3137. procedure glIndexs; external opengl32;
  3138. procedure glIndexsv; external opengl32;
  3139. procedure glIndex(c: GLdouble); external opengl32 name 'glIndexd';
  3140. procedure glIndex(c: PGLdouble); external opengl32 name 'glIndexdv';
  3141. procedure glIndex(c: GLfloat); external opengl32 name 'glIndexf';
  3142. procedure glIndex(c: PGLfloat); external opengl32 name 'glIndexfv';
  3143. procedure glIndex(c: GLint); external opengl32 name 'glIndexi';
  3144. procedure glIndex(c: PGLint); external opengl32 name 'glIndexiv';
  3145. procedure glIndex(c: GLshort); external opengl32 name 'glIndexs';
  3146. procedure glIndex(c: PGLshort); external opengl32 name 'glIndexsv';
  3147. procedure glInitNames; external opengl32;
  3148. function  glIsEnabled; external opengl32;
  3149. function  glIsList; external opengl32;
  3150. procedure glLightModelf; external opengl32;
  3151. procedure glLightModelfv; external opengl32;
  3152. procedure glLightModeli; external opengl32;
  3153. procedure glLightModeliv; external opengl32;
  3154. procedure glLightModel(pname: GLenum; param: GLfloat); external opengl32 name 'glLightModelf';
  3155. procedure glLightModel(pname: GLenum; params: PGLfloat); external opengl32 name 'glLightModelfv';
  3156. procedure glLightModel(pname: GLenum; param: GLint); external opengl32 name 'glLightModeli';
  3157. procedure glLightModel(pname: GLenum; params: PGLint); external opengl32 name 'glLightModeliv';
  3158. procedure glLightf; external opengl32;
  3159. procedure glLightfv; external opengl32;
  3160. procedure glLighti; external opengl32;
  3161. procedure glLightiv; external opengl32;
  3162. procedure glLight(light, pname: GLenum; param: GLfloat); external opengl32 name 'glLightf';
  3163. procedure glLight(light, pname: GLenum; params: PGLfloat); external opengl32 name 'glLightfv';
  3164. procedure glLight(light, pname: GLenum; param: GLint); external opengl32 name 'glLighti';
  3165. procedure glLight(light, pname: GLenum; params: PGLint); external opengl32 name 'glLightiv';
  3166. procedure glLineStipple; external opengl32;
  3167. procedure glLineWidth; external opengl32;
  3168. procedure glListBase; external opengl32;
  3169. procedure glLoadIdentity; external opengl32;
  3170. procedure glLoadMatrixd; external opengl32;
  3171. procedure glLoadMatrixf; external opengl32;
  3172. procedure glLoadMatrix(m: PGLdouble); external opengl32 name 'glLoadMatrixd';
  3173. procedure glLoadMatrix(m: PGLfloat); external opengl32 name 'glLoadMatrixf';
  3174. procedure glLoadName; external opengl32;
  3175. procedure glLogicOp; external opengl32;
  3176. procedure glMap1d; external opengl32;
  3177. procedure glMap1f; external opengl32;
  3178. procedure glMap2d; external opengl32;
  3179. procedure glMap2f; external opengl32;
  3180. procedure glMap(target: GLenum; u1,u2: GLdouble; stride, order: GLint;
  3181.   Points: PGLdouble); external opengl32 name 'glMap1d';
  3182. procedure glMap(target: GLenum; u1,u2: GLfloat; stride, order: GLint;
  3183.   Points: PGLfloat); external opengl32 name 'glMap1f';
  3184. procedure glMap(target: GLenum;
  3185.   u1,u2: GLdouble; ustride, uorder: GLint;
  3186.   v1,v2: GLdouble; vstride, vorder: GLint; Points: PGLdouble); external opengl32 name 'glMap2d';
  3187. procedure glMap(target: GLenum;
  3188.   u1,u2: GLfloat; ustride, uorder: GLint;
  3189.   v1,v2: GLfloat; vstride, vorder: GLint; Points: PGLfloat); external opengl32 name 'glMap2f';
  3190. procedure glMapGrid1d; external opengl32;
  3191. procedure glMapGrid1f; external opengl32;
  3192. procedure glMapGrid2d; external opengl32;
  3193. procedure glMapGrid2f; external opengl32;
  3194. procedure glMapGrid(un: GLint; u1, u2: GLdouble); external opengl32 name 'glMapGrid1d';
  3195. procedure glMapGrid(un: GLint; u1, u2: GLfloat); external opengl32 name 'glMapGrid1f';
  3196. procedure glMapGrid(un: GLint; u1, u2: GLdouble;
  3197.                     vn: GLint; v1, v2: GLdouble); external opengl32 name 'glMapGrid2d';
  3198. procedure glMapGrid(un: GLint; u1, u2: GLfloat;
  3199.                     vn: GLint; v1, v2: GLfloat); external opengl32 name 'glMapGrid2f';
  3200. procedure glMaterialf; external opengl32;
  3201. procedure glMaterialfv; external opengl32;
  3202. procedure glMateriali; external opengl32;
  3203. procedure glMaterialiv; external opengl32;
  3204. procedure glMaterial(face, pname: GLenum; param: GLfloat); external opengl32 name 'glMaterialf';
  3205. procedure glMaterial(face, pname: GLenum; params: PGLfloat); external opengl32 name 'glMaterialfv';
  3206. procedure glMaterial(face, pname: GLenum; param: GLint); external opengl32 name 'glMateriali';
  3207. procedure glMaterial(face, pname: GLenum; params: PGLint); external opengl32 name 'glMaterialiv';
  3208. procedure glMatrixMode; external opengl32;
  3209. procedure glMultMatrixd; external opengl32;
  3210. procedure glMultMatrixf; external opengl32;
  3211. procedure glMultMatrix(m: PGLdouble); external opengl32 name 'glMultMatrixd';
  3212. procedure glMultMatrix(m: PGLfloat); external opengl32 name 'glMultMatrixf';
  3213. procedure glNewList; external opengl32;
  3214. procedure glNormal3b; external opengl32;
  3215. procedure glNormal3bv; external opengl32;
  3216. procedure glNormal3d; external opengl32;
  3217. procedure glNormal3dv; external opengl32;
  3218. procedure glNormal3f; external opengl32;
  3219. procedure glNormal3fv; external opengl32;
  3220. procedure glNormal3i; external opengl32;
  3221. procedure glNormal3iv; external opengl32;
  3222. procedure glNormal3s; external opengl32;
  3223. procedure glNormal3sv; external opengl32;
  3224. procedure glNormal(nx, ny, nz: GLbyte); external opengl32 name 'glNormal3b';
  3225. procedure glNormal3(v: PGLbyte); external opengl32 name 'glNormal3bv';
  3226. procedure glNormal(nx, ny, nz: GLdouble); external opengl32 name 'glNormal3d';
  3227. procedure glNormal3(v: PGLdouble); external opengl32 name 'glNormal3dv';
  3228. procedure glNormal(nx, ny, nz: GLFloat); external opengl32 name 'glNormal3f';
  3229. procedure glNormal3(v: PGLfloat); external opengl32 name 'glNormal3fv';
  3230. procedure glNormal(nx, ny, nz: GLint); external opengl32 name 'glNormal3i';
  3231. procedure glNormal3(v: PGLint); external opengl32 name 'glNormal3iv';
  3232. procedure glNormal(nx, ny, nz: GLshort); external opengl32 name 'glNormal3s';
  3233. procedure glNormal3(v: PGLshort); external opengl32 name 'glNormal3sv';
  3234. procedure glOrtho; external opengl32;
  3235. procedure glPassThrough; external opengl32;
  3236. procedure glPixelMapfv; external opengl32;
  3237. procedure glPixelMapuiv; external opengl32;
  3238. procedure glPixelMapusv; external opengl32;
  3239. procedure glPixelMap(map: GLenum; mapsize: GLint; values: PGLfloat); external opengl32 name 'glPixelMapfv';
  3240. procedure glPixelMap(map: GLenum; mapsize: GLint; values: PGLuint); external opengl32 name 'glPixelMapuiv';
  3241. procedure glPixelMap(map: GLenum; mapsize: GLint; values: PGLushort); external opengl32 name 'glPixelMapusv';
  3242. procedure glPixelStoref; external opengl32;
  3243. procedure glPixelStorei; external opengl32;
  3244. procedure glPixelStore(pname: GLenum; param: GLfloat); external opengl32 name 'glPixelStoref';
  3245. procedure glPixelStore(pname: GLenum; param: GLint); external opengl32 name 'glPixelStorei';
  3246. procedure glPixelTransferf; external opengl32;
  3247. procedure glPixelTransferi; external opengl32;
  3248. procedure glPixelTransfer(pname: GLenum; param: GLfloat); external opengl32 name 'glPixelTransferf';
  3249. procedure glPixelTransfer(pname: GLenum; param: GLint); external opengl32 name 'glPixelTransferi';
  3250. procedure glPixelZoom; external opengl32;
  3251. procedure glPointSize; external opengl32;
  3252. procedure glPolygonMode; external opengl32;
  3253. procedure glPolygonStipple; external opengl32;
  3254. procedure glPopAttrib; external opengl32;
  3255. procedure glPopMatrix; external opengl32;
  3256. procedure glPopName; external opengl32;
  3257. procedure glPushAttrib; external opengl32;
  3258. procedure glPushMatrix; external opengl32;
  3259. procedure glPushName; external opengl32;
  3260. procedure glRasterPos2d; external opengl32;
  3261. procedure glRasterPos2dv; external opengl32;
  3262. procedure glRasterPos2f; external opengl32;
  3263. procedure glRasterPos2fv; external opengl32;
  3264. procedure glRasterPos2i; external opengl32;
  3265. procedure glRasterPos2iv; external opengl32;
  3266. procedure glRasterPos2s; external opengl32;
  3267. procedure glRasterPos2sv; external opengl32;
  3268. procedure glRasterPos3d; external opengl32;
  3269. procedure glRasterPos3dv; external opengl32;
  3270. procedure glRasterPos3f; external opengl32;
  3271. procedure glRasterPos3fv; external opengl32;
  3272. procedure glRasterPos3i; external opengl32;
  3273. procedure glRasterPos3iv; external opengl32;
  3274. procedure glRasterPos3s; external opengl32;
  3275. procedure glRasterPos3sv; external opengl32;
  3276. procedure glRasterPos4d; external opengl32;
  3277. procedure glRasterPos4dv; external opengl32;
  3278. procedure glRasterPos4f; external opengl32;
  3279. procedure glRasterPos4fv; external opengl32;
  3280. procedure glRasterPos4i; external opengl32;
  3281. procedure glRasterPos4iv; external opengl32;
  3282. procedure glRasterPos4s; external opengl32;
  3283. procedure glRasterPos4sv; external opengl32;
  3284. procedure glRasterPos(x,y: GLdouble); external opengl32 name 'glRasterPos2d';
  3285. procedure glRasterPos2(v: PGLdouble); external opengl32 name 'glRasterPos2dv';
  3286. procedure glRasterPos(x,y: GLfloat); external opengl32 name 'glRasterPos2f';
  3287. procedure glRasterPos2(v: PGLfloat); external opengl32 name 'glRasterPos2fv';
  3288. procedure glRasterPos(x,y: GLint); external opengl32 name 'glRasterPos2i';
  3289. procedure glRasterPos2(v: PGLint); external opengl32 name 'glRasterPos2iv';
  3290. procedure glRasterPos(x,y: GLshort); external opengl32 name 'glRasterPos2s';
  3291. procedure glRasterPos2(v: PGLshort); external opengl32 name 'glRasterPos2sv';
  3292. procedure glRasterPos(x,y,z: GLdouble); external opengl32 name 'glRasterPos3d';
  3293. procedure glRasterPos3(v: PGLdouble); external opengl32 name 'glRasterPos3dv';
  3294. procedure glRasterPos(x,y,z: GLfloat); external opengl32 name 'glRasterPos3f';
  3295. procedure glRasterPos3(v: PGLfloat); external opengl32 name 'glRasterPos3fv';
  3296. procedure glRasterPos(x,y,z: GLint); external opengl32 name 'glRasterPos3i';
  3297. procedure glRasterPos3(v: PGLint); external opengl32 name 'glRasterPos3iv';
  3298. procedure glRasterPos(x,y,z: GLshort); external opengl32 name 'glRasterPos3s';
  3299. procedure glRasterPos3(v: PGLshort); external opengl32 name 'glRasterPos3sv';
  3300. procedure glRasterPos(x,y,z,w: GLdouble); external opengl32 name 'glRasterPos4d';
  3301. procedure glRasterPos4(v: PGLdouble); external opengl32 name 'glRasterPos4dv';
  3302. procedure glRasterPos(x,y,z,w: GLfloat); external opengl32 name 'glRasterPos4f';
  3303. procedure glRasterPos4(v: PGLfloat); external opengl32 name 'glRasterPos4fv';
  3304. procedure glRasterPos(x,y,z,w: GLint); external opengl32 name 'glRasterPos4i';
  3305. procedure glRasterPos4(v: PGLint); external opengl32 name 'glRasterPos4iv';
  3306. procedure glRasterPos(x,y,z,w: GLshort); external opengl32 name 'glRasterPos4s';
  3307. procedure glRasterPos4(v: PGLshort); external opengl32 name 'glRasterPos4sv';
  3308. procedure glReadBuffer; external opengl32;
  3309. procedure glReadPixels; external opengl32;
  3310. procedure glRectd; external opengl32;
  3311. procedure glRectdv; external opengl32;
  3312. procedure glRectf; external opengl32;
  3313. procedure glRectfv; external opengl32;
  3314. procedure glRecti; external opengl32;
  3315. procedure glRectiv; external opengl32;
  3316. procedure glRects; external opengl32;
  3317. procedure glRectsv; external opengl32;
  3318. procedure glRect(x1, y1, x2, y2: GLdouble); external opengl32 name 'glRectd';
  3319. procedure glRect(v1, v2: PGLdouble); external opengl32 name 'glRectdv';
  3320. procedure glRect(x1, y1, x2, y2: GLfloat); external opengl32 name 'glRectf';
  3321. procedure glRect(v1, v2: PGLfloat); external opengl32 name 'glRectfv';
  3322. procedure glRect(x1, y1, x2, y2: GLint); external opengl32 name 'glRecti';
  3323. procedure glRect(v1, v2: PGLint); external opengl32 name 'glRectiv';
  3324. procedure glRect(x1, y1, x2, y2: GLshort); external opengl32 name 'glRects';
  3325. procedure glRect(v1, v2: PGLshort); external opengl32 name 'glRectsv';
  3326. function  glRenderMode; external opengl32;
  3327. procedure glRotated; external opengl32;
  3328. procedure glRotatef; external opengl32;
  3329. procedure glRotate(angle, x,y,z: GLdouble); external opengl32 name 'glRotated';
  3330. procedure glRotate(angle, x,y,z: GLfloat); external opengl32 name 'glRotatef';
  3331. procedure glScaled; external opengl32;
  3332. procedure glScalef; external opengl32;
  3333. procedure glScale(x,y,z: GLdouble); external opengl32 name 'glScaled';
  3334. procedure glScale(x,y,z: GLfloat); external opengl32 name 'glScalef';
  3335. procedure glScissor; external opengl32;
  3336. procedure glSelectBuffer; external opengl32;
  3337. procedure glShadeModel; external opengl32;
  3338. procedure glStencilFunc; external opengl32;
  3339. procedure glStencilMask; external opengl32;
  3340. procedure glStencilOp; external opengl32;
  3341. procedure glTexCoord1d; external opengl32;
  3342. procedure glTexCoord1dv; external opengl32;
  3343. procedure glTexCoord1f; external opengl32;
  3344. procedure glTexCoord1fv; external opengl32;
  3345. procedure glTexCoord1i; external opengl32;
  3346. procedure glTexCoord1iv; external opengl32;
  3347. procedure glTexCoord1s; external opengl32;
  3348. procedure glTexCoord1sv; external opengl32;
  3349. procedure glTexCoord2d; external opengl32;
  3350. procedure glTexCoord2dv; external opengl32;
  3351. procedure glTexCoord2f; external opengl32;
  3352. procedure glTexCoord2fv; external opengl32;
  3353. procedure glTexCoord2i; external opengl32;
  3354. procedure glTexCoord2iv; external opengl32;
  3355. procedure glTexCoord2s; external opengl32;
  3356. procedure glTexCoord2sv; external opengl32;
  3357. procedure glTexCoord3d; external opengl32;
  3358. procedure glTexCoord3dv; external opengl32;
  3359. procedure glTexCoord3f; external opengl32;
  3360. procedure glTexCoord3fv; external opengl32;
  3361. procedure glTexCoord3i; external opengl32;
  3362. procedure glTexCoord3iv; external opengl32;
  3363. procedure glTexCoord3s; external opengl32;
  3364. procedure glTexCoord3sv; external opengl32;
  3365. procedure glTexCoord4d; external opengl32;
  3366. procedure glTexCoord4dv; external opengl32;
  3367. procedure glTexCoord4f; external opengl32;
  3368. procedure glTexCoord4fv; external opengl32;
  3369. procedure glTexCoord4i; external opengl32;
  3370. procedure glTexCoord4iv; external opengl32;
  3371. procedure glTexCoord4s; external opengl32;
  3372. procedure glTexCoord4sv; external opengl32;
  3373. procedure glTexCoord(s: GLdouble); external opengl32 name 'glTexCoord1d';
  3374. procedure glTexCoord1(v: PGLdouble); external opengl32 name 'glTexCoord1dv';
  3375. procedure glTexCoord(s: GLfloat); external opengl32 name 'glTexCoord1f';
  3376. procedure glTexCoord1(v: PGLfloat); external opengl32 name 'glTexCoord1fv';
  3377. procedure glTexCoord(s: GLint); external opengl32 name 'glTexCoord1i';
  3378. procedure glTexCoord1(v: PGLint); external opengl32 name 'glTexCoord1iv';
  3379. procedure glTexCoord(s: GLshort); external opengl32 name 'glTexCoord1s';
  3380. procedure glTexCoord1(v: PGLshort); external opengl32 name 'glTexCoord1sv';
  3381. procedure glTexCoord(s,t: GLdouble); external opengl32 name 'glTexCoord2d';
  3382. procedure glTexCoord2(v: PGLdouble); external opengl32 name 'glTexCoord2dv';
  3383. procedure glTexCoord(s,t: GLfloat); external opengl32 name 'glTexCoord2f';
  3384. procedure glTexCoord2(v: PGLfloat); external opengl32 name 'glTexCoord2fv';
  3385. procedure glTexCoord(s,t: GLint); external opengl32 name 'glTexCoord2i';
  3386. procedure glTexCoord2(v: PGLint); external opengl32 name 'glTexCoord2iv';
  3387. procedure glTexCoord(s,t: GLshort); external opengl32 name 'glTexCoord2s';
  3388. procedure glTexCoord2(v: PGLshort); external opengl32 name 'glTexCoord2sv';
  3389. procedure glTexCoord(s,t,r: GLdouble); external opengl32 name 'glTexCoord3d';
  3390. procedure glTexCoord3(v: PGLdouble); external opengl32 name 'glTexCoord3dv';
  3391. procedure glTexCoord(s,t,r: GLfloat); external opengl32 name 'glTexCoord3f';
  3392. procedure glTexCoord3(v: PGLfloat); external opengl32 name 'glTexCoord3fv';
  3393. procedure glTexCoord(s,t,r: GLint); external opengl32 name 'glTexCoord3i';
  3394. procedure glTexCoord3(v: PGLint); external opengl32 name 'glTexCoord3iv';
  3395. procedure glTexCoord(s,t,r: GLshort); external opengl32 name 'glTexCoord3s';
  3396. procedure glTexCoord3(v: PGLshort); external opengl32 name 'glTexCoord3sv';
  3397. procedure glTexCoord(s,t,r,q: GLdouble); external opengl32 name 'glTexCoord4d';
  3398. procedure glTexCoord4(v: PGLdouble); external opengl32 name 'glTexCoord4dv';
  3399. procedure glTexCoord(s,t,r,q: GLfloat); external opengl32 name 'glTexCoord4f';
  3400. procedure glTexCoord4(v: PGLfloat); external opengl32 name 'glTexCoord4fv';
  3401. procedure glTexCoord(s,t,r,q: GLint); external opengl32 name 'glTexCoord4i';
  3402. procedure glTexCoord4(v: PGLint); external opengl32 name 'glTexCoord4iv';
  3403. procedure glTexCoord(s,t,r,q: GLshort); external opengl32 name 'glTexCoord4s';
  3404. procedure glTexCoord4(v: PGLshort); external opengl32 name 'glTexCoord4sv';
  3405. procedure glTexEnvf; external opengl32;
  3406. procedure glTexEnvfv; external opengl32;
  3407. procedure glTexEnvi; external opengl32;
  3408. procedure glTexEnviv; external opengl32;
  3409. procedure glTexEnv(target, pname: GLenum; param: GLfloat); external opengl32 name 'glTexEnvf';
  3410. procedure glTexEnv(target, pname: GLenum; params: PGLfloat); external opengl32 name 'glTexEnvfv';
  3411. procedure glTexEnv(target, pname: GLenum; param: GLint); external opengl32 name 'glTexEnvi';
  3412. procedure glTexEnv(target, pname: GLenum; params: PGLint); external opengl32 name 'glTexEnviv';
  3413. procedure glTexGend; external opengl32;
  3414. procedure glTexGendv; external opengl32;
  3415. procedure glTexGenf; external opengl32;
  3416. procedure glTexGenfv; external opengl32;
  3417. procedure glTexGeni; external opengl32;
  3418. procedure glTexGeniv; external opengl32;
  3419. procedure glTexGen(coord, pname: GLenum; param: GLdouble); external opengl32 name 'glTexGend';
  3420. procedure glTexGen(coord, pname: GLenum; params: PGLdouble); external opengl32 name 'glTexGendv';
  3421. procedure glTexGen(coord, pname: GLenum; param: GLfloat); external opengl32 name 'glTexGenf';
  3422. procedure glTexGen(coord, pname: GLenum; params: PGLfloat); external opengl32 name 'glTexGenfv';
  3423. procedure glTexGen(coord, pname: GLenum; param: GLint); external opengl32 name 'glTexGeni';
  3424. procedure glTexGen(coord, pname: GLenum; params: PGLint); external opengl32 name 'glTexGeniv';
  3425. procedure glTexImage1D; external opengl32;
  3426. procedure glTexImage2D; external opengl32;
  3427. procedure glTexParameterf; external opengl32;
  3428. procedure glTexParameterfv; external opengl32;
  3429. procedure glTexParameteri; external opengl32;
  3430. procedure glTexParameteriv; external opengl32;
  3431. procedure glTexParameter(target, pname: GLenum; param: GLfloat); external opengl32 name 'glTexParameterf';
  3432. procedure glTexParameter(target, pname: GLenum; params: PGLfloat); external opengl32 name 'glTexParameterfv';
  3433. procedure glTexParameter(target, pname: GLenum; param: GLint); external opengl32 name 'glTexParameteri';
  3434. procedure glTexParameter(target, pname: GLenum; params: PGLint); external opengl32 name 'glTexParameteriv';
  3435. procedure glTranslated; external opengl32;
  3436. procedure glTranslatef; external opengl32;
  3437. procedure glTranslate(x,y,z: GLdouble); external opengl32 name 'glTranslated';
  3438. procedure glTranslate(x,y,z: GLfloat); external opengl32 name 'glTranslatef';
  3439. procedure glVertex2d; external opengl32;
  3440. procedure glVertex2dv; external opengl32;
  3441. procedure glVertex2f; external opengl32;
  3442. procedure glVertex2fv; external opengl32;
  3443. procedure glVertex2i; external opengl32;
  3444. procedure glVertex2iv; external opengl32;
  3445. procedure glVertex2s; external opengl32;
  3446. procedure glVertex2sv; external opengl32;
  3447. procedure glVertex3d; external opengl32;
  3448. procedure glVertex3dv; external opengl32;
  3449. procedure glVertex3f; external opengl32;
  3450. procedure glVertex3fv; external opengl32;
  3451. procedure glVertex3i; external opengl32;
  3452. procedure glVertex3iv; external opengl32;
  3453. procedure glVertex3s; external opengl32;
  3454. procedure glVertex3sv; external opengl32;
  3455. procedure glVertex4d; external opengl32;
  3456. procedure glVertex4dv; external opengl32;
  3457. procedure glVertex4f; external opengl32;
  3458. procedure glVertex4fv; external opengl32;
  3459. procedure glVertex4i; external opengl32;
  3460. procedure glVertex4iv; external opengl32;
  3461. procedure glVertex4s; external opengl32;
  3462. procedure glVertex4sv; external opengl32;
  3463. procedure glVertex(x,y: GLdouble); external opengl32 name 'glVertex2d';
  3464. procedure glVertex2(v: PGLdouble); external opengl32 name 'glVertex2dv';
  3465. procedure glVertex(x,y: GLfloat); external opengl32 name 'glVertex2f';
  3466. procedure glVertex2(v: PGLfloat); external opengl32 name 'glVertex2fv';
  3467. procedure glVertex(x,y: GLint); external opengl32 name 'glVertex2i';
  3468. procedure glVertex2(v: PGLint); external opengl32 name 'glVertex2iv';
  3469. procedure glVertex(x,y: GLshort); external opengl32 name 'glVertex2s';
  3470. procedure glVertex2(v: PGLshort); external opengl32 name 'glVertex2sv';
  3471. procedure glVertex(x,y,z: GLdouble); external opengl32 name 'glVertex3d';
  3472. procedure glVertex3(v: PGLdouble); external opengl32 name 'glVertex3dv';
  3473. procedure glVertex(x,y,z: GLfloat); external opengl32 name 'glVertex3f';
  3474. procedure glVertex3(v: PGLfloat); external opengl32 name 'glVertex3fv';
  3475. procedure glVertex(x,y,z: GLint); external opengl32 name 'glVertex3i';
  3476. procedure glVertex3(v: PGLint); external opengl32 name 'glVertex3iv';
  3477. procedure glVertex(x,y,z: GLshort); external opengl32 name 'glVertex3s';
  3478. procedure glVertex3(v: PGLshort); external opengl32 name 'glVertex3sv';
  3479. procedure glVertex(x,y,z,w: GLdouble); external opengl32 name 'glVertex4d';
  3480. procedure glVertex4(v: PGLdouble); external opengl32 name 'glVertex4dv';
  3481. procedure glVertex(x,y,z,w: GLfloat); external opengl32 name 'glVertex4f';
  3482. procedure glVertex4(v: PGLfloat); external opengl32 name 'glVertex4fv';
  3483. procedure glVertex(x,y,z,w: GLint); external opengl32 name 'glVertex4i';
  3484. procedure glVertex4(v: PGLint); external opengl32 name 'glVertex4iv';
  3485. procedure glVertex(x,y,z,w: GLshort); external opengl32 name 'glVertex4s';
  3486. procedure glVertex4(v: PGLshort); external opengl32 name 'glVertex4sv';
  3487. procedure glViewport; external opengl32;
  3488.  
  3489. function wglGetProcAddress;    external opengl32;
  3490.  
  3491. { OpenGL Utility routines (glu.h) =======================================}
  3492.  
  3493. function gluErrorString;                     external glu32;
  3494. function gluErrorUnicodeStringEXT;           external glu32;
  3495. function gluGetString;                       external glu32;
  3496. procedure gluLookAt;                         external glu32;
  3497. procedure gluOrtho2D;                        external glu32;
  3498. procedure gluPerspective;                    external glu32;
  3499. procedure gluPickMatrix;                     external glu32;
  3500. function  gluProject;                        external glu32;
  3501. function  gluUnProject;                      external glu32;
  3502. function  gluScaleImage;                     external glu32;
  3503. function  gluBuild1DMipmaps;                 external glu32;
  3504. function  gluBuild2DMipmaps;                 external glu32;
  3505. function  gluNewQuadric;                     external glu32;
  3506. procedure gluDeleteQuadric;                  external glu32;
  3507. procedure gluQuadricNormals;                 external glu32;
  3508. procedure gluQuadricTexture;                 external glu32;
  3509. procedure gluQuadricOrientation;             external glu32;
  3510. procedure gluQuadricDrawStyle;               external glu32;
  3511. procedure gluCylinder;                       external glu32;
  3512. procedure gluDisk;                           external glu32;
  3513. procedure gluPartialDisk;                    external glu32;
  3514. procedure gluSphere;                         external glu32;
  3515. procedure gluQuadricCallback;                external glu32;
  3516.  
  3517. function gluNewTess                         ;external glu32;
  3518. procedure gluDeleteTess                     ;external glu32;
  3519. procedure gluTessBeginPolygon               ;external glu32;
  3520. procedure gluTessBeginContour               ;external glu32;
  3521. procedure gluTessVertex                     ;external glu32;
  3522. procedure gluTessEndContour                 ;external glu32;
  3523. procedure gluTessEndPolygon                 ;external glu32;
  3524. procedure gluTessProperty                   ;external glu32;
  3525. procedure gluTessNormal                     ;external glu32;
  3526. procedure gluTessCallback                   ;external glu32;
  3527.  
  3528. function gluNewNurbsRenderer                ;external glu32;
  3529. procedure gluDeleteNurbsRenderer            ;external glu32;
  3530. procedure gluBeginSurface                   ;external glu32;
  3531. procedure gluBeginCurve                     ;external glu32;
  3532. procedure gluEndCurve                       ;external glu32;
  3533. procedure gluEndSurface                     ;external glu32;
  3534. procedure gluBeginTrim                      ;external glu32;
  3535. procedure gluEndTrim                        ;external glu32;
  3536. procedure gluPwlCurve                       ;external glu32;
  3537. procedure gluNurbsCurve                     ;external glu32;
  3538. procedure gluNurbsSurface                   ;external glu32;
  3539. procedure gluLoadSamplingMatrices           ;external glu32;
  3540. procedure gluNurbsProperty                  ;external glu32;
  3541. procedure gluGetNurbsProperty               ;external glu32;
  3542. procedure gluNurbsCallback                  ;external glu32;
  3543.  
  3544.  
  3545. begin
  3546.   Set8087CW($133F);
  3547. end.
  3548.