paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-08 07:21:34 +02:00
Code Issues Packages Projects Releases Wiki Activity

TAChart, TurboPower_IPro: Fix "OffsetRect deprecated" message.

Browse Source
This commit is contained in:
wp_xyz 2023-06-16 01:50:13 +02:00
parent 87fe030800
commit 50a68c5dc8
6 changed files with 18 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
components/fpvectorial/fpvectorial2canvas.pas
View File

@ -78,7 +78,7 @@ var
i: Integer;
j, n: Integer;
x1, y1, x2, y2: Integer;
pts: TPointsArray;
pts: TPointsArray = nil;
ACanvas: TCanvas absolute ARenderInfo.Canvas;
coordX, coordY: Integer;
curSegment: TPathSegment;

3
components/tachart/tachartlazaruspkg.lpk
View File

@ -19,6 +19,9 @@
</Debugging>
</Linking>
<Other>
<CompilerMessages>
<IgnoredMessages idx6058="True"/>
</CompilerMessages>
<CustomOptions Value="-dCHECK_VALID_SCALING"/>
<OtherDefines Count="1">
<Define0 Value="CHECK_VALID_SCALING"/>

4
components/tachart/tatools.pas
View File

@ -17,10 +17,12 @@ unit TATools;
interface
uses
// LCL
LCLIntf, LCLType, // must be before Types
// RTL, FCL
Classes, SysUtils, Types, Math, FPCanvas,
// LCL
Controls, CustomTimer, {GraphMath,} Forms, LCLPlatformDef, InterfaceBase,
LCLType, LCLIntf,
// TAChart
TAChartUtils, TADrawUtils, TAChartAxis, TALegend, TACustomSeries, TAGraph,
TATypes, TATextElements;

5
components/turbopower_ipro/iphtml.pas
View File

@ -50,10 +50,11 @@ unit IpHtml;
interface
uses
//MemCheck,
// LCL
LCLType, LCLIntf,
Types, contnrs, SysUtils, Classes, TypInfo,
// LCL
LCLType, LCLIntf, LResources, LMessages, Messages, LCLMemManager,
LResources, LMessages, Messages, LCLMemManager,
Graphics, Controls, StdCtrls, ExtCtrls, Buttons, Forms, ClipBrd, Dialogs,
{$IFDEF UseGifImageUnit} //TODO all of this units not exists
GifImage,

5
components/turbopower_ipro/iphtmlblocklayout.pas
View File

@ -6,9 +6,12 @@ unit ipHtmlBlockLayout;
interface
uses
// LCL
LCLIntf, // Must be before Types
// RTL, FCL
Types, Classes, SysUtils,
// LCL
LCLIntf, Graphics,
Graphics,
// TurboPower_ipro
IpUtils, IpHtmlTypes, IpHtmlProp, IpHtmlUtils, IpHtml, IpHtmlNodes;

5
components/turbopower_ipro/iphtmlnodes.pas
View File

@ -6,9 +6,12 @@ unit IpHtmlNodes;
interface
uses
// LCL
LCLType, LCLIntf,
// RTL, FCL
Types, Classes, SysUtils,
// LCL
Graphics, GraphUtil, LCLIntf, LCLType,
Graphics, GraphUtil,
Controls, StdCtrls, ExtCtrls, Buttons, Dialogs,
// TurboPower_ipro
IpConst, IpCSS, IpHtmlTypes, IpHtmlClasses, IpHtmlProp,