some changes in display.pas