552
社区成员
发帖
与我相关
我的任务
分享
#include <dialogs.hpp>
MessageDlgPos("消息内容", mtConfirmation,
TMsgDlgButtons() << mbYes << mbNo, 0, 100, 100);
TForm1 *Form1;
//TMsgDlgType和TMsgDlgButtons 注意大小写
//可以正常弹出对话框了
extern PACKAGE int __fastcall MessageDlgPos(const AnsiString Msg,TMsgDlgType DlgType,TMsgDlgButtons Buttons,int HelpCtx,int X,int Y);
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormCreate(TObject *Sender)
{
MessageDlg("can you use messagedlg?",mtConfirmation,TMsgDlgButtons()<<mbYes<<mbNo,0);
}