Due to a change in Laz 4.99, this package does not compile any more: a 4th element has been added to the TTextLayout enumeration, and therefore the three elements in TextLayoutFlags: array[TTextLayout] of Integer = (DT_TOP, DT_VCENTER, DT_BOTTOM) are no longer valid. DT_TOP must be added as 4th element:
uses
..., LCLVersion, ...;
const
TextLayoutFlags: array[TTextLayout] of integer = (DT_TOP, DT_VCENTER, DT_BOTTOM{$IF LCL_FullVersion >= 499}, DT_TOP{$IFEND});
Furthermore, the function OffsetRect has been remove from unit LCLIntf, it is in unit Types now. Since Types is already in "uses" just remove the qualifier LCLIntf from LCLIntf.OffsetRect.
When this is fixed please send me a mail to opm@lazarus-ide.org so that I can update OPM with the new version.
Due to a change in Laz 4.99, this package does not compile any more: a 4th element has been added to the
TTextLayoutenumeration, and therefore the three elements inTextLayoutFlags: array[TTextLayout] of Integer = (DT_TOP, DT_VCENTER, DT_BOTTOM)are no longer valid.DT_TOPmust be added as 4th element:Furthermore, the function
OffsetRecthas been remove from unit LCLIntf, it is in unit Types now. Since Types is already in "uses" just remove the qualifier LCLIntf fromLCLIntf.OffsetRect.When this is fixed please send me a mail to opm@lazarus-ide.org so that I can update OPM with the new version.