Показать сообщение отдельно
  #4  
Старый 01.04.2010, 22:25
Gover Gover вне форума
Прохожий
 
Регистрация: 28.03.2010
Сообщения: 5
Репутация: 10
По умолчанию

Ну так что? Икто и неподскажет?
У меня ошибку дает при переключении на вторую радиокнопку. Код такой
Код:
procedure TNewCardForm.AtmRadioButtonClick(Sender: TObject);
begin
  if AtmRadioButton.Checked then
    begin
    DBLookupComboBox2.Enabled := true;
    DBLookupComboBox2.ListSource := DataModule2.AtmSource;
    DBLookupComboBox2.KeyField := 'idatm';
    DBLookupComboBox2.ListField := 'NomerAtm';

    end;
end;

procedure TNewCardForm.InfRadioButtonClick(Sender: TObject);
begin
  if InfRadioButton.Checked then
    begin
    DBLookupComboBox2.Enabled := true;
    DBLookupComboBox2.ListSource := DataModule2.InfSource;
    DBLookupComboBox2.KeyField := 'idinf';
    DBLookupComboBox2.ListField := 'NomerInf';
    end;
end;
Изображения
Тип файла: jpg Безымянный.jpg (24.4 Кбайт, 12 просмотров)
Ответить с цитированием