Подчинение

[Власов А.С.]

Люди как можно сделать так чтоб выбираешь из списка DBLookupComboBox скажем наименование (но там есть и код) его тоже надо вставлять в базу так чтоб пользователь невидел.

[maLoy*508]

а по точнее можно? что и как должно работать? с вашего сообщения понять тяжеловато

[artemavd]

Люди как можно сделать так чтоб выбираешь из списка DBLookupComboBox скажем наименование (но там есть и код) его тоже надо вставлять в базу так чтоб пользователь невидел.

На сколько я помню, то у DBLookupComboBox есть пять важных свойств: ListSource, ListField, KeyField и Datasource, DataField. Первое свойство (ListField) используется для того, чтобы задать DBLookupComboBox-у источник откуда брать данные (в вашем случае наименование). Второе (ListField) указывается поле из которого берутся значения. Третье (KeyField) указывается ключевого поле в DataSet-e. Четвертое (DataSource) означает источник, куда будет заносится выбранное значение в DBLookupComboBox-е. И, наконец, пятое свойство (DataField) означает то, поле, в которое будет вставляться выбранное значение. Думаю, что я понятно объяснил.

[Власов А.С.]

Объснил понятно, спасибо. DBLookupComboBox я выбираю значение и надо бы добавить еще (а что незнаю) чтоб и код выбирался автоматичски. Выбрал DBLookupComboBox (наименование) и тут же выбрался код, а вот как этот код реаливать незнаю. И чтоб этот код добавился в базу.

[vovk]

ключевое слово "Когда"? когда это момент времени в который происходит событие. Событие, в данном случае выбор значения. Значит используем обработчик события, но КАКОГО события? К сожалению у DBLookupComboBox нет события onchange, а определить как я понял надо выбор значения.
Тут можно использовать onchange DataSource указанаго в свойстве DataSource DBLookupComboBox, в конце концов итогом выбора значения является изменение данных в таблице.

значит делаем просто проверку в событии onchange этого DataSource

procedure TForm1.DataSource2DataChange(Sender: TObject; Field: TField);
begin
if (Field<>nil) and (Field.FieldName=DBLookupComboBox.DataField)  then
{тут нужные действия}
end;

вроде так, если не ошибаюсь

ЗЫ
правда условие будет выполнятся и если вручную изменить данные.

[Власов А.С.]

{тут нужные действия}, а тут что написать??? если у меня должно браться из таблицы аксеса

[vovk]

пишите там то что хотите сделать...
Ну хоть опишите что должно произойти, а то как я могу сказать что туда писать то?

(но там есть и код) его тоже надо вставлять в базу так чтоб пользователь невидел.

вот это ни очём не говорит, там в какуюто таблицу, должны попасть какието данные? или что?

[Власов А.С.]

Извините, есть таблица в аксесе под названием Наименование сельсовета там две колонки Наименвоние и код. DBLookupComboBox выбирает наименование, а как сделать чтоб и код как то выбирался автоматом и попадал в базу аксеса.

[vovk]

DBLookupComboBox.DataSource.Dataset.FieldByname('{название столбца куда нужно добавить код}').AsVariant:= 
DBLookupComboBox.ListSource.Dataset.FieldByname('{название столбца где содержится код}').AsVariant;

[Власов А.С.]

А неработает