Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2009.01.18;
Скачать: [xml.tar.bz2];

Вниз

MessageBox   Найти похожие ветки 

 
1234567   (2008-12-05 11:20) [0]

Еще один вопрос: Написал MessageBox, в котором можно устанавливать свой заголовок. А как сделать чтобы была активна кнопка закрыть в правом верхнем углу окна.  

function MessageInf(const Msg: string; const MsgCaption: string): Integer;
 begin
   Result := MessageBox(0, PChar(Msg), PChar(MsgCaption), MB_YESNO or MB_ICONINFORMATION);
 end;


 
Ega23 ©   (2008-12-05 11:28) [1]



Flag Meaning
MB_DEFBUTTON1 The first button is the default button. MB_DEFBUTTON1 is the default unless MB_DEFBUTTON2, MB_DEFBUTTON3, or MB_DEFBUTTON4 is specified.
MB_DEFBUTTON2 The second button is the default button.
MB_DEFBUTTON3 The third button is the default button.
MB_DEFBUTTON4 The fourth button is the default button.


 
clickmaker ©   (2008-12-05 11:30) [2]

> как сделать чтобы была активна кнопка закрыть в правом верхнем
> углу окна

а что она тогда должна означать: yes или no?


 
Правильный$Вася   (2008-12-05 11:30) [3]

это зависит от операционки


 
Сергей М. ©   (2008-12-05 11:32) [4]


> что она тогда должна означать: yes или no?


Видимо, она должна означать "может быть")


 
{RASkov} ©   (2008-12-05 12:39) [5]

Т.е. если вопрос не понятен пользователю, он этот диалог закрывает "крестиком" и программа перефразирует вопрос и т.д.....)


 
AndreyV ©   (2008-12-05 12:54) [6]

> [5] {RASkov} ©   (05.12.08 12:39)

А функция вернёт IDCROSS



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2009.01.18;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.156 c
2-1228248817
Тень
2008-12-02 23:13
2009.01.18
Метод сеток


15-1227391891
DillerXX
2008-11-23 01:11
2009.01.18
Фотожаба или нет?


2-1228767507
Platto
2008-12-08 23:18
2009.01.18
TComboBox


15-1226316049
aSa
2008-11-10 14:20
2009.01.18
Компонент как Object Inspector


2-1228165884
aKor
2008-12-02 00:11
2009.01.18
TDBChart





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский