Текущий архив: 2004.06.06;
Скачать: CL | DM;
Вниз
Вопрос про сообщения Найти похожие ветки
← →
hgd (2004-05-27 22:54) [0]Есть такой текст:
if MessageDlg("Заменить существующий файл " + ExtractFileName("\"+Edit12.Text+".txt") + "?", mtConfirmation, [mbYes, mbNo], 0) = IDYes then
Так вопрос вот в чем, как можно заменить заголовок окна (открывающегося с английского на свой).
← →
Гаврила © (2004-05-27 22:57) [1]Используй Application.MessageBox или просто MessageBox вместо MessageDlg - сам будешь задавать текст заголовка и прочие параметры.
Не понимаю, зачем Borland вообще ввел эти функции - MessageDlg и прочее. Имхо, отстой полный
← →
hgd (2004-05-27 23:14) [2]А как переделать
if MessageDlg("Заменить существующий файл " + ExtractFileName("\"+Edit12.Text+".txt") + "?", mtConfirmation, [mbYes, mbNo], 0) = IDYes then
под
Application.MessageBox
← →
jack128 © (2004-05-27 23:20) [3]
> Не понимаю, зачем Borland вообще ввел эти функции - MessageDlg
> и прочее. Имхо, отстой полный
ради некоторых кнопок, которых нет в messagebox"e (mbYesToAll и тд)
← →
Гаврила © (2004-05-27 23:29) [4]
> А как переделать
> if MessageDlg("Заменить существующий файл " + ExtractFileName("\"+Edit12.Text+".txt")
> + "?", mtConfirmation, [mbYes, mbNo], 0) = IDYes then
>
> под
>
> Application.MessageBox
if MessageBox(handle, PChar("Заменить существующий файл " + ExtractFileName("\"+Edit12.Text+".txt"), "Твой заголовок", MB_YESNO or MB_ICONQUESTION) = ID_YES then...
← →
Гаврила © (2004-05-27 23:30) [5]то есть = IDYES
Страницы: 1 вся ветка
Текущий архив: 2004.06.06;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.058 c
