相关疑难解决方法(0)

我正在使用Delphi,我想在MessageDlg的按钮中显示自定义文本,如此处所述.最好的方法是什么？

当我使用MessageDlg()如下代码的函数时：

if MessageDlg(SWarningWishToDelete + ' ' + PersonName + '?',
  mtWarning, [mbNo, mbYes], 0) = mrYes then

是/否按钮以英语而不是我的操作系统语言显示。我在互联网上搜索了它，但是，我只是找到了大而旧的解决方案。我想知道是否有一种简单/新的方法来改变它？

使用VCL,您可以使用CreateMessageDialog自定义按钮标题生成消息对话框.

随着FMX CreateMessageDialog似乎不再存在(自XE3以来).

除了从头开始重建消息对话框之外,有没有办法使用FireMonkey自定义按钮标题？

我希望能够调用这里描述的函数:

MessageDlg(
    'Really quit application ?', mtWarning,
    [ButtonInfo(mbNo, 'Do&n''t save'), 
     ButtonInfo(mbCancel, '&Cancel'),
     ButtonInfo(mbYes,'&Save')],
    mbYes
  );