stringpe:

* Removed support for old-style design units - means compilers earlier than Delphi 6 no longer supported.

git-svn-id: https://svn.code.sf.net/p/ddablib/code/trunk@1065 eed78412-d13c-44e9-9ac7-ca5071eb296d

Author: delphidabbler

PJStringPE.pas

@@ -42,21 +42,17 @@
 interface
 
 
-{$UNDEF DELPHI6ANDUP}
-{$IFDEF CONDITIONALEXPRESSIONS}
-  {$IF CompilerVersion >= 14.0} // Delphi 6 and higher
-    {$DEFINE DELPHI6ANDUP}
-  {$IFEND}
-  {$IF CompilerVersion >= 15.0} // Delphi 7 and higher
-    {$WARN UNSAFE_CODE OFF}
-  {$IFEND}
-  {$IF CompilerVersion >= 23.0} // Delphi XE2
-    {$DEFINE RTLNAMESPACES}
-  {$IFEND}
-  {$IF CompilerVersion >= 24.0} // Delphi XE3
-    {$DEFINE TSCROLLSTYLEMOVED}
-  {$IFEND}
-{$ENDIF}
+// Requires Delphi 6 or later
+
+{$IF CompilerVersion >= 15.0} // Delphi 7 and higher
+  {$WARN UNSAFE_CODE OFF}
+{$IFEND}
+{$IF CompilerVersion >= 23.0} // Delphi XE2
+  {$DEFINE RTLNAMESPACES}
+{$IFEND}
+{$IF CompilerVersion >= 24.0} // Delphi XE3
+  {$DEFINE TSCROLLSTYLEMOVED}
+{$IFEND}
 
 
 uses
@@ -68,11 +64,7 @@ interface
   StdCtrls, Controls, ExtCtrls, Classes, Dialogs, Forms, ImgList, ComCtrls,
   ToolWin, ActnList,
   {$ENDIF}
-  {$IFDEF DELPHI6ANDUP}
   DesignIntf, DesignEditors;
-  {$ELSE}
-  DsgnIntf;
-  {$ENDIF}
 
 
 type