На главную Наши проекты:
Журнал   ·   Discuz!ML   ·   Wiki   ·   DRKB   ·   Помощь проекту
ПРАВИЛА FAQ Помощь Участники Календарь Избранное RSS
msm.ru
! ПРАВИЛА РАЗДЕЛА · FAQ раздела Delphi
Пожалуйста, выделяйте текст программы тегом [сode=pas] ... [/сode]. Для этого используйте кнопку [code=pas] в форме ответа или комбобокс, если нужно вставить код на языке, отличном от Дельфи/Паскаля.
Обязательно указание:
1) типа базы данных (Paradox/Oracle/Interbase и т.п.)
2) способа доступа к базе данных (ODBC/ADO/DAO/BDE и т.п.)
Например: Paradox/BDE, MS Access/ADO

Наиболее часто задаваемые вопросы:
Базы даных для начинающих. Первые шаги. Понятие о BDE.
Переход на клиент-сервер и начала ADO
Приёмы работы с BLOB (OLE/Memo) полями
Запросы и параметры или как избавиться от многих проблем. Проблемы с датами в запросах.
Нужели мне нужно устанавливать BDE? (или почему не работает программа на другом компьютере)
Модераторы: Bas, Rouse_
Страницы: (5) « Первая ... 3 4 [5]  все  ( Перейти к последнему сообщению )  
> Помогите с минимумом по VolgaDB , Помощь начинающему
    Да читаю я (не книги а статьи и документацию (когда она на русском)), а документация к примеру от волги на английском... как так можно не любить свою собственную нацию?!!

    Зато я точно знаю то что один раз уже попробовал, сделаеш сколько угодно рази двигаться от этой базы дальше значительно легче... и теорию после практики воспринимаеш совсем иначе, существенно больше извлекаеш из неё полезной информации...
    Сообщение отредактировано: qivi -
      Моя СУБД работает с базами заданной зарание структуры(так настроен дбгрид) через волга дб, как проверить что открываемый ею файл соответствует этой структуре???
      Иными словами в моём частном случае состоит из 12 колонок с конкретными именами.

      Я хочу это проверить при его открытии, что бы избежать сбоя приложения если фаил несоответствует структуре или вобше подменён сторонним файлом с переправленным расширением.
        VolgaTable1.FieldCount
          То есть???
            Цитата qivi @
            состоит из 12 колонок

            Цитата ViktorXP @
            VolgaTable1.FieldCount

            + у каждого VolgaTable1.Fields[..].FieldName
              Вот процедура

              ExpandedWrap disabled
                procedure TVoshod.analizsodergimogo(Sender: TObject);
                var e: integer;                                   //Счётчик цикла
                var ir: integer;                                  //Индикатор изменения
                begin
                SetLength (mraz,1);                               //Задаём масив mraz длиной 1 элемент
                SetLength (mkat,1);                               //Задаём масив mkat длиной 1 элемент
                 
                IBV.First;                                        //Переходим на первую запись в таблице
                mraz[0]:=IBV.fields[1].AsString;                  //Приравниваем значение второй колонки первой строки первому элементу масива
                mkat[0]:=IBV.fields[2].AsString;                  //Приравниваем значение третий колонки первой строки первому элементу масива
                IBV.Next;                                         //Переход на следующюю запись
                while not IBV.Eof do begin                        //Крутим до конца таблицы
                 ir:=0;                                           //Обнуляем индикатор изменений
                 e:=0;                                            //Обнуляем счётчик циклов
                 while e<q do begin                               //Пока счётчик циклов строго меньше счётчика элементов масива выполняем цикол
                 if mraz[e]=IBV.fields[1].AsString then ir:=1;    //Если в ранее записаных значениях масива обнаружена единтичная запись текущей записи таблицы индикатор изменений приравниваем 1
                 e:=e+1                                           //Увеличиваем на 1 счётчик циклов
                 end;
                 if ir=0 then
                 begin
                 q:=q+1;
                 SetLength (mraz,q);
                 mraz[q-1]:=IBV.fields[1].AsString;
                 end;
                 
                 ir:=0;                                           //Обнуляем индикатор изменений
                 e:=0;                                            //Обнуляем счётчик циклов
                 while e<w do begin                               //Пока счётчик циклов строго меньше счётчика элементов масива выполняем цикол
                 if mkat[e]=IBV.fields[2].AsString then ir:=1;    //Если в ранее записаных значениях масива обнаружена единтичная запись текущей записи таблицы индикатор изменений приравниваем 1
                 e:=e+1                                           //Увеличиваем на 1 счётчик циклов
                 end;
                 if ir=0 then
                 begin
                 w:=w+1;
                 SetLength (mkat,w);
                 mkat[w-1]:=IBV.fields[2].AsString;
                 end;
                 IBV.Next;                                        //Переход на следующюю запись
                end;
                IBV.First;                                        //Переходим на первую запись в таблице
                end;

              Масивы обьявленны mraz и mkat объявленны вот сдесь:
              ExpandedWrap disabled
                private{ Private declarations }
                public { Public declarations }
                end;
                var
                  Form1: TForm1;
                  mraz: array of string;                          //Задаём динамический масив для выборки названий разделов
                  mkat: array of string;                          //Задаём динамический масив для выборки названий категорий

              Данная процедура выполняется для сканирования 2 и 3 калонок таблицы и записи всех неповторяющихся значений в два масива. Первый раз эта процедура выполняется при запуске программы последующие при обновлении базы (внесение в базу новых записей из внешних источников).
              Процедуру вызываю так:
              ExpandedWrap disabled
                analizsodergimogo(Sender);

              Поскольку во время работы программы обновление базы впринципе может быть произведено бесконечное количество раз то и вызов этой процедуры происходит бесконечное количество раз. Однако при неоднократном исполнение процедуры происходит ошибка:
              Цитата
              Access violation at address 00404A9B in module "1.exe". Read of addres 00003f88.


              Помогите. Где ошибка? Как исправить?
                Цитата qivi @
                Помогите. Где ошибка? Как исправить?

                ну тут на первый взгляд и не скажеш где ошибка. в этом случае тебе прийдется пошагого пройтись отладчиком несколько раз вызвав эту процедуру и смотрить что делается с переменными. по всей видимости в какомто месте вместо объекта подсовываются совсем другие данные вот и...
                  Цитата
                  вместо объекта подсовываются совсем другие данные


                  Что это значит? Что такое объект?
                    Цитата qivi @
                    Что это значит? Что такое объект?
                    ты в каком веке родился? я канешно извиняюсь но как можно пользоватся предметом и не знать как он называется? погугли про object и про ООП. просто копировать сюда инфу которая висит на всех программерских сайтаз чтитаю не правильно. да даже почитай любую книгу про делфи или Object Pascal.
                      А как выяснить какая у меня сейчас активная запись, её номер или что нибудь такое...
                      У меня в программе две таблицы волга дб, всё время пользователь работает только с первой, мне нужно при нажатие некой кнопки передти на ту же строку (по номеру) во второй таблице которая активна в первой таблице. Всё остальное время программа не обрабатывает вторую таблицу.
                      Сообщение отредактировано: qivi -
                        Для работы с Волгой нужны две библиотеки.
                        1. volgapak с примером и компонентами
                        2. volgaprofsource с VolgaTable, VolgaQuery, VolgaDataBase которых нет в Volgapak
                        Не прикрепляются почему-то.
                        Кому нужно пишите на basil_cat собака ukr точка net
                          Для работы с Волгой нужны две библиотеки.
                          1. volgapak с примером и компонентами
                          2. volgaprofsource с VolgaTable, VolgaQuery, VolgaDataBase которых нет в Volgapak
                          Прикреплённый файлПрикреплённый файлVOLGA.part1.rar (95 Кбайт, скачиваний: 783)
                          Прикреплённый файлПрикреплённый файлVOLGA.part2.rar (95 Кбайт, скачиваний: 767)
                          Прикреплённый файлПрикреплённый файлVOLGA.part3.rar (95 Кбайт, скачиваний: 765)
                          Прикреплённый файлПрикреплённый файлVOLGA.part4.rar (95 Кбайт, скачиваний: 792)
                          Прикреплённый файлПрикреплённый файлVOLGA.part5.rar (45,21 Кбайт, скачиваний: 786)
                            Это пример использования VolgaDB.
                            Все инструкшины в doc папке.
                            Доступ к базе неограниченного числа пользователей.
                            Базу и данные заданий можно хранить на сервере.
                            Прикреплённый файлПрикреплённый файлVOLGADb.part001.rar (97 Кбайт, скачиваний: 782)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part002.rar (97 Кбайт, скачиваний: 779)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part003.rar (97 Кбайт, скачиваний: 785)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part004.rar (97 Кбайт, скачиваний: 777)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part005.rar (97 Кбайт, скачиваний: 842)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part006.rar (97 Кбайт, скачиваний: 784)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part007.rar (97 Кбайт, скачиваний: 813)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part008.rar (97 Кбайт, скачиваний: 814)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part009.rar (97 Кбайт, скачиваний: 776)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part010.rar (97 Кбайт, скачиваний: 756)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part011.rar (97 Кбайт, скачиваний: 805)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part012.rar (97 Кбайт, скачиваний: 768)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part013.rar (97 Кбайт, скачиваний: 782)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part014.rar (97 Кбайт, скачиваний: 791)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part015.rar (97 Кбайт, скачиваний: 810)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part016.rar (97 Кбайт, скачиваний: 793)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part017.rar (97 Кбайт, скачиваний: 791)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part018.rar (97 Кбайт, скачиваний: 777)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part019.rar (97 Кбайт, скачиваний: 812)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part020.rar (97 Кбайт, скачиваний: 758)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part021.rar (97 Кбайт, скачиваний: 841)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part022.rar (97 Кбайт, скачиваний: 834)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part023.rar (97 Кбайт, скачиваний: 806)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part024.rar (97 Кбайт, скачиваний: 819)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part025.rar (97 Кбайт, скачиваний: 798)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part026.rar (97 Кбайт, скачиваний: 802)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part027.rar (97 Кбайт, скачиваний: 772)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part028.rar (97 Кбайт, скачиваний: 773)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part029.rar (97 Кбайт, скачиваний: 806)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part030.rar (97 Кбайт, скачиваний: 794)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part031.rar (97 Кбайт, скачиваний: 745)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part032.rar (97 Кбайт, скачиваний: 787)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part033.rar (97 Кбайт, скачиваний: 787)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part034.rar (97 Кбайт, скачиваний: 767)
                            Прикреплённый файлПрикреплённый файлVOLGADb.part035.rar (67,75 Кбайт, скачиваний: 749)
                              Цитата basil_cat @

                              Если нужны исходники то выложу.
                              Но там всё так сумрачно... Но работает ОК.
                              Применяется на предприятии.
                              И крепю VOLGADB_DESKTOP.rar - типа DATABase Desktop
                              Прикреплённый файлПрикреплённый файлVOLGADB_DESKTOP.part1.rar (97 Кбайт, скачиваний: 753)
                              Прикреплённый файлПрикреплённый файлVOLGADB_DESKTOP.part2.rar (97 Кбайт, скачиваний: 741)
                              Прикреплённый файлПрикреплённый файлVOLGADB_DESKTOP.part3.rar (97 Кбайт, скачиваний: 768)
                              Прикреплённый файлПрикреплённый файлVOLGADB_DESKTOP.part4.rar (97 Кбайт, скачиваний: 768)
                              Прикреплённый файлПрикреплённый файлVOLGADB_DESKTOP.part5.rar (97 Кбайт, скачиваний: 739)
                              Прикреплённый файлПрикреплённый файлVOLGADB_DESKTOP.part6.rar (7,54 Кбайт, скачиваний: 764)
                              Сообщение отредактировано: basil_cat -
                              0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)
                              0 пользователей:


                              Рейтинг@Mail.ru
                              [ Script execution time: 0,0545 ]   [ 26 queries used ]   [ Generated: 28.03.24, 09:30 GMT ]