[Kores]

задача.есть таблица

Код:

1	spol//датасурс для этой таблицы

...в ней столбцы:
назв/ тип/ значения
ID_pol - счетчик| 1, 2.
pol - текст | мужской, женский
spol - текст | муж, жен.
прикрепляю к этой таблице dblookupcombobox. делаю свойства такие, как надо...тоесть

Код:

1 2 3 4 5 6 7 8 9 10 11 12

object Pol: TDBLookupComboBox     Left = 288     Top = 48     Width = 145     Height = 21     DataField = 'Pol'     DataSource = DataMod.Scard //сюда должны добавляться значения...     KeyField = 'ID_pol'     ListField = 'Pol'     ListSource = DataMod.spol // отсюда берется список значений.     TabOrder = 6   end

а в работе он не активен и не показывает список значений



и попутно сразу вопрос...вот кусок кода

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

function Tdatamod.TestNoCard(var No: String): Boolean; var   CountZero: Integer; begin   CountZero := 8 - Length(No); // к-во незначащих нулей в номере карты. В реальной БД                             // необходимо использовать не константу, а размер поля   No := Copy(ZeroStr, 1, CountZero) + No; //добавляем незначащие нули до 8 знаков   with qSearch do //делаем запрос с номером   begin     Parameters.Items[0].Value := No;     Open;     Result := RecordCount = 0; //если нет записей с тким номером, значит тест пройден     if not Result then //если результат негативный сообщаем об этом      showmessage('такая карта уже существует');     Close;   //закрываем запрос   end; end;

ругается на showmessage - неизвестный идентификатор....
везде это катит...а тут...

[Страдалецъ]

ругается на showmessage - неизвестный идентификатор....

видимо вы его в датамодуле вызываете, а он не подключает Dialogs по умолчанию.

а в работе он не активен и не показывает список значений

Скорее всего не активны источники данных DataMod.Scard и DataMod.spol

[Kores]

так...ну активен он стал...тольк вот не значения необходимые не принимает...сделал, что бы по умолчанию муж пол был...это все делается на ура...а вот если выбрать жен пол, в таблице отображается пустота...

да, и вот еще интересный вопрос...
в таблицу - через квери спокойно передаются все данные из дбэдитов...на другой форме - дбгрид, в который загружается таблица. но...вот в чем проблема: нажал кнопку "Добавить", все сработало...форма с дбэдитами закрылась.а в дбгриде значения не обновились....
как его обновить?*

[Aristarh Dark]

как его обновить?*

Refresh ....