Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как убрать сообщение и чтобы не вылетало / 8 сообщений из 8, страница 1 из 1
06.12.2002, 14:27:57
    #32076740
AndreiM
AndreiM
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как убрать сообщение и чтобы не вылетало
except
on E.EDatabaseError do ShowMessage('Ошибка выполнения запроса:');
end;

В программе я делаю запрос пишу в Memo1, когда он написан без ошибок, то
выполняется, а как только я спецом делаю ошибку, он выдает ошибку, но
там не написано "Ошибка выполнения запроса:" + ещё вылетает из проги.
Как сделать, чтобы просто выдавало сообщение, что введенный запрос неверен и не вылетало, а просто не делало запроса.

Спасибо.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.12.2002, 15:12:00
    #32076776
hDrummer
hDrummer
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как убрать сообщение и чтобы не вылетало
except
on E.EDatabaseError do ShowMessage('Ошибка выполнения запроса:');
end;

в коде ошибка
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.12.2002, 20:18:01
    #32076914
AndreiM
AndreiM
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как убрать сообщение и чтобы не вылетало
except
on E:EDatabaseError do ShowMessage('Ошибка выполнения запроса:');
end;

тоже не идет..
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.12.2002, 20:24:25
    #32076916
hDrummer
hDrummer
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как убрать сообщение и чтобы не вылетало
кинь полностью код
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.12.2002, 20:28:21
    #32076917
AndreiM
AndreiM
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как убрать сообщение и чтобы не вылетало
procedure TForm1.Button3Click(Sender: TObject);
begin
try
with ADOQuery1 do
begin
if Active then Close;
SQL.Clear;
SQL.Assign(Memo2.Lines);
Open;
end;
except
on E.EDatabaseError do ShowMessage('Ошибка выполнения запроса');
end;

end;
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.12.2002, 20:44:58
    #32076919
DmitryV
DmitryV
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как убрать сообщение и чтобы не вылетало
Привет!
А если вместо EDatabaseError использовать EOLEException?
Или кинь сюда сообщение об ошибке...

Удачи
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
06.12.2002, 20:56:11
    #32076921
AndreiM
AndreiM
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как убрать сообщение и чтобы не вылетало
Project Pr1.exe raised exception class EOleException with message
'[Microsoft][ODBC SQL Server Driver][SQL Server] Could not find stored proceedure
'Memo2''. Process stopped. Use Step or Run to continue.

А про EOLEException выдало, что не определён.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
08.12.2002, 10:31:43
    #32077067
aus
aus
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как убрать сообщение и чтобы не вылетало
except
on Exception do ShowMessage('........');
end;

Т.е. для любого исключения.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Как убрать сообщение и чтобы не вылетало / 8 сообщений из 8, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение  
Полит. конфиден.  
созд. / загр.: 933ms
Закрыть
start [/forum/search_topic.php?author=BronsonAG&author_mode=last_posts&do_search=1]:
 0ms
get settings:
 11ms
get forum list:
 20ms
get settings:
 13ms
get forum list:
 19ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 155ms
get topic data:
 8ms
get forum data:
 6ms
get page messages:
 52ms
get tp. blocked users:
 2ms
others: 641ms
total:  933ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]