//显示消息提示框
//function TdxAlertWindowManager.Show(const ACaption, AText: string; AImageIndex: TcxImageIndex = -1): TdxAlertWindow;
//ACaption显示标题
//AText消息内容
//AImageIndex显示图片索引
procedure TForm1.Button1Click(Sender: TObject);
begin
dxAlertWindowManager1.Show('消息提示框标题', '这里是消息内容,这里是消息内容!');
end;
//dxAlertWindowManager点击按钮事件
procedure TForm1.dxAlertWindowManager1ButtonClick(Sender: TObject; AAlertWindow: TdxAlertWindow; AButtonIndex: Integer);
begin
if AButtonIndex = then
ShowMessage('Button1')
else if AButtonIndex = then
ShowMessage('Button2')
else if AButtonIndex = then
ShowMessage('Button3');
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
dxAlertWindowManager1.Show('这里是标题','这里是内容');
ShowMessage(IntToStr(
// 获取目前打开的消息框个数,打开后数量加一,关闭后数量减一
dxAlertWindowManager1.Count
));
end;
var
AlertWindow: TdxAlertWindow; // 增加一条消息
procedure TForm1.btnAppMsgClick(Sender: TObject);
begin
AlertWindow.BeginUpdate;
AlertWindow.MessageList.Add('故乡(接上)', '故乡的面貌' + ## + '却是那样一般惆怅的模样' + ## + '仿佛迷雾里的招手', );
//合并显示用AlertWindow.MessageList.Add()方法
//如果独立显示消息提示框用dxAlertWindowManager1.Show()方法
AlertWindow.EndUpdate;
end; // 显示一条消息,并设置高度宽度自适应
procedure TForm1.btnShowMsgClick(Sender: TObject);
begin
dxAlertWindowManager1.OptionsSize.AutoHeight := True;
dxAlertWindowManager1.OptionsSize.AutoWidth := True;
AlertWindow := dxAlertWindowManager1.Show('故乡', '故乡的月' + ## + '是一把炽热的火' + ## + '总会在寒蝉凄切的夜' + ## + '释放出舒心的暖', );
end;

消息显示效果如下

AlertWindowManager 弹出提示窗口使用帮助(下)的更多相关文章

  1. AlertWindowManager 弹出提示窗口使用帮助(上)

    LookAndFeel(界面外观): NativeStyle:本地化界面为真实用系统内置外观 SkinName:本地化界面(NativeStyle:)设置为假可使用皮肤外观 OptionAnimate ...

  2. MyEclipse弹出提示窗口

    MyEclipse弹出提示窗口 1.弹窗如下

  3. 解决win10 cmd运行python弹出windows应用商店下python应用程序

    方法一: 1.我一开始下载完python后,忘记下载到哪个位置,在win10底下输入框搜索python,点击打开文件所在位置,所在位置是python快捷键的位置,直接复制进行环境配置 配置完环境变量后 ...

  4. ALV屏幕捕捉回车及下拉框事件&ALV弹出框回车及下拉框事件

    示例展示: 屏幕依据输入的物料编码或下拉框物料编码拍回车自动带出物料描述: 点击弹出框,输入物料编码拍回车带出物料描述,点击确认,更新ALV: 1.创建屏幕9000,用于处理ALV弹出框: 2.针对屏 ...

  5. iframe弹出框js ie6下存在bug

    ie6的iframe在第一次加载的显示不出来,显示空白,但是很奇怪,刷新就可以正常显示了,一开始以为这只是IE6下iframe加载的bug,但是最后结果发现这是ie6下javascript延迟加载出现 ...

  6. firefox浏览器中 bootstrap 静态弹出框中select下拉框不能弹出(解决方案)

    问题出现场景1: 在firefox浏览器中在bootstrap弹出的modal静态框中再次弹出一个静态框时 select下拉框不能弹出选项 解决方案:去掉最外层静态框的 tabindex=" ...

  7. bootstrap弹出提示窗口功能

    大家常用弹出提示成功或失败时候喜欢用alert,如果不用这个,写个弹窗又麻烦,bootstrap中就有个方法 alert("操作成功"); commonAlert("操作 ...

  8. jQuery实现鼠标选中文字后弹出提示窗口效果

    <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/ ...

  9. Cadence——每次启动软件弹出找不到license文件的提示窗口

    1. 摘要 按照Cadence16.60,每次启动该软件,总弹出提示窗口,内如大致为:Orcad Capture license was not found.... 2. 解决方法 参考此链接:htt ...

随机推荐

  1. [Android Studio] Using NDK to call OpenCV

    NDK才是Android开发通向超高薪之路.(这句话,似乎四年前有云) 难点在于常用的non-free module (sift and surf) unsw@unsw-UX303UB$ pwd /h ...

  2. 网络编程 -- RPC实现原理 -- NIO单线程

    网络编程 -- RPC实现原理 -- 目录 啦啦啦 Class : Service package lime.pri.limeNio.optimize.socket; import java.io.B ...

  3. nginx-启动|关闭|重新加载配置文件的命令

    1.1 进入操作目录 D: cd D:\NginxTest\nginx-1.10.2 1.2 启动指令 nginx -c conf\nginx.conf 1.3 关闭指令 nginx -s stop ...

  4. day_4_24 py

    ''' 函数的嵌套调用应用 ''' # def print_line(): # print("="*50) # def print_5_line(): # i = 0 # whil ...

  5. nodejs----http系统模块使用和fs系统模块

    ----- const http=require("http"); const fs=require("fs"); var httpserver=http.cr ...

  6. Tif文件合并类

    using System; using System.Collections; using System.Collections.Generic; using System.Drawing; usin ...

  7. vins-mono源码解读

    https://blog.csdn.net/q597967420/article/details/76099409

  8. MFC实现一元稀疏多项式运算器

    MFC实现一元稀疏多项式运算器 基本要求 输入并建立两个多项式 多项式a与b相加,建立和多项式c 多项式a与b相减,建立差多项式d 输出多项式a, b, c, d.输出格式:比如多项式a为:A(x)= ...

  9. 为何串口dma发送数据可能不完整

    串口dma数据发送不完整, 1. 通过打印log说明数据合成,送给dma buff都是正常的. 2. 数据通过硬件串口直接配置,是正常的 3. 数据通过单片机dma转发后数据异常,通过检查发现 dma ...

  10. vue中导入外面文件(css,js)方式

    有时我们需要导入外面的css文件(例如reset.css文件,bootstrap.css,jQuery.js文件),通常可通过import "name.css"的形式 对于rese ...