Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Помогите сгенерировать сообщение об ошибке!!! [D7, XP]

Sapos © (2007-02-13 10:14:00)
Здравствуйте!
Я использую comboBox для выбора имени таблицы, с которой я буду работать (имена таблиц сохраняются и подгружаются из файла), как мне сгенерировать сообщение об ошибке в том случае, если под конретным алиасом выбранной таблицы не существует (например: "Выбранная таблица отсутствует, выбирите другую"), чтобы сам дельфи не генерировал исключительную ситуацию и не прерывал работу программы.

Заранее Спасибо!!!

Sapos (2007-02-13 11:06:00) [1]
ВСЕМ СПАСИБО!!! Заработало, нормально, сойдет!!!

Sapos (2007-02-13 10:50:00) [2]

> Query1.Open;

Я использую Table - с ним работать будет?

Sapos (2007-02-13 10:48:00) [3]

> On e : EDatabaseError do // Почитай про эти ошибки
> //On e : Exception do

здесь после e: нужно какой-то код ошибки добавлять или как? мне он отдает ошибку EDBEngineError

Elen (2007-02-13 10:37:00) [4]

> Sapos © (13.02.07 10:28) [9]

А может будет проще воспользоваться хелпом по BDE и DbiGetErrorInfo вместе с try, в котором база открывается?

Neket (2007-02-13 10:37:00) [5]
Query1.close;
Query1.SQL.Clear;
If StrZapros <> '' then
Query1.SQL.Add(StrZapros+'order by 2')
else
begin
messageDlg('Пустой запрос', mtError, [mbOK], 0);
exit;
end;
try
Query1.Open;
except
On e : EDatabaseError do // Почитай про эти ошибки
//On e : Exception do
begin
messageDlg(' Ой Ой Ой.... Ошибочка - '+e.message,mtError,[mbOK],0);
exit;
end;
end;

Sapos (2007-02-13 10:28:00) [6]

> ShowMessage('Ошибка!');

Это-то понятно, меня интересует тот код, который будет как-то искать или что-то вроде этого имена файлов и если его не существует, то генерить ошибку...

Sapos (2007-02-13 10:28:00) [7]

> учи матчасть.
> потом TSession.GetTableNames

в смысле матчасть? не совсем понял...

clickmaker (2007-02-13 10:27:00) [8]

> [5] Sapos © (13.02.07 10:26)

учи матчасть.
потом TSession.GetTableNames

Separator (2007-02-13 10:27:00) [9]
напиши в дельфякх try, шелкни на него левой кнопкой мыши и нажми F1

Sapos (2007-02-13 10:26:00) [10]

> как пользоваться try...except знаешь?

К сожалению даже и не знаю что это такое(((

Sapos (2007-02-13 10:25:00) [11]

> движок БД какой?

Paradox на BDE

novill (2007-02-13 10:19:00) [12]
как пользоваться try...except знаешь?

clickmaker (2007-02-13 10:19:00) [13]

> Sapos © (13.02.07 10:14)

движок БД какой?

Джо (2007-02-13 10:19:00) [14]
> чтобы сам дельфи не генерировал исключительную ситуацию
> и не прерывал работу программы.

ShowMessage('Ошибка!');

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »