keep flags as integer

here is the code i use in my engine

[pascal]
// commom flags
flags := SDL_OPENGL or SDL_HWPALETTE or SDL_DOUBLEBUF;

// check if have gpu
if videoinfo.hw_available <> 0 then
flags := flags or SDL_HWSURFACE
else
flags := flags or SDL_SWSURFACE;

// check for hwbliting
if videoinfo.blit_hw <> 0 then
flags := flags or SDL_HWACCEL;[/pascal]