Ignore:
Timestamp:
Apr 10, 2022, 11:18:50 AM (3 years ago)
Author:
chronos
Message:
  • Fixed: TObject invalid typecast problem with generics.
Location:
trunk/Packages/Common
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • trunk/Packages/Common

    • Property svn:ignore

      •  

        old new  
        11lib
         2Common.pas

  • trunk/Packages/Common/UListViewSort.pas

    r128 r132  
    66
    77uses
    8   {$IFDEF Windows}Windows, CommCtrl, LMessages, {$ENDIF}Classes, Graphics, ComCtrls, SysUtils,
    9   Controls, DateUtils, Dialogs, Forms, Grids, StdCtrls, ExtCtrls,
    10   LclIntf, LclType, LResources, Generics.Collections, Generics.Defaults;
     8  {$IFDEF Windows}Windows, CommCtrl, LMessages, {$ENDIF}Classes, Graphics,
     9  ComCtrls, SysUtils, Controls, DateUtils, Dialogs, Forms, Grids, StdCtrls,
     10  ExtCtrls, UCommon, LclIntf, LclType, LResources, Generics.Collections,
     11  Generics.Defaults;
    1112
    1213type
    … …  
    1718  TCompareEvent = function (Item1, Item2: TObject): Integer of object;
    1819  TListFilterEvent = procedure (ListViewSort: TListViewSort) of object;
    19 
    20   TObjects = TObjectList<TObject>;
    2120
    2221  { TListViewSort }
Note: See TracChangeset for help on using the changeset viewer.