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

Вниз

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

 
Vacek ©   (2006-02-12 18:57) [0]

Как установить нужную кнопку по умолчанию (если пишу:

[mbok,mbcancel]

, то по умолчанию ok)?
Как подвести окно кнопкой под курсор?


 
Гаврила ©   (2006-02-12 19:06) [1]


> Как установить нужную кнопку по умолчанию (если пишу:


А если использовать MessageBox? там можно по умолчанию флагами выставить

> Как подвести окно кнопкой под курсор?

А вот этого делать не надо, это идет в разрез с идеологией виндов. Есть же даже настройка "в диалоговых окнах стару ставить мышь на OK"


 
Desdechado ©   (2006-02-12 19:17) [2]

> мышь на OK
на кнопку по умолчанию


 
Vacek ©   (2006-02-12 20:37) [3]

1) Так ведь хочется по умолчанию сделать кнопку Cancel, и,
2) потом незря ведь у функции messagedlgpos, отведены входные переменный под координаты левого верхнего угла окна, а значит, для удобства пользователя(чтоб не бегать курсором по экрану), сделать по принципу, где нажал мышку, там же и кнопка cancel окна. Ведь получается удобно.


 
Desdechado ©   (2006-02-13 12:57) [4]

{----- запрос подтверждения действия -----}
function ConfirmYN( Mess: String; Title: String = "" ): Boolean;
begin
 if( Length( Title ) = 0 ) then
   Title := rc_Confirm;
 result := ( Application.MessageBox( PChar( Mess ), PChar( Title ),
                                     MB_YESNO or MB_ICONQUESTION or
                                     MB_DEFBUTTON2 or MB_APPLMODAL ) = IDYES );
end;


2. координаты для других целей указываются
наблюдал когда-нибудь, как ошибки прут рекой, при этом окошки с ними стекают в правый нижний угол?



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

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

Наверх





Память: 0.45 MB
Время: 0.038 c
6-1132249033
zjuka
2005-11-17 20:37
2006.02.26
Менять прокси через дельфи


2-1139421376
olevacho_
2006-02-08 20:56
2006.02.26
Вопрос по TidHHP


4-1134158169
cerber
2005-12-09 22:56
2006.02.26
EXE как ресурс. Как запустить?


15-1138713104
kozhanov
2006-01-31 16:11
2006.02.26
"резиновая" линия...


15-1139380777
TUser
2006-02-08 09:39
2006.02.26
Охрана труда





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский