Ошибка выполнения Messagedlg

отредактировано 05:08 Раздел: FastScript
вызов
if MessageDlg(' текст ', mtWarning, [mbOk,   mbCancel], 0) = mrOK then
    begin ...
Выдает
Could not convert variant of type (Array Variant) into type (Integer)

Что не так?
Delphi6, FR 4.12.12

Комментарии

  • Stalker4Stalker4 123
    отредактировано 05:08
    написал: »
    вызов
    if MessageDlg(' текст ', mtWarning, [mbOk,   mbCancel], 0) = mrOK then
        begin ...
    
    Выдает
    Could not convert variant of type (Array Variant) into type (Integer)

    Что не так?
    Delphi6, FR 4.12.12
    "не так" то, что вы не читали документацию по FS. А там этот момент описан.

    Надо писать вот так:
    MessageDlg('текст', mtWarning, mbOk+mbCancel, 0)

Оставить комментарий

Многофункциональный текстовый редактор. Чтобы отредактировать стиль параграфа, нажмите TAB, чтобы перейти к меню абзаца. Там вы можете выбрать стиль. По умолчанию не выбран ни один стиль. Когда вы выберете текст, появится встроенное меню форматирования. Нажмите TAB, чтобы войти в него. Некоторые элементы, такие как многофункциональные вставки ссылок, картинок, индикаторов загрузки и сообщений об ошибок могут быть вставлены в редактор. Вы можете перемещаться по ним, используя стрелки внутри редактора и удалять с помощью клавиш delete или backspace.