TopIndex(ListBoxなど)

TopIndexプロパティは ListBoxコントロールなどで最上部に表示されている項目のインデックスを返します。Delphiでも同じく「TopIndex」プロパティを使用します。Memoや RichEditコンポーネントには, このプロパティは無いので APIを使用します。

＞リッチエディットで１行目のインデックス
■ TListBoxの TopIndexの使用例
  procedure TForm1.Timer1Timer(Sender: TObject);
  begin
    {最上部のインデックス}
    Label1.Caption  :=  'INDEX = '   +  IntToStr(ListBox1.TopIndex);
    {最上部の内容}
    Label2.Caption  :=  'VALUE = '   +  ListBox1.Items[ListBox1.TopIndex];
  end;                                                                       