//显示消息提示框
//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 弹出提示窗口使用帮助(下)的更多相关文章
-
AlertWindowManager 弹出提示窗口使用帮助(上)
LookAndFeel(界面外观): NativeStyle:本地化界面为真实用系统内置外观 SkinName:本地化界面(NativeStyle:)设置为假可使用皮肤外观 OptionAnimate ...
-
MyEclipse弹出提示窗口
MyEclipse弹出提示窗口 1.弹窗如下
-
解决win10 cmd运行python弹出windows应用商店下python应用程序
方法一: 1.我一开始下载完python后,忘记下载到哪个位置,在win10底下输入框搜索python,点击打开文件所在位置,所在位置是python快捷键的位置,直接复制进行环境配置 配置完环境变量后 ...
-
ALV屏幕捕捉回车及下拉框事件&;ALV弹出框回车及下拉框事件
示例展示: 屏幕依据输入的物料编码或下拉框物料编码拍回车自动带出物料描述: 点击弹出框,输入物料编码拍回车带出物料描述,点击确认,更新ALV: 1.创建屏幕9000,用于处理ALV弹出框: 2.针对屏 ...
-
iframe弹出框js ie6下存在bug
ie6的iframe在第一次加载的显示不出来,显示空白,但是很奇怪,刷新就可以正常显示了,一开始以为这只是IE6下iframe加载的bug,但是最后结果发现这是ie6下javascript延迟加载出现 ...
-
firefox浏览器中 bootstrap 静态弹出框中select下拉框不能弹出(解决方案)
问题出现场景1: 在firefox浏览器中在bootstrap弹出的modal静态框中再次弹出一个静态框时 select下拉框不能弹出选项 解决方案:去掉最外层静态框的 tabindex=" ...
-
bootstrap弹出提示窗口功能
大家常用弹出提示成功或失败时候喜欢用alert,如果不用这个,写个弹窗又麻烦,bootstrap中就有个方法 alert("操作成功"); commonAlert("操作 ...
-
jQuery实现鼠标选中文字后弹出提示窗口效果
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/ ...
-
Cadence——每次启动软件弹出找不到license文件的提示窗口
1. 摘要 按照Cadence16.60,每次启动该软件,总弹出提示窗口,内如大致为:Orcad Capture license was not found.... 2. 解决方法 参考此链接:htt ...
随机推荐
-
【转】Laravel+Angularjs+D3打造可视化数据,RESTful+Ajax
http://897371388.iteye.com/blog/1975351 大致思路也就是下面,由于最近在学Laravel也在学Angularjs,加上之前做的项目用到了d3. 原来的方案如下: ...
-
Dictionary 的使用
1. 定义字典变量,并初始化 // 元素值字典 Dictionary<string, string> dic = new Dictionary<string, string>( ...
-
给定一个数组A[0,1,...,n-1],请构建一个数组B[0,1,...,n-1],其中B中的元素B[i]=A[0]*A[1]*...*A[i-1]*A[i+1]*...*A[n-1]。不能使用除法。
// test14.cpp : 定义控制台应用程序的入口点. // #include "stdafx.h" #include<iostream> #include< ...
-
zenmap 的扫描方式
第一种:Intense scan (nmap -T4 -A -v) 一般来说,Intense scan可以满足一般扫描 -T4 加快执行速度 -A 操作系统及版本探测 -v 显示详细的输出 第二种:I ...
-
【HDOJ】1483 Automatic Correction of Misspellings
水模拟题. /* 1483 */ #include <cstdio> #include <cstring> #include <cstdlib> #define M ...
-
nodejs弯路-01之&#39;express&#39; 不是内部或外部命令
最近正想用node+angular+mongodb来完成一个小项目,三样都算是从零开始学习吧. 一开始是想用express -e projectname去创建一个ejs模板的项目.(一两句话就可以把大 ...
-
laravel中实现短信发送验证码
前段时间想实现一个短信验证码的功能,但是卡了很长时间. 首先我用的是阿里云的短信服务业务,其首次接入流程如下: 在阿里云上开通短信服务后需要做的: 1,申请签名 2,申请模板 3,创建Acces ...
-
IdentityServer4 中文文档 -12- (快速入门)添加外部认证支持
IdentityServer4 中文文档 -12- (快速入门)添加外部认证支持 原文:http://docs.identityserver.io/en/release/quickstarts/4_e ...
-
20165235 祁瑛 2018-4 《Java程序设计》第七周学习总结
20165235 祁瑛 2018-4 <Java程序设计>第七周学习总结 教材学习内容总结 MySQL数据管理系统 MySQL数据管理系统,简称MySQL,是世界上流行的数据管理系统. M ...
-
PHP快速排序(递归)
日常的排序算法中,快速排序是其中一种.实现起来相对简单. 假设有一个数组,有若干(N)个元素(数字且无序),需要对其进行从小到大的排序. 快速排序的思路是怎么样的呢? 取一个中间值,然后,用其他数组元 ...