在Delphi中加载延迟列表框项

Question

我正在尝试解析RSS提要并将其数据加载到列表框中。项目内容的形式如下：

type
  TFeedItem = class
  private
    FTitle: string;
    FDescription: string;
    FLink: string;
    FImageUrl: string;
  public
    property Title: string read FTitle;
    property Description: string read FDescription;
    property Link: string read FLink;
    property ImageUrl: string read FImageUrl;
  end;

列表是自定义绘制的，将显示每个项目中的所有上述字段。由于有超过100个Feed项，因此下载每个ImageUrl并将其显示在相应的列表项上需要很长时间。所以我想先拿10个项目。当用户滚动到列表框的末尾时，获取接下来的10个项目，依此类推。实际上我正在尝试实现Facebook和许多其他Android应用程序在滚动到结束事件时显示更多数据项的方式。

谷歌搜索提供了Android实现或Windows手机的大部分结果。