hedgewars/uStore.pas
changeset 2701 3a8560c00f78
parent 2699 249adefa9c1c
child 2705 2b5625c4ec16
equal deleted inserted replaced
2700:726e4a230b48 2701:3a8560c00f78
  1106 
  1106 
  1107 	glGetIntegerv(GL_MAX_TEXTURE_SIZE, @MaxTextureSize);
  1107 	glGetIntegerv(GL_MAX_TEXTURE_SIZE, @MaxTextureSize);
  1108 
  1108 
  1109 	vendor:= LowerCase(string(pchar(glGetString(GL_VENDOR))));
  1109 	vendor:= LowerCase(string(pchar(glGetString(GL_VENDOR))));
  1110 {$IFDEF DEBUGFILE}
  1110 {$IFDEF DEBUGFILE}
  1111 	AddFileLog('OpenGL - Renderer: ' + string(pchar(glGetString(GL_RENDERER))));
  1111 	AddFileLog('OpenGL-- Renderer: ' + string(pchar(glGetString(GL_RENDERER))));
  1112 	AddFileLog('  |----- Vendor: ' + vendor);
  1112 	AddFileLog('  |----- Vendor: ' + vendor);
  1113 	AddFileLog('  |----- Version: ' + string(pchar(glGetString(GL_VERSION))));
  1113 	AddFileLog('  |----- Version: ' + string(pchar(glGetString(GL_VERSION))));
  1114 	AddFileLog('  \----- GL_MAX_TEXTURE_SIZE: ' + inttostr(MaxTextureSize));
  1114 	AddFileLog('  \----- GL_MAX_TEXTURE_SIZE: ' + inttostr(MaxTextureSize));
  1115 {$ENDIF}
  1115 {$ENDIF}
  1116 
  1116