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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 09.11.2018, 16:45   #11
Linsor
Пользователь
 
Регистрация: 27.07.2018
Сообщений: 15
По умолчанию

Цитата:
Сообщение от xxbesoxx Посмотреть сообщение
Код:
Я извиняюсь, что так долго не отвечал, Были проблемы с Интернетом... Я писал код, DBGrid активируется, но столбцы не добавляются... я пытался сам написать что-нибудь, но безуспешно...
Linsor вне форума Ответить с цитированием
Старый 11.11.2018, 17:47   #12
Linsor
Пользователь
 
Регистрация: 27.07.2018
Сообщений: 15
По умолчанию

Так, я нашёл одно поджопное решение, но теперь DBGrid не хочет отчищаться, и вообще работать с другими БД

Код:
procedure TMainForm.BoxDBNameChange(Sender: TObject);
Var
  IDX, i : integer;
begin

  if  Trim(BoxDBName.Text) <>'' then
    begin
      With DataModule2 do begin
        ZConnection1.Catalog := BoxDBName.Items[IDX];

        ZQuery2.Close;
        Zquery2.SQL.Clear;
        ZQuery2.SQL.Add(' SELECT * FROM  '+  trim(ZTable1.TableName) +' ');
        ZQuery2.Open;

        MainDataBAse.Columns.Clear;
        For i := 0 to ZQuery2.FieldCount-1 do
          begin
            MainDataBase.Columns.Add;
            MainDataBase.Columns[i].Field := ZQuery2.Fields[i];

          end;

      end;
  end;


end;
MainDataBase - DBGrid
Linsor вне форума Ответить с цитированием
Старый 11.11.2018, 20:59   #13
evg_m
Старожил
 
Регистрация: 20.04.2008
Сообщений: 5,515
По умолчанию

Цитата:
но теперь DBGrid не хочет отчищаться, и вообще работать с другими БД
с другими БД работает не Dbgrid а XXConnection. И для соединения с новой(другой) БД надо закрыть текущее соединение, а потом(после задания новых параметров) открыть вновь.
Цитата:
Код:
        ZConnection1.Catalog := BoxDBName.Items[IDX];
А вы задали значение IDX ?!

Цитата:
Код:
        MainDataBAse.Columns.Clear;
вообще-то говоря этого достаточно чтобы DBGrid "показал" все колонки своего текущего НД.

Цитата:
Код:
            MainDataBase.Columns.Add;
это функция (результат - добавленная колонка)
http://www.programmersforum.ru/showp...97&postcount=4
программа — запись алгоритма на языке понятном транслятору

Последний раз редактировалось evg_m; 11.11.2018 в 21:04.
evg_m на форуме Ответить с цитированием
Старый 13.11.2018, 17:32   #14
Linsor
Пользователь
 
Регистрация: 27.07.2018
Сообщений: 15
По умолчанию

Почему оно так пишет?
Query не показывает имена таблиц, она просто пишет "Tables_in_mybd"
Изображения
Тип файла: png Screenshot_2.png (9.6 Кб, 59 просмотров)
Linsor вне форума Ответить с цитированием
Старый 13.11.2018, 19:07   #15
Linsor
Пользователь
 
Регистрация: 27.07.2018
Сообщений: 15
По умолчанию

Цитата:
Сообщение от Linsor Посмотреть сообщение
Почему оно так пишет?
Query не показывает имена таблиц, она просто пишет "Tables_in_mybd"
Меня Этот DElPHI дико тролит...
Не хочет и всё...
Linsor вне форума Ответить с цитированием
Ответ


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

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

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


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
программное добавление картинок в Word xrob Компоненты Delphi 0 30.04.2014 18:06
Программное добавление textBox zaki C# (си шарп) 2 06.12.2013 19:15
Дан двухмерный массив из 20 столбцов. Вставить в него столбец из чисел 10 после всех четных столбцов. Дмитрий142 Помощь студентам 9 07.06.2012 19:32
программное добавление items в ListView Марк Охман Общие вопросы Delphi 4 30.12.2010 16:44
Программное добавление принтера AlexandrSid Общие вопросы Delphi 5 13.08.2008 15:29