Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.07.22;
Скачать: CL | DM;

Вниз

ENoResult (Error creating cursor handle)   Найти похожие ветки 

 
Darts   (2002-06-29 15:47) [0]

Есть Table1 и Query1. Table1 ссылается на какую-то таблицу. В Query1 создаю запрос на удаление в той же таблице по определенному условию

Вот код.

Bookmark := Datamodule2.Table1.GetBookmark;
with DataModule2.Query1 do begin
Close;
SQL.Clear;
SQL.Add(" DELETE FROM orders");
SQL.Add(" WHERE orderdate <= " + s1);
//SQL.SaveToFile("d:\11.sql");
Open;
end;
if DataModule2.Table1.BookmarkValid(Bookmark) = False then DataModule2.Table1.Last;



Как уйти от такой ошибки (ошибка создания позиции курсора)?

Можно ли обработать таким образом?

try
... вышеприведенный код
except
On ENoResult do begin
if DataModule2.Table1.BookmarkValid(Bookmark) = False then DataModule2.Table1.Last;
end;
end


 
Gonza ©   (2002-06-29 16:09) [1]


> with DataModule2.Query1 do begin
> Close;
> SQL.Clear;
> SQL.Add(" DELETE FROM orders");
> SQL.Add(" WHERE orderdate <= " + s1);
> //SQL.SaveToFile("d:\11.sql");
> Open;
> end;


Вместо Open пиши ExecSQL;


 
Darts   (2002-06-29 16:17) [2]

Совсем забыл про это. Спасибо!



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

Текущий архив: 2002.07.22;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.012 c
3-70660
Сержик
2002-07-02 11:45
2002.07.22
Как бы генератор установить на max?


14-70894
Sirus
2002-06-15 16:41
2002.07.22
Нужно работать с файлом *.DBF без BDE... То есть прога должна


1-70797
Smok_er
2002-07-09 09:47
2002.07.22
Система проговаривания времени


3-70594
KAA
2002-06-28 18:00
2002.07.22
Время выполнения запроса


1-70700
SuperVK
2002-07-11 10:09
2002.07.22
Как убрать первый нередактируемый столбец в TStringGrid?