Local lnwidth,lnheight
m.lnwidth= Sysmetric(1)
m.lnheight=Sysmetric(2)

If m.lnwidth < 800 And m.lnheight < 640
	Messagebox([Screen Resolution is low,you should choose higher resolution :] + TRANSFORM(m.lnwidth) + [x] + TRANSFORM(m.lnheight),16,[Resolution Problem])
Endif

Messagebox([Screen Resolution is : ] + TRANSFORM(m.lnwidth) + [x] + TRANSFORM(m.lnheight) ,32,[Resolution Info])