|
发表于 2020-9-2 11:30:01
|
显示全部楼层
对话框提示信息[测试]
Application.MessageBox( 'aaa ',PChar(Label1.Caption),0);
Application.MessageBox( 'aaa ',PChar(Label1.Caption),1);有两个选择框
Application.MessageBox( 'aaa ',PChar(Label1.Caption),2);有三个选择框 终止重试忽略 无关闭
Application.MessageBox( 'aaa ',PChar(Label1.Caption),3);有三个选择框 是 否 取消 有关闭
Application.MessageBox( 'aaa ',PChar(Label1.Caption),4);有两个选择框 是 否 无关闭
|
|