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

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

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

MessageDlg, три варианта ответа, да, нет, отмена. [D7, XP]

Страницы: 1 2 >
Zhekson © (2008-10-27 11:14:00)
С mrYesи mrNoвсё понятно elseразведёт, а вот как выйти на mrCancel, без исключения предыдущих двух вариантов???

app (2008-10-27 15:09:00) [1]
> Ega23 (27.10.2008 13:39:26) [26]

Умнее окажется модератор

{RASkov} (2008-10-27 13:41:00) [2]
> [26] Ega23 © (27.10.08 13:39)

Другой вопрос: Зачем было [26]? :о)
Не нужно на него отвечать и так все ясно....)

Ega23 (2008-10-27 13:39:00) [3]
Вот интересно: кто из вас окажется умнее и первым заглохнет?

{RASkov} (2008-10-27 13:33:00) [4]
А я - да. вечно тут хожу, поднимаю ветки старые и пытаюсь все время друг на друга всех натравить..... и уж точно никогда и никому и ни в чем не помогаю...
Эт моя работа такая :)))

> ну да, и с "ь" в слове гордиться ;)

А это мой стиль, так что - прими как есть :)

Zhekson (2008-10-27 13:30:00) [5]
{RASkov} © (27.10.08 13:24) [21]
ну да, и с "ь" в слове гордиться ;)

{RASkov} (2008-10-27 13:30:00) [6]
> [20] Zhekson (27.10.08 13:21)
> нашлись люди способные разобраться в сути моего недопонимания
> и помоч даже такому ореху, как я

Эт ты так думаешь.... Просто людям жалко стало сопливого и ноющего негодяя и они ему(тебе) протянули плоточек, который тебе давали еще в самом начале, но ты, как верно сам заметил - дурак, его выкинул....
:о)
Ладно, не обижайся. Просто будь вежливее.... Даже после [3] ибо тебе помощь нужна, а не другим тут...

{RASkov} (2008-10-27 13:25:00) [7]
> молдодец

без лишней "д". Сорри... :)

{RASkov} (2008-10-27 13:24:00) [8]
> [20] Zhekson (27.10.08 13:21)

Ты всё верно заметил, молдодец. Увы, только в первом предложении... ;)
И конфликт разжог ты, а не я. Можешь теперь гордится этим :)

Zhekson (2008-10-27 13:21:00) [9]
{RASkov} © (27.10.08 13:13) [17]
:))) тебе неинтересна суть ветки, ты сюда зашёл поднять с низов обсуждения оскорбления, чтобы убедить меня, что ты умный, а я дурак... Но хочу обратить твоё внимание, что нашлись люди способные разобраться в сути моего недопонимания и помоч даже такому ореху, как я, а от тебя вообще нет толку на этом форуме... Ты кроме разжигания конфликтов и самолюбования своими глубочайшими познаниями ничего не умеешь!!! Впринципе ты это всё и без меня и без инета знаешь.

На этом оставляю за собой право не воспринимать всерьёз ни тебя, ни твои умозаключения ;)

{RASkov} (2008-10-27 13:16:00) [10]
> [14] Zhekson (27.10.08 13:06)

ButRet := mrXuge :)

Zhekson (2008-10-27 13:13:00) [11]
Ega23 © (27.10.08 13:09) [15]
согласен, твой вариант симпоНтишнее смотрится... надеюсь когда-нибудь прийду к тому, чтобы исходить не только из работоспособности и относительной эстетики...

{RASkov} (2008-10-27 13:13:00) [12]
> [5] Zhekson (27.10.08 11:30)

Наглый ты. Тимур тебе еще в первом посту ответ правильный дал.... а уже в [3] он поставил диагноз, причем - верный.

Ega23 (2008-10-27 13:09:00) [13]

> Ega23, а может такой вариант не хуже???

С точки зрения работоспособности - однозначные варианты.
С точки зрения эстетики - твой мне не нравится. Но это субъективно, сам понимаешь.

Zhekson (2008-10-27 13:09:00) [14]
Правильный$Вася (27.10.08 13:02) [13]
да не... просто я не сразу вкурил, как присвоить возвращаемое значение ф-ции MessageDlg, для последующего анализа(((

Zhekson (2008-10-27 13:06:00) [15]
procedure TForm1.FormCloseQuery(Sender: TObject; var CanClose: Boolean); var ButRet: word; begin if modification = true then ButRet := MessageDlg('Ega23, а может такой вариант не хуже???', mtConfirmation, [mbYes, mbNo, mbCancel], 0); if ButRet = mrYes then if SaveDialog1.Execute then SaveProj(SaveDialog1.FileName); if ButRet = mrCancel then CanClose := false; end;

Правильный$Вася (2008-10-27 13:02:00) [16]

> возвращает значение выбранной кнопки... и предположим это
> Cancel, как его обработать не исклчая возможности, что могла
> быть нжата любая другая кнопка и она будет обработана???

т.е. ты сейчас утверждаешь, что функция может вернуть значение сразу ДВУХ нажатых кнопок, которые нужно отработать ВМЕСТЕ???

Ega23 (2008-10-27 12:58:00) [17]

> в какого типа переменную можно записать возвращаемое значение
> ф-ции MessageDLG???

case MesageDlg(......) of mrYes : DoOnMrYes(); mrNo : DoOnMrNo(); mrCancel : DoOnMrCancel(); else ShowMessage('Чё-то ты не то, братан, нажал...'); end;

Zhekson (2008-10-27 12:43:00) [18]
:)))

Virgo_Style © (27.10.08 12:42) [10]
согласен)))

понедельник)))

Virgo_Style (2008-10-27 12:42:00) [19]
орех

brother (2008-10-27 11:46:00) [20]
> function MessageDlg(const Msg: string; DlgType: TMsgDlgType;
> Buttons: TMsgDlgButtons; HelpCtx: Longint): Word;

Страницы: 1 2 >

Наверх

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