Функции Delphi
Просмотров: 447

Функция MessageDlgPos – отображает сообщение и кнопки в заданной позиции экрана

Функция MessageDlgPos в Delphi отображает сообщение и кнопки в заданной позиции экрана.

Функция MessageDlgPos: Отображает диалог подтверждения

var
  buttonSelected : Integer;
begin
  // Показ подтверждающего диалога в 20,100
  buttonSelected := MessageDlgPos('Confirmation',mtError, mbOKCancel, 0, 20, 100);

  // Показ типа выбранной кнопки
  if buttonSelected = mrOK     then ShowMessage('Была нажата OK');
  if buttonSelected = mrCancel then ShowMessage('Была нажата Cancel');
end;

Функция MessageDlgPos: Отображает заказной диалог с заказным выбором кнопки

var
  buttonSelected : Integer;
begin
  // Показ подтверждающего диалога в координатах 20,100
  buttonSelected := MessageDlgPos('Custom dialog',mtCustom, [mbYes,mbAll,mbCancel], 0, 20, 100);

  // Показ типа выбранной кнопки
  if buttonSelected = mrYes    then ShowMessage('Была нажата Yes');
  if buttonSelected = mrAll    then ShowMessage('Была нажата All');
  if buttonSelected = mrCancel then ShowMessage('Была нажата Cancel');
end;

Помощь

Продукция и услуги

Main Menu