Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.25;
Скачать: [xml.tar.bz2];




Вниз

создание DBF - файла ..... 


rvs   (2002-04-04 12:11) [0]

Добрый день.

Подскажите , pls, как можно создать *.dbf файл в каталоге запуска программы. На подобие "select * from d7 into table xd7 "

Заранее благодарен.
Ветал.



Anatoly Podgoretsky   (2002-04-04 12:14) [1]

TTable, Databasename указать катлог программы
Tquery, create table "каталог программы.таблица"



VAleksey   (2002-04-04 12:20) [2]

Ничего не указывай в DataBaseName. По умолчанию таблица будет создаваться в текущий каталог.



Lusha   (2002-04-04 12:22) [3]

Для приведенного Вами примера наиболее подходящим, на мой взгляд, было бы использование TTable и его методов CreateTable и BatchMove.
В качестве параметра в BatchMove передавать TQuery с SQL текстом "select * from d7"...



Anatoly Podgoretsky   (2002-04-04 12:32) [4]

VAleksey (04.04.02 12:20)
А ты уверен, что текущий каталог будет именно каталогом программы



rvs   (2002-04-04 13:46) [5]

В общем сделал так :
With BatchMove1 do
begin
Source := Query1;
Destination:=Table1;
Mode:=batCopy;
Execute;
End;
//Создаю таблицу
Table1.CreateTable;
//Заполнение
BatchMove1.Execute;

В результате получаю таблицу xd7 в кодировке 1252 ??? А как изменить кодировку на 1251 ???(И правильно ли я выплняю 2 раза Execute ?)
И еще :
Ломается структура таблицы : был Numeric(6) -> Numeric(20.4). А можно ли с этим бороться ???

Заранее Всем огромное спасибо...
С уважением Ветал.



Lusha   (2002-04-04 14:13) [6]

With BatchMove1 do
begin
//Создаю таблицу
Table1.CreateTable;

Source := Query1;
Destination:=Table1;
Mode:=batAppend;
Execute;
End;


А я предлагал...
//Создаю таблицу
Table1.CreateTable;
Table1.BatchMove(Query1, batAppend);


Удачи...




Форум: "Базы";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.25;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.027 c
1-80865           inko                  2002-04-13 19:00  2002.04.25  
Как убрать приложение из автозапуска?


3-80835           MixVictor             2002-03-31 21:19  2002.04.25  
Установка фильтра


1-80860           Dx7                   2002-04-13 13:42  2002.04.25  
DDBLTFAST_DESTCOLORKEY & fx .ddckDestColorkey .dwColorSpaceHighVa


4-81120           Mover                 2002-02-19 10:58  2002.04.25  
Работа с Desktop


3-80794           vitnt2000             2002-04-03 06:42  2002.04.25  
SQL Запрос