const float HexWidth =  2 ; // любое положительное число
const float HexAverHeight = sqrt( 0 . 75 ) * HexWidth;
const float HexY1 = sqrt( 3 ) * HexWidth /  6 ;
const float HexY2 = sqrt( 3 ) * HexWidth /  3 ;

// IM = immediate mode
void PaintHexGrid_OGL_IM(float MinX, float MaxX, float MinY, float MaxY) {
  assert(wglGetCurrentContext() != NULL);
  assert(MinX < MaxX);
  assert(MinY < MaxY);
  { // рисуем вертикальные отрезки чётных рядов
    int n1 = (int)ceil(MinX / HexWidth -  0 . 5 );
    int n2 = (int)floor(MaxX / HexWidth -  0 . 5 );
    int m1 = (int)ceil(((MinY - HexY1) / HexAverHeight) /  2 );
    int m2 = (int)floor(((MaxY + HexY1) / HexAverHeight) /  2 );
    glBegin(GL_LINES);
    for (int n = n1; n <= n2; n++) {
      float x = (n +  0 . 5 ) * HexWidth;
      for (int m = m1; m <= m2; m++) {
        int Row =  2  * m; // чётный ряд
        glVertex2f(x, Row * HexAverHeight - HexY1);
        glVertex2f(x, Row * HexAverHeight + HexY1);
      }
    }
    glEnd();
  }
  { // рисуем вертикальные отрезки нечётных рядов
    int n1 = (int)ceil(MinX / HexWidth);
    int n2 = (int)floor(MaxX / HexWidth);
    int m1 = (int)ceil(((MinY - HexY1) / HexAverHeight -  1 ) /  2 );
    int m2 = (int)floor(((MaxY + HexY1) / HexAverHeight -  1 ) /  2 );
    glBegin(GL_LINES);
    for (int n = n1; n <= n2; n++) {
      float x = n * HexWidth;
      for (int m = m1; m <= m2; m++) {
        int Row =  2  * m +  1 ; // нечётный ряд
        glVertex2f(x, Row * HexAverHeight - HexY1);
        glVertex2f(x, Row * HexAverHeight + HexY1);
      }
    }
    glEnd();
  }
  { // рисуем ломаные линии, разграничивающие ряды
    int m1 = (int)ceil((MinY - HexY2) / HexAverHeight);
    int m2 = (int)floor((MaxY - HexY1) / HexAverHeight);
    int n1 = (int)floor(MinX / (HexWidth /  2 ));
    int n2 = (int)ceil(MaxX / (HexWidth /  2 ));
    assert(n1 < n2);
    for (int m = m1; m <= m2; m++) {
      float y1 = m * HexAverHeight + HexY1;
      float y2 = m * HexAverHeight + HexY2;
      if (m %  2  ==  0 ) {
        glBegin(GL_LINE_STRIP);
        for (int n = n1; n <= n2; n++) {
          glVertex2f(n * (HexWidth /  2 ), (n %  2  ==  0 ) ? y2 : y1);
        }
        glEnd();
      } else {
        glBegin(GL_LINE_STRIP);
        for (int n = n1; n <= n2; n++) {
          glVertex2f(n * (HexWidth /  2 ), (n %  2  ==  0 ) ? y1 : y2);
        }
        glEnd();
      }
    }
  }
}

IDirect3DDevice9* _Device = NULL;
...
IDirect3DVertexBuffer9* _HexGridVertBuf = NULL;
int _HexGridStartPos;

// DVB = dynamic vertex buffer
void PaintHexGrid_D3D9_DVB(float MinX, float MaxX, float MinY, float MaxY) {
  assert(_Device != NULL);
  assert(MinX < MaxX);
  assert(MinY < MaxY);

  struct Vert {
    float x, y, z;
    void Set(float x_, float y_) { x = x_; y = y_; z =  0 ; }
  };
  const unsigned VertFormat = D3DFVF_XYZ;

  // создаём динамический vertex buffer
  const int VertBufLen =  100 ; // от балды, см. выше
  HRESULT hr;
  if (_HexGridVertBuf == NULL) {
    hr = _Device->CreateVertexBuffer(
      VertBufLen * sizeof(Vert),
      D3DUSAGE_DYNAMIC | D3DUSAGE_WRITEONLY,
      VertFormat,
      D3DPOOL_DEFAULT,
      &_HexGridVertBuf,
      NULL);
    _HexGridStartPos =  0 ;
  }

  hr = _Device->SetFVF(VertFormat);
  hr = _Device->SetStreamSource( 0 , _HexGridVertBuf,  0 , sizeof(Vert));
  { // рисуем вертикальные отрезки чётных рядов
    int n1 = (int)ceil(MinX / HexWidth -  0 . 5 );
    int n2 = (int)floor(MaxX / HexWidth -  0 . 5 );
    int m1 = (int)ceil(((MinY - HexY1) / HexAverHeight) /  2 );
    int m2 = (int)floor(((MaxY + HexY1) / HexAverHeight) /  2 );
    void* Verts_;
    hr = _HexGridVertBuf->Lock( 0 ,  0 , &Verts_, D3DLOCK_NOOVERWRITE);
    Vert* Verts = static_cast<Vert*>(Verts_);
    int Pos = _HexGridStartPos;
    for (int n = n1; n <= n2; n++) {
      float x = (n +  0 . 5 ) * HexWidth;
      for (int m = m1; m <= m2; m++) {
        int Row =  2  * m; // чётный ряд
        if (Pos +  2  <= VertBufLen) {
          // ещё две вершины влезут в vertex buffer
        } else {
          hr = _HexGridVertBuf->Unlock();
          int NumLines = (Pos - _HexGridStartPos) /  2 ;
          if (NumLines >  0 ) {
            hr = _Device->DrawPrimitive(D3DPT_LINELIST, _HexGridStartPos, NumLines);
          }
          hr = _HexGridVertBuf->Lock( 0 ,  0 , &Verts_, D3DLOCK_DISCARD);
          Verts = static_cast<Vert*>(Verts_);
          Pos = _HexGridStartPos =  0 ;
        }
        // записываем две вершины в vertex buffer
        Verts[Pos++].Set(x, Row * HexAverHeight - HexY1);
        Verts[Pos++].Set(x, Row * HexAverHeight + HexY1);
      }
    }
    hr = _HexGridVertBuf->Unlock();
    int NumLines = (Pos - _HexGridStartPos) /  2 ;
    if (NumLines >  0 ) {
      hr = _Device->DrawPrimitive(D3DPT_LINELIST, _HexGridStartPos, NumLines);
    }
    _HexGridStartPos = Pos;
  }
  { // рисуем вертикальные отрезки нечётных рядов
    int n1 = (int)ceil(MinX / HexWidth);
    int n2 = (int)floor(MaxX / HexWidth);
    int m1 = (int)ceil(((MinY - HexY1) / HexAverHeight -  1 ) /  2 );
    int m2 = (int)floor(((MaxY + HexY1) / HexAverHeight -  1 ) /  2 );
    void* Verts_;
    hr = _HexGridVertBuf->Lock( 0 ,  0 , &Verts_, D3DLOCK_NOOVERWRITE);
    Vert* Verts = static_cast<Vert*>(Verts_);
    int Pos = _HexGridStartPos;
    for (int n = n1; n <= n2; n++) {
      float x = n * HexWidth;
      for (int m = m1; m <= m2; m++) {
        int Row =  2  * m +  1 ; // нечётный ряд
        if (Pos +  2  <= VertBufLen) {
          // ещё две вершины влезут в vertex buffer
        } else {
          hr = _HexGridVertBuf->Unlock();
          int NumLines = (Pos - _HexGridStartPos) /  2 ;
          if (NumLines >  0 ) {
            hr = _Device->DrawPrimitive(D3DPT_LINELIST, _HexGridStartPos, NumLines);
          }
          hr = _HexGridVertBuf->Lock( 0 ,  0 , &Verts_, D3DLOCK_DISCARD);
          Verts = static_cast<Vert*>(Verts_);
          Pos = _HexGridStartPos =  0 ;
        }
        // записываем две вершины в vertex buffer
        Verts[Pos++].Set(x, Row * HexAverHeight - HexY1);
        Verts[Pos++].Set(x, Row * HexAverHeight + HexY1);
      }
    }
    hr = _HexGridVertBuf->Unlock();
    int NumLines = (Pos - _HexGridStartPos) /  2 ;
    if (NumLines >  0 ) {
      hr = _Device->DrawPrimitive(D3DPT_LINELIST, _HexGridStartPos, NumLines);
    }
    _HexGridStartPos = Pos;
  }
  { // рисуем ломаные линии, разграничивающие ряды
    int m1 = (int)ceil((MinY - HexY2) / HexAverHeight);
    int m2 = (int)floor((MaxY - HexY1) / HexAverHeight);
    int n1 = (int)floor(MinX / (HexWidth /  2 ));
    int n2 = (int)ceil(MaxX / (HexWidth /  2 ));
    assert(n1 < n2);
    for (int m = m1; m <= m2; m++) {
      float y1 = m * HexAverHeight + HexY1;
      float y2 = m * HexAverHeight + HexY2;
      if (m %  2  ==  0 ) {
        void* Verts_;
        hr = _HexGridVertBuf->Lock( 0 ,  0 , &Verts_, D3DLOCK_NOOVERWRITE);
        Vert* Verts = static_cast<Vert*>(Verts_);
        int Pos = _HexGridStartPos;
        Vert LastVert;
        bool HasLastVert = false;
        for (int n = n1; n <= n2; n++) {
          if (Pos < VertBufLen) {
            // ещё одна вершина влезет в vertex buffer
          } else {
            assert(Pos == VertBufLen);
            hr = _HexGridVertBuf->Unlock();
            int NumLines = Pos - _HexGridStartPos -  1 ;
            if (NumLines >  0 ) {
              hr = _Device->DrawPrimitive(D3DPT_LINESTRIP, _HexGridStartPos, NumLines);
            }
            hr = _HexGridVertBuf->Lock( 0 ,  0 , &Verts_, D3DLOCK_DISCARD);
            Verts = static_cast<Vert*>(Verts_);
            Pos = _HexGridStartPos =  0 ;
            if (HasLastVert) Verts[Pos++] = LastVert;
          }
          LastVert.Set(n * (HexWidth /  2 ), (n %  2  ==  0 ) ? y2 : y1);
          Verts[Pos++] = LastVert;
          HasLastVert = true;
        }
        hr = _HexGridVertBuf->Unlock();
        int NumLines = Pos - _HexGridStartPos -  1 ;
        if (NumLines >  0 ) {
          hr = _Device->DrawPrimitive(D3DPT_LINESTRIP, _HexGridStartPos, NumLines);
        }
        _HexGridStartPos = Pos;
      } else {
        void* Verts_;
        hr = _HexGridVertBuf->Lock( 0 ,  0 , &Verts_, D3DLOCK_NOOVERWRITE);
        Vert* Verts = static_cast<Vert*>(Verts_);
        int Pos = _HexGridStartPos;
        Vert LastVert;
        bool HasLastVert = false;
        for (int n = n1; n <= n2; n++) {
          if (Pos < VertBufLen) {
            // ещё одна вершина влезет в vertex buffer
          } else {
            assert(Pos == VertBufLen);
            hr = _HexGridVertBuf->Unlock();
            int NumLines = Pos - _HexGridStartPos -  1 ;
            if (NumLines >  0 ) {
              hr = _Device->DrawPrimitive(D3DPT_LINESTRIP, _HexGridStartPos, NumLines);
            }
            hr = _HexGridVertBuf->Lock( 0 ,  0 , &Verts_, D3DLOCK_DISCARD);
            Verts = static_cast<Vert*>(Verts_);
            Pos = _HexGridStartPos =  0 ;
            if (HasLastVert) Verts[Pos++] = LastVert;
          }
          LastVert.Set(n * (HexWidth /  2 ), (n %  2  ==  0 ) ? y1 : y2);
          Verts[Pos++] = LastVert;
          HasLastVert = true;
        }
        hr = _HexGridVertBuf->Unlock();
        int NumLines = Pos - _HexGridStartPos -  1 ;
        if (NumLines >  0 ) {
          hr = _Device->DrawPrimitive(D3DPT_LINESTRIP, _HexGridStartPos, NumLines);
        }
        _HexGridStartPos = Pos;
      }
    }
  }
  hr = _Device->SetStreamSource( 0 , NULL,  0 ,  0 );
}

// освобождает D3DPOOL_DEFAULT-ресурсы
// надо вызывать перед Reset-ом и в конце работы
void ReleaseDefResources() {
  ...
  if (_HexGridVertBuf != NULL) {
    _HexGridVertBuf->Release();
    _HexGridVertBuf = NULL;
  }
  // или можно в одну строчку:
  // SAFE_RELEASE(_HexGridVertBuf)
  ...
}

void CALLBACK OnLostDevice( void* pUserContext )
{
    g_DialogResourceManager.OnD3D9LostDevice();
    g_SettingsDlg.OnD3D9LostDevice();
    if( g_pFont )
        g_pFont->OnLostDevice();
    if( g_pFontSmall )
        g_pFontSmall->OnLostDevice();
    if( g_pEffect )
        g_pEffect->OnLostDevice();
    SAFE_RELEASE( g_pTextSprite );

    SAFE_RELEASE( g_pDSShadow );
    SAFE_RELEASE( g_pShadowMap );
    SAFE_RELEASE( g_pTexDef );

    for( int i =  0 ; i < NUM_OBJ; ++i )
        g_Obj[i].m_Mesh.InvalidateDeviceObjects();
    g_LightMesh.InvalidateDeviceObjects();
}

glEnable(GL_BLEND);
glBlendFunc(GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA);

hr = _Device->SetRenderState(D3DRS_ALPHABLENDENABLE, TRUE);
hr = _Device->SetRenderState(D3DRS_SRCBLEND, D3DBLEND_SRCALPHA);
hr = _Device->SetRenderState(D3DRS_DESTBLEND, D3DBLEND_INVSRCALPHA);

hr = _Device->SetRenderState(D3DRENDERSTATE_ALPHABLENDENABLE, TRUE);
hr = _Device->SetRenderState(D3DRENDERSTATE_SRCBLEND, D3DBLEND_SRCALPHA);
hr = _Device->SetRenderState(D3DRENDERSTATE_DESTBLEND, D3DBLEND_INVSRCALPHA);

// можно так:
glDeleteBuffers( 1 , &VertBufId);
glDeleteTextures( 1 , &TexId);

// а можно в другом порядке:
glDeleteTextures( 1 , &TexId);
glDeleteBuffers( 1 , &VertBufId);

class Texture {
  GLuint _TexId;
  ...
public:
  Texture() {
    _TexId =  0 ;
  }

  void Init(...) {
    assert(wglGetCurrentContext() != NULL);
    assert(_TexId ==  0 );
    glGenTextures( 1 , &_TexId);
    glBindTexture(GL_TEXTURE_2D, _TexId);
    ...
    glBindTexture(GL_TEXTURE_2D,  0 );
  }

  void Term() {
    assert(wglGetCurrentContext() != NULL);
    if (_TexId !=  0 ) {
      glDeleteTextures( 1 , &_TexId);
      _TexId =  0 ;
    }
  }
  ...
};

class Texture {
  IDirect3DTexture9* _Tex;
  ...
public:
  Texture() {
    _Tex = NULL;
  }

  void Init(...) {
    assert(_Device != NULL);
    assert(_Tex == NULL);
    HRESULT hr = _Device->CreateTexture(..., &_Tex, ...);
    ...
  }

  void Term() {
    if (_Tex != NULL) {
      _Tex->Release();
      _Tex = NULL;
    }
    // или можно в одну строчку:
    // SAFE_RELEASE(_Tex)
  }
  ...
};

// создаём текстуру
glGenTextures( 1 , &TexId);
glBindTexture(GL_TEXTURE_2D, TexId);
...
glBindTexture(GL_TEXTURE_2D,  0 );

glEnable(GL_TEXTURE_2D);
for (...) {
  GLuint TexId = ...;
  // привязываем (bind) текстуру
  glBindTexture(GL_TEXTURE_2D, TexId);
  // рисуем что-нибудь
  ...
}
glBindTexture(GL_TEXTURE_2D,  0 );
glDisable(GL_TEXTURE_2D);

class Texture {
  GLuint _TexId;
  ...
public:
  Texture() {
    _TexId =  0 ;
  }

  void Init(...) {
    assert(wglGetCurrentContext() != NULL);
    assert(_TexId ==  0 );
    glGenTextures( 1 , &_TexId);
    glBindTexture(GL_TEXTURE_2D, _TexId);
    ...
    glBindTexture(GL_TEXTURE_2D,  0 );
  }

  void Term() {
    assert(wglGetCurrentContext() != NULL);
    if (_TexId !=  0 ) {
      glDeleteTextures( 1 , &_TexId);
      _TexId =  0 ;
    }
  }
  ...
};

class Texture {
  IDirect3DTexture9* _Tex;
  ...
public:
  Texture() {
    _Tex = NULL;
  }

  void Init(...) {
    assert(_Device != NULL);
    assert(_Tex == NULL);
    HRESULT hr = _Device->CreateTexture(..., &_Tex, ...);
    ...
  }

  void Term() {
    if (_Tex != NULL) {
      _Tex->Release();
      _Tex = NULL;
    }
    // или можно в одну строчку:
    // SAFE_RELEASE(_Tex)
  }
  ...
};

inline int GetOGLInt(GLenum Id) {
  assert(wglGetCurrentContext() != NULL);
  GLint Res;
  glGetIntegerv(Id, &Res);
  return Res;
}

class Texture {
  GLuint _TexId;
  ...
public:
  Texture() {
    _TexId =  0 ;
  }

  void Init(...) {
    assert(GetOGLInt(GL_TEXTURE_BINDING_2D) ==  0 );
    assert(_TexId ==  0 );
    glGenTextures( 1 , &_TexId);
    glBindTexture(GL_TEXTURE_2D, _TexId);
    ...
    glBindTexture(GL_TEXTURE_2D,  0 );
  }

  void Term() {
    assert(GetOGLInt(GL_TEXTURE_BINDING_2D) ==  0 );
    if (_TexId !=  0 ) {
      glDeleteTextures( 1 , &_TexId);
      _TexId =  0 ;
    }
  }
  ...
};

// меняем состояние глобального объекта (OpenGL-контекст)
glBindTexture(GL_TEXTURE_2D, TexId);

// меняем состояние глобального объекта (Direct3D device)
hr = _Device->SetTexture( 0 , Tex);

hr = _Device->SetTexture( 0 , Tex);
Tex->Release();

HANDLE hFile = CreateFile("data.bin", GENERIC_WRITE, ..., CREATE_ALWAYS, ...);
const int BufLen =  4096 ;
Byte Buf[BufLen];
int Pos =  0 ;
for (...) {
  for (...) {
    if (Pos < BufLen) {
      // ещё один байт влезет в буфер
    } else {
      assert(Pos == BufLen);
      DWORD n;
      WriteFile(hFile, Buf, Pos, &n, NULL);
      Pos =  0 ;
    }
    // записываем байт в буфер
    Buf[Pos++] = ...;
  }
}
if (Pos !=  0 ) {
  DWORD n;
  WriteFile(hFile, Buf, Pos, &n, NULL);
}
CloseHandle(hFile);

FILE* File = fopen("data.bin", "wb");
for (...) {
  for (...) {
    // записываем байт в файл
    fputc(..., File);
  }
}
fclose(File);

SDL_GL_SetAttribute(SDL_GL_MULTISAMPLEBUFFERS,  1 );
SDL_GL_SetAttribute(SDL_GL_MULTISAMPLESAMPLES,  16 );

...
// !вот эти три строчки - включение альфы!
DestBlend = InvSrcAlpha;
SrcBlend = SrcAlpha;
AlphaBlendEnable = true;
...

device->DrawIndexedPrimitive(D3DPT_LINELIST ,  0 ,  0 , iVertexCount,  0 , iLinesCount);

hr = _Device->SetTexture( 0 , Tex);
Tex->Release();

assert(GetOGLInt(GL_TEXTURE_BINDING_2D) ==  0 );

VERIFY( _Tex->Release() ==  0 )

HBRUSH hRedBrush = CreateSolidBrush(RGB( 255 ,  0 ,  0 ));
SelectObject(hDC, hRedBrush);
DeleteObject(hRedBrush); // ошибка