瀏覽代碼

* Add TClassicStringDynArray for Delphi compatibility

Michaël Van Canneyt 1 年之前
父節點
當前提交
14fe7203fe
共有 1 個文件被更改,包括 2 次插入0 次删除
  1. 2 0
      rtl/objpas/types.pp

+ 2 - 0
rtl/objpas/types.pp

@@ -81,6 +81,8 @@ type
   TStringDynArray = Array of AnsiString;
   TStringDynArray = Array of AnsiString;
 {$ENDIF}
 {$ENDIF}
 
 
+  TClassicStringDynArray = TStringDynArray;
+
   TObjectDynArray = array of TObject;
   TObjectDynArray = array of TObject;
   TWordDynArray = array of Word;
   TWordDynArray = array of Word;
   TCurrencyArray = Array of currency;
   TCurrencyArray = Array of currency;