Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 06.12.2016, 13:21   #1
cw82
Пользователь
 
Аватар для cw82
 
Регистрация: 14.10.2010
Сообщений: 52
По умолчанию DBGrideh не скрывает поле key

Код:
procedure TForm2.Button1Click(Sender: TObject);
begin
if Form2.RadioButton1.Checked=True then
   Form2.DataSource1.DataSet:=ADOQuery1;
   ADOQuery1.Active:= True;
   Form2.DBGrideh1.Columns.Clear;  //отчищаем grid
   Form2.DBGrideh1.columns.AddAllColumns(true);//добавляем в грид новые столбцы
   ADOQuery1.filtered:=False;
   Form2.DBGridEh1.Columns[0].Visible := False;
В ADOQuery1 запрос вида select * from Table , естественно выводит все поля, далее после добавления в Грид всех полей пытаюсь скрыть поле key но оно не скрывается. Понимаю,что можно изменить запрос и вывести все поля кроме key, но хочу понять почему мой метод не работает. Спасибо.
cw82 вне форума Ответить с цитированием
Старый 06.12.2016, 14:37   #2
cw82
Пользователь
 
Аватар для cw82
 
Регистрация: 14.10.2010
Сообщений: 52
По умолчанию

Не ужели никто не поможет? 20 человек просмотрело тему. Застрял на этой мелочи
..
cw82 вне форума Ответить с цитированием
Старый 06.12.2016, 14:45   #3
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 19,042
По умолчанию

У меня работает
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 06.12.2016, 14:54   #4
cw82
Пользователь
 
Аватар для cw82
 
Регистрация: 14.10.2010
Сообщений: 52
По умолчанию

Если вешаю это событие на др кнопку то тоже работает...
Может где то здесь кроется ошибка ?
Код:
if Form2.RadioButton1.Checked=True then

   Form2.DataSource1.DataSet:=ADOQuery1;
   ADOQuery1.Active:= True;
   Form2.DBGrideh1.Columns.Clear;  //отчищаем grid
   Form2.DBGrideh1.columns.AddAllColumns(true);//добавляем в грид новые столбцы
   ADOQuery1.filtered:=False ;
   Form2.DBGridEh1.Columns[0].Visible := False;

if Form2.RadioButton2.Checked=True then
   Form2.DataSource1.DataSet:=ADOQuery2;
   ADOQuery2.Active:= True;
   Form2.DBGrideh1.Columns.Clear;  //отчищаем grid
   Form2.DBGrideh1.columns.AddAllColumns(true);//добавляем в грид новые столбцы
   ADOQuery2.filtered:=False;
   Form2.DBGridEh1.Columns[0].Visible := False;
И этих IF 12шт...
cw82 вне форума Ответить с цитированием
Старый 06.12.2016, 14:55   #5
cw82
Пользователь
 
Аватар для cw82
 
Регистрация: 14.10.2010
Сообщений: 52
По умолчанию

понимаю, что говно код, но как есть..., обещаю исправиться.
cw82 вне форума Ответить с цитированием
Старый 06.12.2016, 14:58   #6
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

Код:
if Form2.RadioButton1.Checked then 
 BEGIN 
тут код
 END 

if Form2.RadioButton2.Checked then
 BEGIN 
тут код
 END 
мысль понятна?
Serge_Bliznykov вне форума Ответить с цитированием
Старый 06.12.2016, 18:17   #7
cw82
Пользователь
 
Аватар для cw82
 
Регистрация: 14.10.2010
Сообщений: 52
По умолчанию

Благодарю Вас. Мысль была, что надо бы это прописать , но как то работало, поэтому забил... Теперь работает как надо. Спасибо.
cw82 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
поле CheckBox в DBGridEh Hich БД в Delphi 4 18.11.2016 11:41
lookup поле в dbgrideh Alex_UA БД в Delphi 2 05.10.2014 19:40
Запрет ввода даты больше текущей в поле таблицы DBGridEh kashirin.p Общие вопросы Delphi 5 05.04.2012 14:14
Violation of primary key constraint .Cannot insert duplicate key in object Как избавиться? SlimFIT БД в Delphi 4 28.12.2010 06:46
DBGridEh - поле с картинками. (как задать правильное значение) Jenya БД в Delphi 4 25.03.2008 06:26