RibbonControl.MessageClosed Event

Occurs after a message is closed and allows you to handle button clicks.

Namespace: DevExpress.XtraBars.Ribbon

Assembly: DevExpress.XtraBars.v24.2.dll

Declaration

C#

[DXCategory("Events")]
public event RibbonMessageClosedHandler MessageClosed

VB.NET

<DXCategory("Events")>
Public Event MessageClosed As RibbonMessageClosedHandler

Event Data

The MessageClosed event's data class is DevExpress.XtraBars.Ribbon.RibbonMessageClosedArgs.

Remarks

Read the following topic for information: Ribbon Message.

Example

C#

using DevExpress.XtraBars.Ribbon;

void ShowMessage() {
    RibbonMessageArgs args = new RibbonMessageArgs();
    args.Caption = "What's New";
    args.Text = "Explore our new WinForms-related features we expect to introduce in our first major update this year (v23.1).";
    args.Icon = MessageBoxIcon.Information;
    args.Buttons = new DialogResult[] { DialogResult.OK };
    args.Showing += Args_Showing;
    Ribbon.ShowMessage(args);
    Ribbon.MessageClosed += Ribbon_MessageClosed;
}
void Ribbon_MessageClosed(object sender, RibbonMessageClosedArgs e) {
    if(e.Result == DialogResult.OK)
        DevExpress.Data.Utils.SafeProcess.Start("https://community.devexpress.com/blogs/winforms/archive/2023/02/16/devexpress-winforms-roadmap-23-1.aspx");
}
void Args_Showing(object sender, RibbonMessageShowingArgs e) {
    e.Buttons[DialogResult.OK].Caption = "Explore Roadmap";
}

VB.NET

Imports DevExpress.XtraBars.Ribbon

Private Sub ShowMessage()
    Dim args As New RibbonMessageArgs()
    args.Caption = "What's New"
    args.Text = "Explore our new WinForms-related features we expect to introduce in our first major update this year (v23.1)."
    args.Icon = MessageBoxIcon.Information
    args.Buttons = New DialogResult() { DialogResult.OK }
    AddHandler args.Showing, AddressOf Args_Showing
    Ribbon.ShowMessage(args)
    AddHandler Ribbon.MessageClosed, AddressOf Ribbon_MessageClosed
End Sub
Private Sub Ribbon_MessageClosed(ByVal sender As Object, ByVal e As RibbonMessageClosedArgs)
    If e.Result = DialogResult.OK Then
        DevExpress.Data.Utils.SafeProcess.Start("https://community.devexpress.com/blogs/winforms/archive/2023/02/16/devexpress-winforms-roadmap-23-1.aspx")
    End If
End Sub
Private Sub Args_Showing(ByVal sender As Object, ByVal e As RibbonMessageShowingArgs)
    e.Buttons(DialogResult.OK).Caption = "Explore Roadmap"
End Sub

The following image shows the result: