レコードを検索するには

テーブルで特定のレコードを検索するには、Find系メソッドを使います。Find系メソッドを使う前には、Filterプロパティを設定しておく必要があります。Filterプロパティには、検索条件を

フィールド名=値 {and|or フィールド名=値}

の形式で書きこんでおきます。

最初のレコードを検索するには、FindFirstメソッドを使い、2回目からは、FindNextメソッドを使います。

例

{ 検索開始 }
procedure TForm1.btnFindFirstClick(Sender: TObject);
begin
  Table1.Filter := 'COMPANY=''' + Edit1.Text + '''';
  Table1.FindFirst;
  StaticText1.Caption := Table1['Code'];
  StaticText2.Caption := Table1['Product'];
end;

{ 次を検索 }
procedure TForm1.btnFindNextClick(Sender: TObject);
begin
  Table1.FindNext;
  StaticText1.Caption := Table1['Code'];
  StaticText2.Caption := Table1['Product'];
end;