Вниз
Скачать: CL | DM;

Создание таблицы при помощи SQL-файла   Найти похожие ветки 

 
russko ©   (2004-04-28 08:20) [0]

Есть SQL файл:
Create table :pNew  (N  Char(5),
     Shifr    Char(50),
                   Name     Char(50),
                   Sluz     Char(10) );
В проге пишу:
DataModule2.Query1.SQL.LoadFromFile(path+"\SQL\Create_Table.sql");
DataModule2.Query1.ParamByName("pNew").AsString := edit1.text;

а он ругается на первую строку, мол Token: ?


 
ЮЮ ©   (2004-04-28 08:24) [1]

Имя таблицы не может быть параметром вообще, а в твоем случае, особенно


 
russko ©   (2004-04-28 08:32) [2]

как её можно тогда задать?


 
ЮЮ ©   (2004-04-28 08:46) [3]

DataModule2.Query1.SQL.Text :=
 "Create table " + edit1.text + "  (N  Char(5), ..."

Только, повторюсь, странный подход к проектированию БД.
1) Таблица есть набор сущностей и должна называться соответственно. Тогда уж и поля назови  F1,F2,F3. Откуда взялись эти Shifr , Name, Sluz? И где PrimaryKey?
2) Как ты далее собираешься использовать БД названия таблиц которой тебе не известны?


 
russko ©   (2004-04-28 08:50) [4]

Названия полей известны, а вот имя нет, оно задаётся


 
ЮЮ ©   (2004-04-28 09:02) [5]

>Названия полей известны, а вот имя нет, оно задаётся

Ну-ну... Или ты пишешь программу для работы с одним файлом .db наперед определенной структуры, а не с БД Paradox? Тогда уж работай c типизмрованнвм файлом. Зачем тебе Paradox?


 
DarkMan   (2004-04-28 09:18) [6]

Попробуй так DataModule2.Query1.Parameters.Refresh()


 
Aleksey V.P.   (2004-04-28 14:37) [7]

Вместо
Create table :pNew  (N  Char(5),
    Shifr    Char(50),
                  Name     Char(50),
                  Sluz     Char(10) );
Используй
Create table %s  (N  Char(5),
    Shifr    Char(50),
                  Name     Char(50),
                  Sluz     Char(10) );
Далее
DataModule2.Query1.SQL.LoadFromFile path+"\SQL\Create_Table.sql");
DataModule2.Query1.SQL.Text := Format( DataModule2.Query1.SQL.Text, [strTableName]);



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.024 c
14-1083833901
pasha_golub
2004-05-06 12:58
2004.05.23
SPAM. Месть начинается.


1-1084353607
andrey__
2004-05-12 13:20
2004.05.23
TServiceApplication - как завершить приложение


1-1083785480
solo
2004-05-05 23:31
2004.05.23
Злобный RichEdit!!!


1-1084118003
Aaa
2004-05-09 19:53
2004.05.23
Реализация TImage а заданной формы?


6-1080817720
Delpher_Gray
2004-04-01 15:08
2004.05.23
Блокирующиеся сокеты




   Наверх