Skip to content

Commit dcb3703

Browse files
committed
del support for old Delphi
1 parent 11110be commit dcb3703

File tree

1 file changed

+1
-14
lines changed

1 file changed

+1
-14
lines changed

python4lazarus/Sources/Core/PythonEngine.pas

Lines changed: 1 addition & 14 deletions
Original file line numberDiff line numberDiff line change
@@ -85,13 +85,6 @@ interface
8585
SysUtils,
8686
SyncObjs,
8787
Variants,
88-
{$IFDEF DELPHI2005_OR_HIGHER}
89-
{$IFNDEF UNICODE}
90-
WideStrings,
91-
{$ENDIF}
92-
{$ELSE}
93-
TinyWideStrings,
94-
{$ENDIF}
9588
MethodCallBack;
9689

9790
//#######################################################
@@ -101,12 +94,6 @@ interface
10194
//#######################################################
10295

10396
type
104-
{$IFNDEF UNICODE}
105-
TUnicodeStringList = TWideStringList;
106-
{$ELSE}
107-
TUnicodeStringList = TStringList;
108-
{$ENDIF}
109-
11097
{$IFNDEF FPC}
11198
{$IF CompilerVersion < 21}
11299
NativeInt = integer;
@@ -1406,7 +1393,7 @@ EPyWindowsError = class (EPyOSError);
14061393
TReceiveUniDataEvent = procedure (Sender: TObject; var Data : UnicodeString ) of object;
14071394
IOChar = WideChar;
14081395
IOString = UnicodeString;
1409-
TIOStringList = TUnicodeStringList;
1396+
TIOStringList = TStringList;
14101397

14111398
{$IF not Defined(FPC) and (CompilerVersion >= 23)}
14121399
[ComponentPlatformsAttribute(pidWin32 or pidWin64)]

0 commit comments

Comments
 (0)