Fill a Listbox with Paradox Database (Delphi)

0

Good afternoon, friends. I'm having trouble filling a listbox with information from a Paradox Database table, the Data Source is the "Gap03Dm.SourceChaves" file and the DataField is "Field". How to make?

    
asked by anonymous 14.03.2016 / 18:18

1 answer

1
procedure TFrmPrincipal.Button4Click(Sender: TObject);
begin
  ListBox1.Items.Clear;
  Table1.First;
  while not Table1.Eof do
  begin
    ListBox1.Items.Add(Table1.FieldByName('CAMPO').AsString);
    Table1.Next;
  end;
end;
    
29.03.2016 / 03:48