| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

TMsgDlgButtons [D6, Win2k]

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

JohnJ ©   (2004-08-26 20:48:00) 

Мне надо сделать чтобы в MessageDlg кнопки были по выбору пользователя. Для этого я сделал следующее:

var mbBut:TMsgDlgButtons;
procedure a(tmbYes,tmbNo,tmbYesToAll,tmbNoToAll:boolean);
begin
 mbBut=[mbYes,mbNo,mbYesToAll];
 {???} if mbNoToAll then mbBut:=[mbBut,mbNoToAll]; {???}
 MessageDlg('Вот ваши кнопки:',mtWarning,mbBut,0);
end;

Строчка с {???} вызывает ошибку (Ordinal type required). Как сделать правильно? Подскажите пожалуйста.

---

Palladin   (2004-08-26 20:54:00) [21]

Include(mbBut,mbNoToAll)

---

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

Наверх