ItemHeight shrinked after first shown when TListBox.Style is OwnerDrawFixed

Original Reporter info from Mantis: baldzhang @baldzhang

• Reporter name: bald zhang

Description:

found this issue in #34223 (closed)
make a test program and reproduced, 1.8.4 and trunk version is the same.

Windows 10, 4k display, 192dpi

Form2 is created only once, ShowModal when Form1.Button1 click
the first time, ListBox drawing good, ItemHeight is (31)
then became to (20) everytime it shown.

because I run 1.8.4 with environment: __COMPAT_LAYER = "GdiDPIScaling DPIUnaware"
always got 96dpi, so not met this in PathEditor

another smaller problem: Form's Left and Top not scaled, at design-time(96dpi) they are (+300+200, Form1), at run-time(192dpi), should be (+600+400) but not.

Mantis conversion info:

• Mantis ID: 34249
• OS: Windows
• OS Build: 10
• Platform: win32
• Version: 1.9 (SVN)
• Fixed in revision: r59094 (#7bcf1cc5)
• Target version: 1.10