类似MSN的消息窗口(摘)

最新推荐文章于 2023-02-15 15:01:06 发布
最新推荐文章于 2023-02-15 15:01:06 发布
阅读量89 收藏
点赞数
分类专栏： JavaScript
[code]
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>popWin</title>
<SCRIPT>
var oPopup = window.createPopup();
var popTop=100;
function popmsg(msgstr){
var winstr="<table style=\"border: 1 solid #FFA6CA\" width=\"241\" height=\"172\" border=\"0\" cellpadding=\"0\" cellspacing=\"0\" background=\"04-s.jpg\" >";
winstr+="<tr><td height=\"30\"> </td></tr><tr><td align=\"center\"><table width=\"90%\" height=\"110\" border=\"0\" cellpadding=\"0\" cellspacing=\"0\">";
winstr+="<tr><td valign=\"top\" style=\"font-size:12px; color: red; face: Tahoma\">"+msgstr+"</td></tr></table></td></tr></table>";
oPopup.document.body.innerHTML = winstr;
popshow();
}
function popshow(){
//window.status=popTop;
if(popTop>11720){
clearTimeout(mytime);
//oPopup.hide();
return;
}
else if(popTop>1520&&popTop<1720){
oPopup.show(screen.width-250,screen.height,241,1720-popTop);
}
else if(popTop>1500&&popTop<1520){
oPopup.show(screen.width-250,screen.height+(popTop-1720),241,172);
}
else if(popTop<180){
oPopup.show(screen.width-250,screen.height,241,popTop);
}
else if(popTop<220){
oPopup.show(screen.width-250,screen.height-popTop,241,172);
}
popTop+=10;
var mytime=setTimeout("popshow();",50);
}
popmsg(" <img border=\"0\" src=\"http://www.blueidea.com/img/common/logo.gif\" width=\"90\" height=\"27\">欢迎光临蓝色理想，大量的设计资源等着你!有什么问题可以到经典论坛提出。");

</SCRIPT>





</head>

<body>

</body>

</html>

[/code]
wenzi_li
关注
  • 0
    点赞
  • 踩
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
专栏目录
Delphi TMsnPopup 控件代码，仿MSN提示窗口.rar
07-10
Delphi TMsnPopup 控件代码，仿MSN提示窗口，用来在Delphi中实现提示框的小控件，下载包内是代码，没有包括示例。文件列表：MsnPopup.dcr、MsnPopup.pas。
Delphi中用API实现在MSN的信息提示 [Delphi/Kylix]
我的IT之旅
06-02 167
我是比较喜欢用MSN的，因为它的信息提示比较独特，所有的聊天软件都是弹出一个常规的WINDOWS对话框，而它却好像是从任务栏里冒出来的。想想了，在DELPHI这样的纯OOP工具里加一个API应该不难实现，花了十来分钟终于搞出来了，以下是实现方法： 　　1、建立一个APPLICATION，将两个按钮放置到主窗体FROM1中，分别为button1和button2。 ...
delphi电子邮件收发编程讲解与实例
机器喵的休闲生活
04-21 3508
在delphi中TNMPop控件 -------接收电子邮件,pop3 pop3协议自身命令 命令     说明 USER     向pop3服务器器传递用户名 PASS     向pop3服务器器传递用户密码 STAT     获取当前用户的邮件数 LIST     获取邮件标号和大小 BETR     获取邮件的全部信息，包括邮件头和邮件内容 TOP     获取邮件头 DELE     删除
类似MSN、Foxmail消息提示控件
净心编程
01-10 1511
类似MSN、Foxmail消息提示控件 整理日期：2004年10月25日 运行环境：Windows环境 授权形式：共享软件 推荐程度：  下载次数：519 文件尺寸：231K 下载类型：源码下载--Delphi源码 作    者：未知  下载链接：链接1　  下载简介：类似于MSN、Foxmail的消息提示控件源代码，可以定时消失，和MSN或Foxmail的一样，送给广大有需要的朋友。
delphi中的事件和消息
数据库天地
03-21 288
delphi中的事件和消息 windows事件和消息机制 Delphi消息处理机制 键盘事件 鼠标事件 1、 windows事件和事件驱动程序编程 处理windows发往应用程序的消息一直是传统windows编程的关键内容之一，深刻理解windows的消息机制是编写出优秀windows应用程序的基础。 事件是组件的重要组成部分，它是连接对应的系统事件和为此而编写的代码。 不需要大...
DELPHI的消息处理机制
最新发布
s13596191285的博客
02-15 381
Delphi 是Borland 公 司提 供 的 一 种 全 新 的WINDOWS 编 程 开 发 工 具. 由 于 它 采 用 了 具有 弹 性 的 和 可 重 用 的 面 向 对 象Pascal(object-oriented pascal) 语言, 并 有 强 大 的 数 据 库 引 擎(BDE), 快 速 的 代 码 编 译 器, 同 时又 提 供 了 众 多 出 色 的 构 件. 受 到 广 大 编 程 人 员 的 青 睐. 在众 多 的 编 程 语 言( 如VB,PowerBuilder,Pow
Delphi的消息机制探索
在水一方
05-22 987
第一部分：流程概述        这是一个很大的题目，本人才疏学浅难免有纰漏之处，还请大家多多见谅！        虽然这篇文章是讨论Delphi的消息机制，但是如果不知道Windows的程序是如何运转的，就根本无从下手，所以先费点口沫，让我们回顾一下Windows的消息机制。        让我们先从一张图开始：        这张图大概说明了Window的消息处理流
delphi中Message消息的使用方法
crkres9527
05-19 3394
unit Unit1;      interface   uses   Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;   const   WM_ME=WM_USER+100; //自定义消息；   type   TForm1 = class(
Delphi 三种气泡提示效果
kevinzhaoyp
02-27 4086
一、方法一 说明：这个效果不好，鼠标必须放在按钮上，气泡提示才可以出来，如果鼠标在按钮的范围之外，         用回车键点击按钮也不会激活气泡提示。 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Std
MSNPopUp使用方法
Hank's Techblog
11-07 1622
很简单的：  MSNPopUp1.ClosePopUps;  MSNPopUp1.Title := 提示标题;  MSNPopUp1.Text := 提示内容;  MSNPopUp1.TimeOut   :=   3;//停顿时间，3秒结束后会自动关闭   MSNPopUp1.ShowPopUp;
delphi2010实现windows系统MSNPopup弹窗
06-09
实现了在Windows XP/7 操作系统的桌面右下角弹出类似MSN的popup的提示框的功能，压缩包文件是完整的delphi2010工程代码。可以在delphi2010中直接打开编译。弹窗支持自动定时关闭、自动堆叠显示，自定义背景图片等功能。 直接使用了DELPHI盒子(2ccc)的MSNPopup 5.0的组件。修改了背景颜色(图片)不能填满窗体的bug。希望能够帮到您！
delphi2010实现弹出MSNPopup提示框示例代码
07-05
实现Windows XP/7等操作系统桌面右下角弹出类似MSN的popup提示框，可定时自动关闭，自动叠加显示，自定义背景图片等。使用了DELPHI盒子(2ccc)的MSNPopup 5.0的组件，修改了背景颜色(图片)不能填满窗体的bug。压缩包文件是完整的delphi2010的工程代码。
TMsnPopup （MSN弹出效果组件）
09-15
TMsnPopup （MSN弹出效果组件） TMsnPopup （MSN弹出效果组件）
MsnPopup
06-18
在delphi中实现msn方式的弹出窗口的控件
MSN Popup Form
05-13
实现类似MSN的消息弹出窗口的功能，包含源码的控件 实现方法如下： MSNPopUp1.ClosePopUps; MSNPopUp1.Title := '提示标题'; MSNPopUp1.Text := '提示内容'; MSNPopUp1.TimeOut := 3;//停顿时间，3秒结束后会自动关闭 MSNPopUp1.ShowPopUp
Delphi 最小化程序到任务栏托盘 增加右键PopMenu
雅荷沁兰的专栏
04-02 5120
在做中间层时，中间层往往不需要点击关闭时立刻关闭，而是最小化到托盘。故而特意隐藏关闭按钮功能。        1）隐藏退出功能 用PopMenu退出菜单代替              1.增加popMenu退出菜单，绑定到窗体              2.增加变量控制是否真的退出b_isClose;//True 退出 False 不退出              3.初始化b_i
Delphi中的线程类
宋威的专栏
01-29 916
http://www.delphibbs.com/keylife/iblog_show.asp?xid=4786Delphi中有一个线程类TThread是用来实现多线程编程的，这个绝大多数Delphi书藉都有说到，但基本上都是对TThread类的几个成员作一简单介绍，再说明一下Execute的实现和Synchronize的用法就完了。然而这并不是多线程编程的全部，我写此文的目的在于对此作一个补
在delphi线程中实现消息循环
08-25 199
Delphi的TThread类使用很方便,但是有时候我们需要在线程类中使用消息循环,delphi没有提供.花了两天的事件研究了一下win32的消息系统,写了一个线程内消息循环的测试.但是没有具体应用过,贴出来给有这方面需求的DFW参考一下.希望大家和我讨论.{-----------------------------------------------------------------...
Delphi控件使用经验札记
疯流人物
03-16 2398
1、notebook的使用 Pages属性里添加page 右键点击notebook， next page|Previous page，然后把控件加到页面上
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值