You've already forked lazarus-ccr
Misc packages: Adjust to changes in Laz/main (deprecated OffsetRect), less hints and warnings
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8838 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
@ -37,7 +37,7 @@ unit JvCustomItemViewer;
|
||||
interface
|
||||
|
||||
uses
|
||||
LMessages, LCLVersion,
|
||||
LCLIntf, LCLVersion, LMessages,
|
||||
Classes, Graphics, Contnrs, Controls, Forms, ComCtrls,
|
||||
ExtCtrls, JvConsts, Types, LCLType;
|
||||
|
||||
@ -369,7 +369,7 @@ function CenterRect(InnerRect, OuterRect: TRect): TRect;
|
||||
implementation
|
||||
|
||||
uses
|
||||
SysUtils, Math, Themes, LCLIntf,
|
||||
SysUtils, Math, Themes,
|
||||
JvJCLUtils;
|
||||
// JvJVCLUtils, ;
|
||||
|
||||
|
@ -29,7 +29,7 @@ interface
|
||||
{$MODE OBJFPC}{$H+}
|
||||
|
||||
uses
|
||||
LCLVersion,
|
||||
LCLType, LCLIntf, LCLVersion,
|
||||
SysUtils, Types, Classes, Controls, Graphics, ComCtrls, ImgList,
|
||||
JvCustomItemViewer;
|
||||
|
||||
@ -158,7 +158,6 @@ type
|
||||
implementation
|
||||
|
||||
uses
|
||||
LCLType, LCLProc, LCLIntf,
|
||||
Math,
|
||||
JvJCLUtils, JvJVCLUtils;
|
||||
|
||||
|
@ -1294,6 +1294,7 @@ var
|
||||
I: Integer;
|
||||
UTF8Value: UTF8String = '';
|
||||
begin
|
||||
Result := '';
|
||||
I := ReadInt(Stream);
|
||||
SetLength(Result, I);
|
||||
if I > 0 then
|
||||
|
@ -1025,6 +1025,7 @@ var
|
||||
I: Integer;
|
||||
L: Integer;
|
||||
begin
|
||||
Result := '';
|
||||
SetLength(Result, Length(ParseString));
|
||||
L := 0;
|
||||
for I := 1 to Length(ParseString) do
|
||||
|
Reference in New Issue
Block a user