[轉]Iterator in Delphi

原文網扯：Iterator in Delphi

有空可以來試試 ^ ^