Sign in Join

Live chat for Free Pascal, Lazarus, Delphi and every Pascal programmer.

Mailing lists / lazarus / 2019-04

DesignPPI property in TDataModule

5 messages · 2 people · –

Reply by email Subscribe to this list Your subscription

Read-only archive. Use j and k to move between messages.

Sergey Bodrov

What sense in PPI for non-visual design-time component?

If it used by child DPI-aware components like TImageList, then IMHO better get PPI from TApplication.

TDataModule.DesignPPI property cause error popups in Lazarus/Delphi multiplatform project.

*Bodrov Sergey* software development, IT consulting http://www.serbod.com *Phone (Belarus):* +375(25)794-21-58 *Skype:* sergey.bodrov1 *e-mail:* , -------------- next part -------------- An HTML attachment was scrubbed... URL: <http://lists.lazarus-ide.org/pipermail/lazarus/attachments/20190415/b9c08d09/attachment.html>

Reply by email

Ondrej Pokorny
to Sergey Bodrov
Sergey Bodrov wrote
What sense in PPI for non-visual design-time component?

What do you mean? There is no PPI property in non-visual design-time components.

If it used by child DPI-aware components like TImageList, then IMHO better get PPI from TApplication.

Again, there is no PPI property in TImageList.

TDataModule.DesignPPI property cause error popups in Lazarus/Delphi multiplatform project.

Yes, there is TDataModule.DesignPPI that makes sure the positions (Left/Top properties) of the non-visual components are scaled correctly.

Ondrej

Reply by email

Ondrej Pokorny
to Ondrej Pokorny
Ondrej Pokorny wrote 6 lines
On 15.04.2019 13:07, Sergey Bodrov via lazarus wrote: > TDataModule.DesignPPI property cause error popups in Lazarus/Delphi > multiplatform project. Yes, there is TDataModule.DesignPPI that makes sure the positions (Left/Top properties) of the non-visual components are scaled correctly.

By the way, the default value of 96 should not be written to LFM/DFM. So you should not get any warnings if you develop at 96 DPI / 100% scaling.

Ondrej

Reply by email

Sergey Bodrov
to Ondrej Pokorny

пн, 15 апр. 2019 г. в 14:42, Ondrej Pokorny via lazarus <

Show quoted text 9 lines
: Yes, there is TDataModule.DesignPPI that makes sure the positions > (Left/Top properties) of the non-visual components are scaled correctly. By the way, the default value of 96 should not be written to LFM/DFM. So you should not get any warnings if you develop at 96 DPI / 100% scaling.

content of some Delphi .DFM after Lazarus 2.0.0 win64 release: ===
object DMBaseClient: TDMBaseClient
OnCreate = DataModuleCreate
OnDestroy = DataModuleDestroy
OldCreateOrder = False
Height = 269
HorizontalOffset = 0
VerticalOffset = 0
Width = 441
*PPI = 96*
object tmrCheckActivity: TTimer
OnTimer = tmrCheckActivityTimer
left = 104
top = 104

  end
  object tmrProcessPackets: TTimer
    Interval = 1
    OnTimer = tmrProcessPacketsTimer
    left = 104
    top = 148
  end

end
---

*Bodrov Sergey* software development, IT consulting http://www.serbod.com *Phone (Belarus):* +375(25)794-21-58 *Skype:* sergey.bodrov1 *e-mail:* , -------------- next part -------------- An HTML attachment was scrubbed... URL: <http://lists.lazarus-ide.org/pipermail/lazarus/attachments/20190415/c5b1f0c9/attachment.html>

Reply by email

Ondrej Pokorny
to Sergey Bodrov
Sergey Bodrov wrote 37 lines
пн, 15 апр. 2019 г. в 14:42, Ondrej Pokorny via lazarus < <mailto:>>: > Yes, there is TDataModule.DesignPPI that makes sure the positions > (Left/Top properties) of the non-visual components are scaled correctly. By the way, the default value of 96 should not be written to LFM/DFM. So you should not get any warnings if you develop at 96 DPI / 100% scaling. content of some Delphi .DFM after Lazarus 2.0.0 win64 release: === object DMBaseClient: TDMBaseClient   OnCreate = DataModuleCreate   OnDestroy = DataModuleDestroy OldCreateOrder = False   Height = 269 HorizontalOffset = 0 VerticalOffset = 0   Width = 441 *PPI = 96*   object tmrCheckActivity: TTimer     OnTimer = tmrCheckActivityTimer     left = 104     top = 104   end   object tmrProcessPackets: TTimer     Interval = 1     OnTimer = tmrProcessPacketsTimer     left = 104     top = 148   end end

https://bugs.freepascal.org/view.php?id=32163

Ondrej

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.lazarus-ide.org/pipermail/lazarus/attachments/20190416/032232fc/attachment.html>

Reply by email