| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
тсключение EDBEngineError [D7]
defen © (2009-10-21 15:16:00)Здравствуйте. Недавно поднимал тему о исключениях... Надовали советов, но толком разобраться я не смог.
procedure SQLZapros;
var
SQLString:string;
begin
SQLString:='SELECT COUNT(*) AS Expr1 FROM usb WHERE id = '''+a+'''';
form1.Query1.Active:=false;
form1.Query1.SQL.Clear;
form1.Query1.SQL.Add(SQLString);
// перехват исключения
try
form1.Query1.Active:=true;
Except On E:EDBEngineError do EjectUSB()
end;
if form1.DBText1.Caption='1' then
else
EjectUSB();
end;
подсакажите что не так. после строкиform1.Query1.Active:=true;программа выдаёт ошибку при недоступной базе.
defen (2009-10-21 16:38:00) [41]А нефиг было сеть вырубать.... Ну а вообще. связь с базой временно. Хочу, чтобы база локально лежала, но обновлялась по сети...
Игорь Шевченко (2009-10-21 16:37:00) [42]
> Мрет прога и всё.
И че ?
Anatoly Podgoretsky (2009-10-21 16:37:00) [43]> defen (21.10.2009 16:35:41) [41]
И вот так уже 41 сообщение.
Медвежонок Пятачок (2009-10-21 16:37:00) [44]кстати, текст у дбтекста можно насильно изменить из другого приложения.
на время чека флеши по крайней мере.
дыра на дыре в общем.
defen (2009-10-21 16:35:00) [45]Ну вот так... Мрет прога и всё.
Медвежонок Пятачок (2009-10-21 16:35:00) [46]и все.
трибунал за пособничество врагу и измену родине
Медвежонок Пятачок (2009-10-21 16:34:00) [47]почему не зачет?
а ну как подойдет генерал с планом наступления на флешке?
а там ему отлуп так как анкновн датабас.
defen (2009-10-21 16:32:00) [48]
> как же так, дифен?такая важная система на страже родины,
> и вдруг анкновн датабасе.
я думаю не сложно догадаться, что один из способов обойти отключение флешки, вытащить шнурок из сетевухи. Так что стёб в не зачёт! :)
Сергей М. (2009-10-21 16:32:00) [49]
> Всё рухает насмерть
Это как ?)
defen (2009-10-21 16:29:00) [50]
> Ну и испугался что ли?Жми F9 и проваливайся в свой еджект
Не жмется.... Всё рухает насмерть...
Медвежонок Пятачок (2009-10-21 16:28:00) [51]'Unknown database
как же так, дифен?
такая важная система на страже родины, и вдруг анкновн датабасе.
"а если бы он вез патроны" ?
Медвежонок Пятачок (2009-10-21 16:25:00) [52]// Project raised exeption class EDBEngineError with message 'Unknown database.
Ну и испугался что ли?
Жми F9 и проваливайся в свой еджект
defen (2009-10-21 16:25:00) [53]Я уже отработал этот вариант. Паботает. Но мне хотелось бы разобраться с исключениями. :)
Сергей М. (2009-10-21 16:23:00) [54]
> defen © (21.10.09 16:17) [30]
Ну так разуй наконец глаза на [3] !
И разве это штопор ?)
Вполне внятная реакция на ожидаемое)
defen (2009-10-21 16:19:00) [55]
> А ты у нас стойкий партизан...
Уж и не знаю как расценивать подобное высказывание...
defen (2009-10-21 16:17:00) [56]Хм... почти.
// Project raised exeption class EDBEngineError with message 'Unknown database.
Anatoly Podgoretsky (2009-10-21 16:15:00) [57]
> У Вас, я так полагаю своеобразный способ ответов...
А ты у нас стойкий партизан...
Сергей М. (2009-10-21 16:11:00) [58]
> Прохожу код построчно... F7
Ну и ?
Вот дошагал ты успешно до
form1.Query1.Active:=true;
делаешь очередной шаг и чтовидишь выскочившее окошко с дословнойфразой "Я, программа, выдаю ошибку при недоступной базе" ?)
clickmaker (2009-10-21 16:09:00) [59]> после строкиform1.Query1.Active:=true; программа выдаёт
> ошибку при недоступной базе
а чего в этом странного? не понимаю
Плохиш (2009-10-21 16:08:00) [60]
> defen © (21.10.09 16:07) [25]
Образование в анкете поправь.
| |
Страницы: 