Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 01.12.2009, 15:27
onelucky onelucky вне форума
Прохожий
 
Регистрация: 01.12.2009
Сообщения: 7
Репутация: 10
По умолчанию ошибка при открытии запроса

Помогите Начинающему.
значит так, закрываю таблицу создаю запрос на создание или удаление поля вот при открытии запроса выскакивает ошибка:"Error Creating cursor handle "
код
form1.table1.close;."
form1.query1.close; ...
form1.query1.sql.clear ;
form1.qery1.sql.add('alter table "..."') ;
form1.qery1.sql.add('add ... ') ;
form1.query1.open ; //вот здесь возникает ошибка
form1.table1.open;

Последний раз редактировалось onelucky, 01.12.2009 в 15:49.
Ответить с цитированием
  #2  
Старый 01.12.2009, 15:31
Аватар для TOJluK
TOJluK TOJluK вне форума
Местный
 
Регистрация: 25.02.2009
Адрес: Минск
Сообщения: 551
Версия Delphi: 2007
Репутация: 110
По умолчанию

попробуй вместо open выполнить exec
Ответить с цитированием
  #3  
Старый 01.12.2009, 17:37
Аватар для NIch
NIch NIch вне форума
Продвинутый
 
Регистрация: 02.06.2008
Адрес: Бендеры ПМР
Сообщения: 754
Репутация: 2446
По умолчанию

Поправлю вместо Open...
form1.query1.ExecSQL;
__________________
В начале был Бит, потом Байт и только потом появилось Слово...
Ответить с цитированием
  #4  
Старый 01.12.2009, 21:08
onelucky onelucky вне форума
Прохожий
 
Регистрация: 01.12.2009
Сообщения: 7
Репутация: 10
По умолчанию

Цитата:
Сообщение от NIch
Поправлю вместо Open...
form1.query1.ExecSQL;

Спасибо все заработало, а теперь следующая ошибка:
........
form1.table1.Close ;
form1.Query1.Close;
form1.Query1.SQL.Clear;
form1.Query1.SQL.Add('ALTER TABLE "......."');
form1.Query1.SQL.Add('ADD Data_'+l+' Date');

form1.Query1.ExecSQL;

form1.table1.Open ; // Вот здесь возникает ошибка "Field 'Data_l' not found"

Открывается пустая таблица. А в самой таблице (на диске) поле удаляеся.
Ответить с цитированием
  #5  
Старый 01.12.2009, 23:16
Аватар для NIch
NIch NIch вне форума
Продвинутый
 
Регистрация: 02.06.2008
Адрес: Бендеры ПМР
Сообщения: 754
Репутация: 2446
По умолчанию

Может найдешь ответ...
http://www.weblibrary.biz/mysql/sint...intaksis-alter
__________________
В начале был Бит, потом Байт и только потом появилось Слово...
Ответить с цитированием
  #6  
Старый 02.12.2009, 06:15
onelucky onelucky вне форума
Прохожий
 
Регистрация: 01.12.2009
Сообщения: 7
Репутация: 10
По умолчанию

Спасибо буду пытать
Ответить с цитированием
  #7  
Старый 04.12.2009, 13:30
Petrechkiv Petrechkiv вне форума
Прохожий
 
Регистрация: 04.12.2009
Сообщения: 2
Репутация: 10
По умолчанию

Проверь в таблице с которой работаешь имя соответствующего поля, имена полей в запросе должны совпадать с именами полей в таблице
Ответить с цитированием
  #8  
Старый 04.12.2009, 14:14
Аватар для TOJluK
TOJluK TOJluK вне форума
Местный
 
Регистрация: 25.02.2009
Адрес: Минск
Сообщения: 551
Версия Delphi: 2007
Репутация: 110
По умолчанию

Чо за база? Транзакцию подтверждаешь?
Ответить с цитированием
  #9  
Старый 04.12.2009, 14:30
onelucky onelucky вне форума
Прохожий
 
Регистрация: 01.12.2009
Сообщения: 7
Репутация: 10
По умолчанию

База локальная dbf.
Для редактирования таблицы использую динамические создаваемые компоненты tDBEdit, при добавлннии поля в таблицу все нормально проходит, а при удалении поля происходит эта ошибка. Так как компоненты были созданы динамически я не знаю как его удалить с формы до открытия таблицы.
Ответить с цитированием
  #10  
Старый 04.12.2009, 15:27
Аватар для TOJluK
TOJluK TOJluK вне форума
Местный
 
Регистрация: 25.02.2009
Адрес: Минск
Сообщения: 551
Версия Delphi: 2007
Репутация: 110
По умолчанию

Так удалить компонент
Код:
Form1.FindComponent('имя_компонента').Free;
Ответить с цитированием
  #11  
Старый 04.12.2009, 21:14
onelucky onelucky вне форума
Прохожий
 
Регистрация: 01.12.2009
Сообщения: 7
Репутация: 10
По умолчанию

Да, спасибо, была еще одна причина, но разобрался.
Всем огромное спасибо за участие !!!
Ответить с цитированием
Ответ


Delphi Sources

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

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 10:13.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025