Точно видел на каком-то сайте как это делается....
А насчет того, как узнать текущее разрешение - извратов можно не делать:

---------------------------------
Properties for Environment object

ScreenHeight Long Height of the screen in pixels.
ScreenWidth Long Width of the screen in pixels.
---------------------------------

Делается примерно так:

int li_Width, li_Heignt
Enviropment lenv_Object

GetEnviropment(lenv_Object)
li_Width = lenv_Object.ScreenWidth
li_Heignt = lenv_Object.ScreenHeight

У меня прога таким образом узнаёт разрешения экрана и динамически
ресайзит все окна и контролы под новое разрешение.
Получается очень красиво :)

Точно. http://www.rgagnon.com/examples/devmode.srs