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

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

Вернуться   Форум программистов > Операционные системы > Софт
Регистрация

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 10.02.2010, 14:57   #21
BARNEY
Участник клуба
 
Регистрация: 23.04.2009
Сообщений: 1,058
По умолчанию

Serge_Bliznykov
2) делаете вставку записей через TDBF

Если вам не трудно буду благодарен , от мысли ставить MS OLE DB Visual FoxPro на 40 машин, меня бросает в дрож
Если вам человек помог, не стесняйтесь говорить спасибо (весы под аватаром)
BARNEY вне форума Ответить с цитированием
Старый 10.02.2010, 14:58   #22
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,792
По умолчанию

ODBC говорите?
Значит рассказываю

Настраиваем ODBC (предположим нет еще у нас таблицы и БД не создана)

1) Кидаем ADOQuery
2) В ConnectionString по кнопке Build выбираем Поставщик данных ODBC Driver
3) в Подключении птичку ставим на "Использовать строку подключения"
4) Жмакаем "Сборка"
5) Вводим имя нового подключения допустим "DBF мое" - жмем "создать"
6) Выбираем один из микрософтовских дров для dBase(dbf)
7) Далее вводим имя источника допустим "Мой источник"
8) Готово

Ну версию можно выбрать, ну это по вкусу
Ок. Ок. Ок. - проверка подключений.
Если все ок. то имеем право написатьтакое:
Код:
ADOQuery1.SQL.Text:='create table tab1 (q integer)';
ADOQuery1.ExecSQL;
Выполняем.

Смотрим. хм... Куда же он его создал? Мдя... проблема.
Чепуха - найдем тот файлик Мой источник.dsn
в котором написано где находитяс база
Цитата:
DefaultDir=D:\_Projects\Delphi_proj ects\eView\eView16 Lucia
Хм... Идем туда - Вау!!! Да вот же наши tab1.DBF
открываем - смотрим, работает

Все. Делов то. И никакого фокспро не нужно, единственная проблема максимальная версия этого файла давно устарела, но это не страшно - смысл подключения остается тем же.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 10.02.2010, 15:14   #23
BARNEY
Участник клуба
 
Регистрация: 23.04.2009
Сообщений: 1,058
По умолчанию

Вау... а слабо написать?

11 размер ,2 количество знаков после запятой.
Numeric тип поля

Тема
http://programmersforum.ru/showthrea...&highlight=dbf
Код:
ADOQuery1.SQL.Text:='create table tab1 (TARIFF Numeric 11 2)';
ADOQuery1.ExecSQL;
Если вам человек помог, не стесняйтесь говорить спасибо (весы под аватаром)

Последний раз редактировалось BARNEY; 10.02.2010 в 15:32.
BARNEY вне форума Ответить с цитированием
Старый 10.02.2010, 15:54   #24
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,792
По умолчанию

Я ж сказал - единственная проблема максимальная версия этого файла давно устарела.

Если ты связался с DBF то будь готов понести потери при работе в сети, или при отсетствии драйверов, работающих по более новым технологиям.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 11.02.2010, 07:19   #25
BARNEY
Участник клуба
 
Регистрация: 23.04.2009
Сообщений: 1,058
По умолчанию

Я давно работаю под FireBird . Dbf узаконенный формат между базами. Не могу выбрать другой, в нём мне приносят исходные данные и в него я обязан залить нужные мне. Проблему создания чудесным образом решил Tdbf , осталось понять как туда, с помощью него, залить данные.
Если вам человек помог, не стесняйтесь говорить спасибо (весы под аватаром)
BARNEY вне форума Ответить с цитированием
Старый 11.02.2010, 11:15   #26
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

Цитата:
Проблему создания чудесным образом решил Tdbf , осталось понять как туда, с помощью него, залить данные.
пример кода во вложении.
будут вопросы-проблемы - милости прошу!
Вложения
Тип файла: rar TDBFExamples_EXE.rar (210.1 Кб, 38 просмотров)
Тип файла: rar TDBFExamples.rar (2.3 Кб, 48 просмотров)
Serge_Bliznykov вне форума Ответить с цитированием
Старый 11.02.2010, 15:13   #27
BARNEY
Участник клуба
 
Регистрация: 23.04.2009
Сообщений: 1,058
По умолчанию

Serge_Bliznykov
Спасибо большое
Мини отчёт:
Текстовые вещи вставляет нормально...
Пока проблема с датами и с дробными числами. т.е. дробное число больше 1 целого знака не хочет вставлять , а дату вставляет как текст... и только год...
пока борюсь
Если вам человек помог, не стесняйтесь говорить спасибо (весы под аватаром)
BARNEY вне форума Ответить с цитированием
Старый 11.02.2010, 15:37   #28
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

BARNEY, 1) а выложите пример BASE.DBF с парой/другой заполненных строчек (разумеется, не мне Вас учить — БЕЗ конфиденциальных даннных - только тестовый набор!!!)

2) один мой альтернативно одарённый приятель придумал такую схему - он функции своей программы вытащил в отдельные DLL, которые уже "дёргал" из основной программы. Как он объяснил, при компиляции этих функций, у него установлены всякие нужные компоненты, а основной модуль он потом может компилировать на Delphi, на которой этих компонентов нет. У меня очень большие сомнения в целесообразности подобного подхода, НО! В Вашем случае, чем вызван переход на Delphi 2010 ?! может быть, взять старую, добрую, проверенную Delphi 7, на ней написать модуль, сохраняющий переданные в него данные (хоть через память построчно, хоть через промежуточный файл любого формата - вплоть до текстового или XML) в этот злополучный DBF нужного формата и забыть об этой проблеме?!

p.s. хотя я бы добил работу TDBF!!! благо все исходники есть и можно отследить, где, как и что пишется!
Serge_Bliznykov вне форума Ответить с цитированием
Старый 16.02.2010, 10:10   #29
BARNEY
Участник клуба
 
Регистрация: 23.04.2009
Сообщений: 1,058
По умолчанию

вот такой файл мне приносят и такой я должен сотворить 1.zip

Serge_Bliznykov
верю и жду вашего наставления
Если вам человек помог, не стесняйтесь говорить спасибо (весы под аватаром)

Последний раз редактировалось Stilet; 16.02.2010 в 10:33.
BARNEY вне форума Ответить с цитированием
Старый 02.04.2010, 09:23   #30
kxekxe
 
Регистрация: 02.04.2010
Сообщений: 7
По умолчанию

Цитата:
Сообщение от Serge_Bliznykov Посмотреть сообщение
его и не будет там. Это надо ставить отдельно.
Он полностью бесплатен.
Взять Microsoft OLE DB Provider for Visual FoxPro
можно на сайте Microsoft:
Microsoft OLE DB Provider for Visual FoxPro 8.0
Microsoft OLE DB Provider for Visual FoxPro 9.0.0.3504
только там есть определённый нюанс, если работа будет происходить с таблицами DBF с кодировкой OEM (866 таблица), то я рекомендую использовать вариант с отпатченной кодовой таблицей:
Код:
заменить E4->E3 
в v 8.0 это по смещению 0004b43c

в v 9.0 это по смещению 00055BF1
должно получиться так:

░.0C0D5BE3: E81E500400                   call       .00C11AC06  ----- (6)
░.0C0D5BE8: 85C0                         test        eax,eax
░.0C0D5BEA: 0F8534D0FCFF                 jne        .00C0A2C24  ----- (7)
░.0C0D5BF0: BEE3040000                   mov         esi,0000004E3 ;"  у"
░.0C0D5BF5: E92AD0FCFF                   jmp        .00C0A2C24  ----- (8)
░.0C0D5BFA: 214508                       and         [ebp][08],eax
░.0C0D5BFD: E9BCE9FCFF                   jmp        .00C0A45BE  ----- (9)
мы используем в реальной работе v8.0 т.к. есть огромная база с текстовым полем (ФИО), так вот, при запросах по этому полю провайдер VFP v9.0 явно не использует имеющийся индекс (формат индекса .CDX), а v8.0 использует (время выполнения запроса НА ПОРЯДОК меньше). с чём связано и как побороть неясно, поэтому и оставили в работе версию v8.0.

во-вторых, сегодня на руборде человечек под ником xrusik
выложил такое:
я, разумеется, не проверял, что там и как, поэтому используйте на свой страх и риск.
p.s. файлик небольшой, поэтому позволил себе прикрепить его к сообщению.

внимание! внутри архива Tdbf_D2010.rar действительно лежат исходники и пакет TDBF под Delphi2010, но работоспособность не проверял!
подскажите пожалуйста как пропатчить эту самую кодовую таблицу? где её найти?
kxekxe вне форума Ответить с цитированием
Ответ


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

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

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


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Установка TDBF в Delphi 2007 TIgor4 Компоненты Delphi 0 30.10.2009 14:04
Delphi 2010 beemoto Общие вопросы Delphi 6 22.09.2009 13:57
Как правильно использовать компонент TDBF SadStar Компоненты Delphi 0 27.03.2009 02:48
компонент TDBF furstenberg Компоненты Delphi 2 27.03.2008 19:23