Подскажите пожалуйста, а нет ли какого-нибудь волшебного метода
в самом Clarion RTL, что бы получить размер экрана без Windows API ?
Как через WinAPI - понятно:
Код: Выделить всё
LocHDC = GetDC(0)
If locHDC
LocHInch = GetDeviceCaps(LocHDC, winHORZRES)
LocVInch = GetDeviceCaps(LocHDC, winVERTRES)
Message('Экран: ' & LocHInch & ' x ' & LocVInch)
end