Ignore:
Timestamp:
Jul 27, 2009, 3:19:14 PM (15 years ago)
Author:
george
Message:
  • Přidáno: Objektová třída TPoint, TDouble.
Location:
ObjectBaseTypes
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • ObjectBaseTypes

    • Property svn:ignore

      •  

        old new  
        33TestApplication.res
        44*.dcu
         5*.~dsk

  • ObjectBaseTypes/UObjectTypeBase.pas

    r3 r4  
    1313  end;
    1414
    15   IOrdinal = interface
    16     function Ordinal: IOrdinal;
    17     function Predecessor: IOrdinal;
    18     function Successor: IOrdinal;
    19     function Low: IOrdinal;
    20     function High: IOrdinal;
     15  ISortable = interface
     16    procedure Sort;
     17  end;
     18
     19  IStreamable = interface
     20    function GetStream: TStream;
     21    procedure SetStrem(Stream: TStream);
    2122  end;
    2223
Note: See TracChangeset for help on using the changeset viewer.