2011 年 10月 14 日随笔档案 - wouldguan

2011年10月14日

摘要：代码如下： program TCustomComparerTest;{$APPTYPE CONSOLE}uses SysUtils, Generics.Defaults, Generics.Collections;type TCustomerStringComparer = class(TCustomComparer<String>) public function Compa... 阅读全文

posted @ 2011-10-14 01:34 wouldguan 阅读(207) 评论(0) 推荐(0)

[学习官方例子]TComparer

摘要：代码如下： program TComparerTest;{$APPTYPE CONSOLE}uses SysUtils, Generics.Defaults, Generics.Collections;type TIntStringComparer = class(TComparer<String>) public function Compare(const Left, Ri... 阅读全文

posted @ 2011-10-14 00:41 wouldguan 阅读(192) 评论(0) 推荐(0)

[学习官方例子]TStack

摘要：代码如下： program TStackTest;{$APPTYPE CONSOLE}uses SysUtils, Generics.Collections;var Stack: TStack<String>;begin Stack := TStack<String>.Create(); Stack.Push('John'); Stack.Push('Mary'); Stack... 阅读全文

posted @ 2011-10-14 00:20 wouldguan 阅读(263) 评论(0) 推荐(0)

[学习官方例子]TQueue

摘要：没什么功能，简单敲一下：代码如下： program TQueueTest;{$APPTYPE CONSOLE}uses SysUtils, Generics.Collections, Forms;var Queue: TQueue<String>;begin Queue := TQueue<String>.Create(); Queue.Enqueue('John'); Qu... 阅读全文

posted @ 2011-10-14 00:08 wouldguan 阅读(553) 评论(0) 推荐(0)

公告