|
|
scaled.png (12,010 bytes) |
|
|
Did you read http://wiki.lazarus.freepascal.org/High_DPI section "High DPI in Lazarus 1.8 and above", especially the 4th point "If you create controls run-time"? |
|
|
yes of course, there is no problem with scaling on same monitor for example when app start with 200% zoom, all forms is corrected created (with auto scale). But when I run app on 100% zoom and move main form to monitor with 200% zoom. Ouch, all controls on example is in autosize mode and Popupform.Parent := MainForm. |
|
|
OK, please upload a test application. I'll look at it. |
|
|
|
|
|
Test application uploaded. There is one Form and one Frame (two buttons). Frame creation is OK. Form is broken. When form is created with Application as owner, without parent and with Position := poOwnerFormCenter DPI scalling is correct. This code works: Frm := TForm2.Create(Application); Frm.Name := ''; Frm.BorderStyle := bsNone; Frm.Align := alClient; Frm.Show; |
|
|
OK, now I see the problem. The issue is "Popupform.Parent := MainForm". Yes, I probably forgot about this case. I'll fix it when I have a 2nd monitor to test. |
|
|
Fixed, please test and close if OK. |
|
|
Working well. Thanks. |
|
|
Tested. Working. |
- Anonymous
