- TGikoAgeSage = (gasNone, gasAge, gasSage, gasNew, gasNull);
-
-{ TFolder = class
- private
- FItemList: TList; //\8eq\83A\83C\83e\83\80\83\8a\83X\83g
- FLeaf: Boolean; //\89º\82É\83t\83H\83\8b\83_\82ð\8e\9d\82Â\82±\82Æ\82ª\8fo\97\88\82é\82©
- public
- function Add(Item: TFolder): Integer;
- procedure Clear;
- procedure Delete(Index: Integer);
- procedure Exchange(Index1, Index2: Integer);
- procedure Insert(Index: Integer; Item: TFolder);
- procedure Move(CurIndex, NewIndex: Integer);
- function Remove(Item: TFolder): Integer;
- procedure Sort(Compare: TListSortCompare);
- property Capacity: Integer read FCapacity write SetCapacity;
- property Count: Integer read FCount write SetCount;
- property Items[Index: Integer]: TFolder read Get write Put; default;
-
- property Leaf: Boolean read FLeaf;
- end;
-
- TBBS = class(TFolder)
- end;
- TCategory class(TFolder)
- end;
- TBoard = class(TFolder)
- end;
- TThreadItem = class(TFolder)
- end;
-}
-
-{
- TBBS = class(TBBS)
- end;
- TBoard2ch = class(TBoard)
- end;
- TThreadItem2ch = class(TThreadItem)
- end;
-}
-
-// ITest = interface
-// end;
-// IBBS = interface
-// end;
-// ICategory = interface
-// end;
-// IBoard = interface
-// end;
-// IThreadItem = interface
-// end;
+ TGikoAgeSage = (gasNone, gasAge, gasSage, gasNew, gasArch, gasNull);