Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 30.10.2007, 11:44   #1
Snake_ua
Пользователь
 
Регистрация: 25.09.2007
Сообщений: 66
По умолчанию Проблеммы функции MessageDlg

Вот допустим пример
MessageDlg('Выйти?' ,mtConfirmation ,[mbYes, mbNo] ,0)...
При компилировании этого рядка высвечивается диалоговое окно с кнопками Yes и No. Но мне необходимо, что-бы название кнопок были русскими. Как это сделать? Или это надо свою функцию описывать?

И еще. Что означает последний параметр, который в данном примере равняется нулю? Ну и как им пользоватся? Как перегружать эту функцию? В хелпе есть пример, суть которого в следующем
if MessageDlg('Welcome to my Delphi application. Exit now?',
mtConfirmation, [mbYes, mbNo], 0, mbYes) = mrYes then...
Я копирую с хелпа этот код, но прога не компилится, выдает ошибку "too many actual parameters". Когда я убираю "mbYes", то все идет как надо. Помогите разобратся
Snake_ua вне форума Ответить с цитированием
Старый 30.10.2007, 12:20   #2
Квэнди
Старожил
 
Аватар для Квэнди
 
Регистрация: 13.12.2006
Сообщений: 3,859
По умолчанию

function MessageDlg(const Msg: string; DlgType: TMsgDlgType; Buttons: TMsgDlgButtons; HelpCtx: Integer): Integer; overload;
или
function MessageDlg(const Msg: string; DlgType: TMsgDlgType; Buttons: TMsgDlgButtons; HelpCtx: Integer; DefaultButton: TMsgDlgBtn): Integer; overload;
ICQ не для вопросов, а для предложений. Для вопросов используйте форум
IRC канал клуба программистов|Мои статьи
Квэнди вне форума Ответить с цитированием
Старый 30.10.2007, 12:28   #3
Slovinsky
Пользователь
 
Регистрация: 26.10.2007
Сообщений: 79
По умолчанию

Цитата:
При компилировании этого рядка высвечивается диалоговое окно с кнопками Yes и No. Но мне необходимо, что-бы название кнопок были русскими. Как это сделать?
Не использовать MessageDlg, а, например, Application.MessageBox

Код:
if Application.MessageBox('Выйти?','Выход',MB_YESNO or 
  MB_ICONQUESTION) = mrYes 
then begin
  ...
end;
Slovinsky вне форума Ответить с цитированием
Старый 31.10.2007, 22:23   #4
Snake_ua
Пользователь
 
Регистрация: 25.09.2007
Сообщений: 66
По умолчанию

Slovinsky, спасибо)).
Квэнди, по поводу перегрузки я не понял чем мне єто может помочь(
Snake_ua вне форума Ответить с цитированием
Старый 01.11.2007, 08:08   #5
Квэнди
Старожил
 
Аватар для Квэнди
 
Регистрация: 13.12.2006
Сообщений: 3,859
По умолчанию

Это ответ на один из ваших вопросов
ICQ не для вопросов, а для предложений. Для вопросов используйте форум
IRC канал клуба программистов|Мои статьи
Квэнди вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Простой вопрос по MessageDlg Dimoney Общие вопросы Delphi 7 08.05.2008 19:16
Проблеммы с массивом Almost_Famous Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 4 21.04.2008 21:25
MessageDLG azat Общие вопросы Delphi 11 20.01.2008 09:25
Проблеммы с использованием функций работы со строками Copy и Pos Soso Общие вопросы Delphi 13 09.08.2007 16:01