Карта сайтаСсылкиКонтакты

Как изменить надписи кнопок на стандартном диалоговом окне

PDF Печать
Статьи

Как изменить стандартные надписи кнопок в диалоговом окне OpenDialog, SaveDialog и других? Допустим, у Вас есть форма с компонентом OpenDialog и Вам нужно изменить надписи кнопок Открыть и Отмена на какие-либо другие. Запишите этот код в событие OnShow компонента OpenDialog:


procedure TForm1.OpenDialog1Show(Sender: TObject);
begin
 { Открыть меняем на Открываем }
  SetDlgItemText (GetParent (OpenDialog1.Handle),
                  IDOK, PChar ('&Открываем')) ;
  {Отмена - на Не будем }
  SetDlgItemText (GetParent (OpenDialog1.Handle),
                  IDCANCEL, PChar ('&Не будем')) ;
end;

И вот результат:

Изменяем надписи кнопок на стандартном диалоговом окне TOpenDialog
 

Добавить комментарий


Защитный код
Обновить