[SFproG]

На форме лежат TDBGrid и DBLookupComboBox. TDBGrid имеет записи и на прямую не редактируется. Первая колонка уникальна. DBLookupComboBox содержит список первой колонки из TDBGrid. Нужно чтобы при выборе в DBLookupComboBox нужной записи, в TDBGrid автоматически выделялась та же строка с этой записью. Т.е. фокус (стрелочка слева) переходила на эту строку.

В Дельфи новичок. Подскажите код, пожалуйста.

[poli-smen]

Сообщение от SFproG

На форме лежат TDBGrid и DBLookupComboBox. TDBGrid имеет записи и на прямую не редактируется. Первая колонка уникальна. DBLookupComboBox содержит список первой колонки из TDBGrid. Нужно чтобы при выборе в DBLookupComboBox нужной записи, в TDBGrid автоматически выделялась та же строка с этой записью. Т.е. фокус (стрелочка слева) переходила на эту строку.

В Дельфи новичок. Подскажите код, пожалуйста.

Я так понимаю, что TDBGrid и DBLookupComboBox ссылаются на разные DataSet'ы?
Вот так можно:

Код:

1 2 3 4

procedure TForm1.DBLookupComboBox1Click(Sender: TObject); begin   DBGrid1.DataSource.DataSet.Locate('id', DBLookupComboBox1.ListSource.DataSet.FieldByName('id').AsInteger, []); end;

Где 'id' - имена уникальных полей.