Подобие функций getWidth и getHeight
 

Стандартные функции getWidth и getHeight в MidletPascal возвращают те размеры дисплея, при которых был запущен мидлет.
Соответственно, если размеры дисплея меняются в процессе работы, то мидлет ведет себя не так, как планировалось.
Например, у Nokia e70 при открытии/закрытии qwerty клавиатуры экран разворачивается, и ширина меняется с высотой.
Собственно, вопрос: не писал ли кто библиотеку с функциями, возвращающими ТЕКУЩИЕ размеры дисплея?