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

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

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

как создать сообщение-ошибка

Джон © (2005-05-28 16:09:00)
Здравствуй Народ!
Обычно когда мы что-то не так делаем, то вылазеет ошибка. Хотелось бы узнать, а как в своей программе сделать сообщение об ошибке, не создавая дополнительную форму!
Подскажите пожалуйста!

KilkennyCat (2005-05-29 00:49:00) [1]
там же.

Anatoly Podgoretsky (2005-05-29 00:46:00) [2]
Просто Джо © (28.05.05 23:27) [16]
А это где прописывать?

KilkennyCat (2005-05-29 00:25:00) [3]

> А где это прописывать то?

в середине любого екзешника. Выдаст ошибяку обязательно.

Просто Джо (2005-05-28 23:27:00) [4]
Ой.

Marser (2005-05-28 23:23:00) [5]

>Джон (28.05.05 16:51) [12][Ответить]
>Хорошо, хорошо, я всё понял. Только...
> А где это прописывать то?

Положим, что это не стёб. Тогда зачем тебе это нужно с таким уровнем? Напугать какого-то чайника?

Хинт (2005-05-28 22:07:00) [6]
Application.MessageBox('Ой Ой Ой','Ошибка',MB_ICONERROR);

Marser (2005-05-28 17:00:00) [7]
"Человек, который смеется" Виктор Гюго
Человек который стебется". Кто сегодня?

Джон (2005-05-28 16:51:00) [8]
Хорошо, хорошо, я всё понял. Только...
А где это прописывать то?

Marser (2005-05-28 16:38:00) [9]

>MessageDlg('Ой!',
> mtError, [mbYes, mbNo], 0)

MessageDlg('Ой!',
mtError, [mbOk], 0)

Marser (2005-05-28 16:33:00) [10]
Да ничего я не забыл. [5] означает, что я "упал под стол". Почему? Отвечу:

>else
>begin
>
> ShowMessage;

Конечно не проходит. Надо было нажать F1 и увидеть, что процедуре нужен строковой параметр.
ShowMessage('Ой!')

> MessageDlg

Аналогично, ещё и точка с запятой пропущены:
MessageDlg('Ой!',
mtError, [mbYes, mbNo], 0)

>raise
> Exception.Create ('ошибка');

Тут всё правильно.

1. Тебе дали три варианта.
2. Только третий дали в готовом виде.
3. Читай хелп, книги и то, что выдаёт компилятор.

ferr (2005-05-28 16:32:00) [11]
:)))

Virgo_Style (2005-05-28 16:32:00) [12]
Нет слов ))))

Джон (2005-05-28 16:31:00) [13]
Получилось вот что :
EPFKGFWNJK!
МНЕ ЭТО СЛОВО НЕ О ЧЕМ НЕ ГОВОРИТ, А МОЖЕТ ТЫ ПЕРЕПУТАЛ ЕЩЁ ЯЗЫКИ ПРОГРАММИРОВАНИЯ

Джон (2005-05-28 16:28:00) [14]
Marser, ты забыл переключить язык клавиатуры.
Ну ладно уж так, попробую превести.

Marser (2005-05-28 16:23:00) [15]
упалпацтол...

Джон (2005-05-28 16:22:00) [16]
else
begin

ShowMessage;
вот здесь что-то не прокатывает!
MessageDlg

raise
Exception.Create ('ошибка');
end;
Почему?

Marser (2005-05-28 16:15:00) [17]

> Просто Джо © (28.05.05 16:14)

:-)

Просто Джо (2005-05-28 16:14:00) [18]
ShowMessage
MessageDlg
raise Exception.Create ('Ошибка');
еще варианты :) ?

Marser (2005-05-28 16:14:00) [19]
messagedlg
messagebox
raise Exception.create('Ой!')

Наверх

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