`
ch_kexin
  • 浏览: 898966 次
  • 性别: Icon_minigender_2
  • 来自: 青岛
社区版块
存档分类
最新评论

AS3动态文本框支持单击事件

 
阅读更多
AS3动态文本框支持单击事件 用TextEvent.LINK 事件 将动态文本框显示类型为html 事件格式:"<a href='event:" + tarLink + "'>" + tarLink + "</a>";

/**
   * 创建聊天条目
   * @param tarType 聊天类型
   * @param tarLink 角色名
   * @param tarStr 聊天内容
   * @param txtColor 文字颜色
   * @return
   */
   private function createLink(tarType:String,tarLink:String,tarStr:String,txtColor:String):String {
            var link:String = "";
    link += "<font color='#" + txtColor + "'>";
    link += tarType + " ";
            link += "<b>";
            link += "<a href='event:" + tarLink + "'>" + tarLink + "</a>";
            link += "</b>";
    if(tarType=="[个人]") link += "对您说:" + tarStr;
    else link += "说:" + tarStr;
    link += "</font>";
            return link;
        } 

meslist_txt.addEventListener(TextEvent.LINK, linkHandler);

/**
   * 动态文本框中的角色名单击事件
   * @param e
   */
   private function linkHandler(e:TextEvent):void {
    _channel = "user";
    this.channel_txt.textColor = 0xFF9900;
    this.channel_txt.text = "个人";
    //
    this.input_txt.text = e.text + " ";
   }
分享到:
评论

相关推荐

    VB在文本框中实现单击窗体的次数

    在这个案例中,我们将探讨如何在VB应用程序中实现一个功能,即每当用户单击窗体时,文本框(TextBox)将显示单击的次数。这涉及到事件处理和变量的使用,是基础的编程概念。 首先,我们需要创建一个新的VB窗体项目...

    VB 单击双击的共同使用

    在VB中,你可以为任何具有焦点的控件如按钮、文本框等添加单击事件的处理代码。例如,对于一个名为`btnClick`的按钮,我们可以这样定义它的单击事件: ```vb Private Sub btnClick_Click() ' 这里编写单击事件的...

    隐藏文本框控件的环境菜单(又一方法)

    ### 隐藏文本框控件的环境菜单(又一方法) #### 概述 本文将详细介绍一种用于隐藏文本框控件环境菜单的方法,并通过提供的VB(Visual Basic)代码示例来展示其实现过程。该方法相较于其他常见实现方式更为强大且...

    在窗体中建一个文本框和时间控件,可以在文本框中显示跳动的服务器时间

    Dim cnn As New ADODB.Connection Dim cmd As New ADODB.Command Dim rst As New ADODB.Recordset Dim Sqlser_time cnn.ConnectionString = "driver={SQL Server};" & _ "server=server;uid=sa;pwd=;database=master...

    动态增加删除TextBox组件

    描述中提到的“鼠标单击窗体的任意地方生成TextBox控件”可以通过处理窗体的MouseDown事件来实现。在事件处理程序中,获取鼠标点击位置,并使用上述代码动态创建TextBox,确保它位于点击位置。 对于“单击鼠标选择...

    VB自动生成控件并实现单击

    VB提供了多种内置控件,如按钮、文本框、标签等,可以通过代码动态创建。以下是一个创建按钮控件的例子: ```vb Dim myButton As New Button myButton.Name = "myButtonClick" ' 控件的唯一标识 myButton.Text = ...

    精彩编程与编程技巧-防止用户编辑文本框控件中的内容...

    - 编写Command1的Click事件处理程序,在其中调用`SendMessage`函数来设置文本框为只读状态: ```vb Private Sub Command1_Click() Dim RetVal As Long RetVal = SendMessage(Text1.hWnd, EM_SETREADONLY, True,...

    VB常用控件的事件详解

    文本框控件的事件主要用于响应用户的输入行为,如: 1. **Change** 当文本框中的内容改变时触发,处理过程原形如下: ``` Private Sub Text_Change() ' 处理代码 End Sub ``` 2. **KeyPress** 当在文本框...

    linux as4.0虚拟机安装

    3. 单击“下一步”进入安装目录选择界面,该界面上面的文本框是系统的名字,保持默认值即可,下面的文本框需要选择虚拟机操作系统的安装位置。 4. 根据需要选择好后,单击“下一步”按钮,出现设置虚拟机内存大小的...

    VB 动态创建、删除一个窗体控件 过使用WithEvents关键字声明一个对象变量为新的命令按钮,动态增加的按钮,你可以单击“删除控件”按钮删除它。

    在本案例中,我们重点讨论如何通过`WithEvents`关键字来声明一个对象变量,用于创建一个新的命令按钮,并且能够响应这个动态添加的按钮的事件。 首先,理解`WithEvents`关键字是关键。在VB中,`WithEvents`允许我们...

    flash 中实现打字效果的一个方法

    在“Typewriter”类的AS3文件中(例如:Typewriter.as),编写以下代码: ```actionscript import flash.events.Event; public class Typewriter extends MovieClip { private var _textToType:String; private ...

    VB鼠标滚轮事件_vb6_鼠标滚轮事件_

    在VB6中,每个控件和窗体都有一个事件集,这些事件代表了可能发生的特定动作,比如单击、双击、按下、释放等。鼠标滚轮事件属于这些事件中的一种,用于处理用户的滚轮操作。 滚轮事件主要分为两个:`WM_MOUSEWHEEL`...

    VB复习题试卷答案很有用哦

    3. 若要响应文本框Text1的回车键事件,需要在Text1的`KeyPress`事件中编写程序。因为KeyPress事件专门处理键盘按键的输入,包括回车键。 4. 语句`Print "A+2"`的运行结果是字符串"A+2",因为它只是简单地打印字符串...

    vb支持鼠标

    1. **Click**:鼠标单击事件,当用户按下并释放鼠标按钮时触发。 2. **DoubleClick**:鼠标双击事件,当用户快速连续两次点击鼠标按钮时触发。 3. **MouseDown**:鼠标按键被按下事件,不论哪个按钮,只要按下就会...

    Excel_VBA常用技巧_第08章[1].控件与用户窗体.doc

    一旦完成,可以为文本框的`MouseDown`事件编写代码,当用户单击鼠标右键时显示这个菜单。例如: ```vba Private Sub TextBox1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If ...

    VB封装DLL实例讲解

    1. Access实例代码:在按钮单击事件中,代码会提取文本框中的数字并显示在消息框中。 2. VB封装步骤: - 新建ActiveX DLL工程,命名为“我的动态库”。 - 修改类名,如“提取数字”。 - 将Access的事件代码修改...

    20秋电子科技大学《VB程序设计》在线作业2答卷.docx

    6. **窗体和文本框事件**:程序运行后,先按A键,然后单击窗体,会触发文本框的KeyDown事件和窗体的MouseUp事件。因此,显示的内容是B.“Visual Basic 程序设计”。 7. **图片框属性**:A.Stretch是图片框的属性,...

    flash动作脚本从入门开始

    创建动态文本框的方法是在库中选择“文本”类别下的“动态文本”选项,然后将其放置在舞台上。动态文本框可以通过脚本动态更新其文本内容: ```as var myTextField:TextField = new TextField(); addChild...

    VB封装DLL实例讲解(一).doc

    将 ACCESS 中的单击事件代码,略做修改成为一个公用函数,然后复制到 VB 代码编辑窗口。 Public Function fFindNumber(strPutString As String) As String Dim strOut As String '输出字符串变量 Dim I '从第一...

    多媒体班 VB_NET 练习题

    单击第一个命令按钮后,该按钮从窗体上消失,文本框显示特定文本,并使第二个命令按钮变为可用。第三个命令按钮的功能是退出程序。 **实现步骤**: 1. 创建一个新的Windows Forms应用程序项目。 2. 在窗体上添加一...

Global site tag (gtag.js) - Google Analytics