[BRESKON]

Сообщение от poli-smen

В таблице "Фирмы" (ADOTable2) должно быть минимум 2 поля (столбца):

1. "ID" - уникальный номер через который потом можно делать привязку в таблице "Платежи" и оно же указывается в поле "Фир_ID" у таблицы "Платежи"
2. "Firm" - строковое поле с названием фирмы

Тогда в обработчике событий ADOTable1AfterScroll получим такое:

Код:

if ADOTable2.Locate('ID', DataSet.FieldByName('Фир_ID').AsInteger, []) then
begin
  Edit2.Text := ADOTable2.FieldByName('Firm').AsString;
end else
begin
  Edit2.Text := '???';
end;

Ну-да всё заработало! Можно тему считать закрытой. Спасибо тебе за терпение и понимание.