TAChart: Add operator- for TDoublePoint

git-svn-id: trunk@24349 -
This commit is contained in:
ask 2010-04-01 12:58:15 +00:00
parent f15d3f5f96
commit fafe56406f

View File

@ -193,6 +193,7 @@ operator +(const A: TPoint; B: TSize): TPoint; overload; inline;
operator +(const A, B: TPoint): TPoint; overload; inline;
operator +(const A, B: TDoublePoint): TDoublePoint; overload; inline;
operator - (const A, B: TPoint): TPoint; overload; inline;
operator -(const A, B: TDoublePoint): TDoublePoint; overload; inline;
operator =(const A, B: TMethod): Boolean; overload; inline;
implementation
@ -528,6 +529,12 @@ begin
Result.Y := A.Y - B.Y;
end;
operator - (const A, B: TDoublePoint): TDoublePoint; overload; inline;
begin
Result.X := A.X - B.X;
Result.Y := A.Y - B.Y;
end;
operator = (const A, B: TMethod): Boolean;
begin
Result := (A.Code = B.Code) and (A.Data = B.Data);