📄 registerservercontrol.aspx
字号:
<%@ Page Language="vb" AutoEventWireup="false"%>
<%@ Register TagPrefix="CE" Namespace="CuteEditor" Assembly="CuteEditor" %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" >
<html>
<head>
<title>How to create a custom button and register it with the editor toolbar template?</title>
<link rel="stylesheet" href="../../example.css" type="text/css" />
</head>
<body>
<form runat="server">
<h2>How to create a custom button (Server Control) and register it with the editor toolbar template?</h2>
<p>
This example uses the following events: <b>PostBackCommand, TextChanged and Initializing</b>.
</p>
<p>
<asp:Label id="Label1" runat="server">Command Message Here</asp:Label>
<CE:EDITOR id="Editor1" runat="server" TemplateItemList="[Bold,Italic]/[Hello|World]">
</CE:EDITOR>
</div>
</form>
</body>
</html>
<script runat="server">
Overrides Protected Sub OnInit(ByVal args As EventArgs)
AddHandler Editor1.PostBackCommand, AddressOf Editor1_PostBackCommand
AddHandler Editor1.TextChanged, AddressOf Editor1_TextChanged
AddHandler Editor1.Initializing, AddressOf Editor1_Initializing
AddHandler Me.Load, AddressOf Page_Load
MyBase.OnInit(args)
End Sub
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'Put user code to initialize the page here
End Sub
Private Sub Editor1_Initializing(ByVal sender As System.Object, ByVal e As System.EventArgs)
If Not Page.IsPostBack Then
Editor1.Text = "Type Here"
End If
Dim hello As New System.Web.UI.WebControls.Button
hello.Text = "Hello"
hello.Style("vertical-align") = "middle"
hello.CommandName = "Hello"
AddHandler hello.Click, AddressOf hello_Click
Dim world As New System.Web.UI.WebControls.Button
world.Text = "Hello"
world.Style("vertical-align") = "middle"
world.CommandName = "world"
AddHandler hello.Click, AddressOf world_Click
Editor1.RegisterCustomButton("hello", hello)
Editor1.RegisterCustomButton("world", world)
End Sub
Private Sub Editor1_PostBackCommand(ByVal Sender As Object, ByVal e As System.Web.UI.WebControls.CommandEventArgs)
Label1.Text = "You just click the button : " + e.CommandName
End Sub
Private Sub hello_Click(ByVal obj As Object, ByVal args As EventArgs)
Editor1.Text += "<div style='color:red'>Hello Clicked</div>"
End Sub
Private Sub world_Click(ByVal obj As Object, ByVal args As EventArgs)
Editor1.Text += "<div style='color:red'>World Clicked</div>"
End Sub
Private Sub Editor1_TextChanged(ByVal obj As Object, ByVal args As EventArgs)
Editor1.Text += "<div style='color:red'>Hello Clicked</div>"
End Sub
</script>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -