Аз не разбирам много от Delphi и не знам от къде точно да се вземе тази информация, сигурно я има някъде записана... Един тъп начин, който веднага ми хрумва е да си създадеш нова форма, направиш невидима, разпънеш я на целия екран и и вземеш height и width и после си я унищожиш. Доста неелегантно, но може и да проработи. Все пак направи първо search в хелпа на desktoparea или нещо подобно