Модальный диалог да/нет

@klynxe · Регистрация: 07.09.2012

Студворк — интернет-сервис помощи студентам

Как вызвать ShowMessage (или как еще) что бы появилось модальное окно с вопросом и кнопками да/нет?
и после вызова в продолжении функции соответственно выбрать дествия в зависимости от нажатой кнопки. И что бы при нажатии на закрыть оно приравнивалось к кнопке No

@volvo · 24.09.2013, 21:09

C++
1
2
3
4
5
6
7
8
    if(MessageDlg(L"Сообщение", mtConfirmation, TMsgDlgButtons() << mbYes << mbNo, 0) == mrYes)
    {
        // нажата "Да"
    }
    else
    {
        // нажата "Нет"
    }

@klynxe · 24.09.2013, 21:14 **[ТС]**

И еще вопрос не по этой теме
int INT=0;
использую CheckListBox3->Items->AddObject("текст",(TObject*)INT);
как в одну переменную записать текст, а в другую инт?

@volvo · 24.09.2013, 21:18

В какую другую переменную? У тебя тут вообще одна переменная.

@klynxe · 24.09.2013, 21:22 **[ТС]**

Я добавляю объект название "текст" и сам объект int как записать отдельно название и int?

@volvo · 24.09.2013, 21:25

Да куда записать-то? Ты и записываешь, в Items->Objects будет значение int-а, а отображаться будет строка "текст", нормально объяснить, чего надо - не в состоянии?

@klynxe · 24.09.2013, 21:30 **[ТС]**

Хочу в переменную AniSrtring aaa= название нужного объекта, в переменную int bbb= значение объекта
то есть aaa="текст" bbb=0

@nick42 · 24.09.2013, 23:44

Вот так, если на пальцах:

C++
1
2
3
4
5
6
7
8
9
10
11
12
void __fastcall TForm1::Button1Click(TObject *Sender)
{
     int AA[5] = { 11, 22, 33, 44, 55 } ;
     CheckListBox1->Items->Objects[0] = (TObject*)AA[0] ;
     CheckListBox1->Items->AddObject("Third",(TObject*)AA[1]);
     CheckListBox1->Items->AddObject("Fourth",(TObject*)AA[2]);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
    Caption = IntToStr((int)CheckListBox1->Items->Objects[1]) ;
}

в боксе изначально одна строчка. По кнопке1 добавляется еще две со своими "объектами" (int) и первой строчке тоже придается "объект". А по кнопке2 в заголовок улетает "объект" второй строчки (22) (это из рабочей программы...).

Добавлено через 7 минут
П.С. .. и, понятное дело, - строку извлечь: Label1->Caption=CheckListBox1->Items->Strings[1] ;

@klynxe · 26.09.2013, 00:30 **[ТС]**

Сообщение от nick42

CheckListBox1->Items->Strings[1] ;

Это самое понятное я и не мог понять)

@klynxe · 06.10.2013, 23:50 **[ТС]**

MessageDlg(L"Сообщение", mtConfirmation, TMsgDlgButtons() << mbYes << mbNo, 0)
Как сюда в текст сообщения прибавить данные типа AnsiString? То есть как вывести что-то вроде "Вы уверне что хотите удалить строку:"+aaa. Где aaa переменная типа AnsiString

Ddv122 · 07.10.2013, 00:00

klynxe, Наверно так

C++
1
2
AnsiString a=" Проверка";
MessageDlg(String(L"Ñîîáùåíèå") + AnsiString (a).c_str(), mtConfirmation, TMsgDlgButtons() << mbYes << mbNo, 0);

Можно и так

C++
1
2
AnsiString a=" Проверка";
MessageDlg( String("Сообщение") + a, mtConfirmation, TMsgDlgButtons() << mbYes << mbNo, 0);

Не знаю как лучше...

Новые блоги и статьи Все статьи Все блоги /
Отчёт о затраченных материалах за определенный период с макетом печатной формы Maks 21.04.2026 Отчёт из решения ниже размещён в конфигурации КА2. Задача: показать затраченные материалы за определённый период, с возможностью вывода печатной формы отчёта с шапкой и подвалом. В качестве. . .	Отчёт о спецтехнике находящейся в ремонте Maks 20.04.2026 Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .	Памятка для бота и "визитка" для читателей "Semantic Universe Layer (Слой семантической вселенной)" Hrethgir 19.04.2026 Сгенерировано для краткого описания по случаю сборки и компиляции скелета серверного приложения. И пусть после этого скажут, что статьи сгенерированные AI - туфта и не интересно. И это не реклама -. . .	Запрет удаления строк ТЧ документа при определённом условии Maks 19.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа. . .
Модель заражения группы наркоманов alhaos 17.04.2026 Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .	Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.

@klynxe 12 / 12 / 4 Регистрация: 07.09.2012 Сообщений: 542

	Модальный диалог да/нет 24.09.2013, 20:46. Показов 6333. Ответов 10 Метки нет (Все метки) Как вызвать ShowMessage (или как еще) что бы появилось модальное окно с вопросом и кнопками да/нет? и после вызова в продолжении функции соответственно выбрать дествия в зависимости от нажатой кнопки. И что бы при нажатии на закрыть оно приравнивалось к кнопке No 0

@klynxe 12 / 12 / 4 Регистрация: 07.09.2012 Сообщений: 542
	24.09.2013, 21:14 [ТС]
	И еще вопрос не по этой теме int INT=0; использую CheckListBox3->Items->AddObject("текст",(TObject*)INT); как в одну переменную записать текст, а в другую инт? 0

@volvo Супер-модератор 33421 / 21527 / 8240 Регистрация: 22.10.2011 Сообщений: 36,935 Записей в блоге: 12
	24.09.2013, 21:18
	В какую другую переменную? У тебя тут вообще одна переменная. 0

@klynxe 12 / 12 / 4 Регистрация: 07.09.2012 Сообщений: 542
	24.09.2013, 21:22 [ТС]
	Я добавляю объект название "текст" и сам объект int как записать отдельно название и int? 0

@volvo Супер-модератор 33421 / 21527 / 8240 Регистрация: 22.10.2011 Сообщений: 36,935 Записей в блоге: 12
	24.09.2013, 21:25
	Да куда записать-то? Ты и записываешь, в Items->Objects будет значение int-а, а отображаться будет строка "текст", нормально объяснить, чего надо - не в состоянии? 0

@klynxe 12 / 12 / 4 Регистрация: 07.09.2012 Сообщений: 542
	24.09.2013, 21:30 [ТС]
	Хочу в переменную AniSrtring aaa= название нужного объекта, в переменную int bbb= значение объекта то есть aaa="текст" bbb=0 0

@klynxe 12 / 12 / 4 Регистрация: 07.09.2012 Сообщений: 542
	06.10.2013, 23:50 [ТС]
	MessageDlg(L"Сообщение", mtConfirmation, TMsgDlgButtons() << mbYes << mbNo, 0) Как сюда в текст сообщения прибавить данные типа AnsiString? То есть как вывести что-то вроде "Вы уверне что хотите удалить строку:"+aaa. Где aaa переменная типа AnsiString 0