![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() Приветствую.
Никогда не думал, что придется писать программу на delphi, да и еще к тому же работающую с базой данных. Но в связи с производственной необходимостью пришлось это делать. Половина функционала уже есть, но произошел затык в одном моменте. Итак: Имеется БД MS Access работающая через ADO с приложением. На форме расположено 5 радиокнопок и 1 DBComboBox. А затык в том, что как я и писал в сабже DataSource и DataField должны задаваться динамически в зависимости от активного RadioButton. Пытался делать это так Код:
procedure TNewCardForm.AtmRadioButtonClick(Sender: TObject); begin if AtmRadioButton.Checked = True then UstrDBComboBox.DataSource := DataModule2.AtmSource; UstrDBComboBox.DataField := 'nomeratm'; end; Помогите новичку, подскажите как правильно написать код. И еще, например, при активной 5-й радиокнопке DBComboBox становится неактивным. Это тоже подскажите пожалуйста. |