0 / 0 / 0
Регистрация: 20.01.2016
Сообщений: 74
1
SQLite

Ошибка при выполнении запроса

25.09.2016, 15:48. Показов 896. Ответов 0
Метки нет (Все метки)

Всем доброго времени суток.
В программе при выполнении SQL запроса выходит циклическая ошибка "Table is at End of File".
При выполнении запроса в SQLite Maestro ошибки нету.
Программа должна удалять выделенную строку в StingGrid из базы по нажатию кнопки и при условии что выбран нужный radiobutton, при всех остальных условиях все работает.
Вот код кнопки:
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
procedure TForm1.BitBtn1Click(Sender: TObject);
var a,p:integer;
s:string;
begin
   a:=0;
   if edit5.Text=''  then a:=1;
   if (radiobutton1.Checked=True) OR (edit5.Text=Stringgrid1.Cells[6, stringgrid1.Row]) then  a:=2;
   case a of
    0: begin
       p:=strtoint(Stringgrid1.Cells[6, stringgrid1.Row]);
       p:=p-strtoint(edit5.Text);
       s:='UPDATE Resistion SET KOL_VO ='+inttostr(p)+' WHERE ID = '+inttostr(stringgrid1.Row);
    end;
    1: begin
       p:=strtoint(Stringgrid1.Cells[6, stringgrid1.Row]);
       p:=p-1;
       s:='UPDATE Resistion SET KOL_VO ='+inttostr(p)+' WHERE ID = '+inttostr(stringgrid1.Row);
    end;
    2: s:='DELETE FROM Resistion WHERE ID =' + inttostr(stringgrid1.Row); //При выполнении данного запроса выходит ошибка
   end;
   showmessage(s); //Проверял верность запроса
    mybase.ExecSQL(s);
end;
В чем может быть ошибка?
Большое спасибо за ответы
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
25.09.2016, 15:48
Ответы с готовыми решениями:

Ошибка при выполнении запроса
Добрый вечер! (под вечер голова уже перестала работать) Есть простенькая БД, в ней одна таблица...

Ошибка при выполнении запроса Trying to store a string of length 30 into field that can only contain 20
Добрый день! Возникла проблема с IBQ... with IBQSPRED do begin close; SQL.Clear; ...

При выполнении запроса, зависает программа
Добрый день уважаемые форумчане и гуру Delphi. Подскажите пожалуйста. Выполняю такой код программы...

Мин и Макс в Fast report при выполнении запроса
Скажите я выполняю запрос, вес нормально работает так как надо, но когда я вывожу на печать или...

0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
25.09.2016, 15:48

Как убрать часики при выполнении SQL запроса?
Здраствуйте ребята, нужна срочная помощь. То что нужно сделать написано в названии темы.SQL запрос...

Ошибка при выполнении ADOCommand
Здравствуйте, подскажите что означает ошибка "Попытка выполнить запрос,который не включает...

Ошибка при выполнении базы
делал базуданных тел справочник. почти сделал и тут в конце выскакивает Project telephone.exe...

Ошибка при выполнении многошаговой операции
По нажатию на кнопку должна заполняться таблица ADOTABLE1, но не заполняется из за ошибки "Ошибка...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru