i localisated the problem but cant figure it

when i create a opengl texture with Gentexture then i cant see everything

[pascal]
procedure TGLBMP.GenTexture();
begin
if Assigned(rgbBits) then begin
// If a texture object has already been created, delete it
if TextureID > 0 then
glDeleteTextures(1, TextureID);

// Create a new OpenGL texture object
glGenTextures(1, TextureID);
glBindTexture(GL_TEXTURE_2D, TextureID);

// Set up parameters
glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, texWrapS);
glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, texWrapT);
glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MAG_FILTER, magFilter);
glTexParameteri(GL_TEXTURE_2D, GL_TEXTURE_MIN_FILTER, minFilter);

if (iFormat = RGB) then
gluBuild2DMipmaps(GL_TEXTURE_2D, GL_RGBA, Width, Height, GL_RGBA, GL_UNSIGNED_BYTE, PByte(rgbBits))
else
gluBuild2DMipmaps(GL_TEXTURE_2D, GL_RGBA, Width, Height, GL_BGRA, GL_UNSIGNED_BYTE, PByte(rgbBits))
end;
end;
[/pascal]

[pascal]
procedure Render;
begin
glMatrixMode(GL_MODELVIEW);
glClear(GL_COLOR_BUFFER_BIT or GL_DEPTH_BUFFER_BIT);
glLoadidentity;

gltranslatef(0,0,-6);

//textur.Bind;
glbegin(gl_quads);
glTexCoord2f(0.0, 0.0);
glvertex3f(-1,1,-2);
glTexCoord2f(1.0, 0.0);
glvertex3f(-1,0,-2);
glTexCoord2f(1.0, -1.0);
glvertex3f(0,0,-2);
glTexCoord2f(0.0, -1.0);
glvertex3f(0,1,-2);
glend;

SwapBuffers( DC);
end;
[/pascal]