Forward,Back,Up Navigation in WinForms(Mdi Container)?

Question

3.00/5 (2 votes)

See more:

Hi
I want to navigate like how the windows explorer behaves,
Assume There is 1 Mdi and 10 Child Forms,

So i want to navigate forward,back,up from one form to other..

Let me know if anybody have an idea..
Thanks in Advance..

Regards,
Pawan.

Posted 29-Jun-10 22:58pm

Pawan Kiran

Add a Solution

2 solutions

Solution 2

The answer in C#

Create a project, add an MDI form and create two buttons named cmdBack and cmdForward.

C#

private void cmdBack_Click(object sender, EventArgs e)
        {
            try
            {
                Form PrevForm = null;
                foreach (Form ChildForm in this.MdiChildren)
                {
                    if (ChildForm.Equals(this.ActiveMdiChild))
                    {
                        if ((PrevForm != null))
                        {
                            this.ActivateMdiChild(PrevForm);
                            PrevForm.Focus();
                            break;
                        }
                    }
                    PrevForm = ChildForm;
                }
                PrevForm = null;

            }
            catch (Exception ex)
            {
            }

        }

C#

private void cmdForward_Click(object sender, EventArgs e)
        {
            try
            {
                Form NextForm = null;
                foreach (Form ChildForm in this.MdiChildren.Reverse())
                {
                    if (ChildForm.Equals(this.ActiveMdiChild))
                    {
                        if ((NextForm != null))
                        {
                            this.ActivateMdiChild(NextForm);
                            NextForm.Focus();
                            break;
                        }
                    }
                    NextForm = ChildForm;
                }
                NextForm = null;

            }
            catch (Exception ex)
            {
            }

        }

Posted 23-Jul-10 20:42pm

Wazza9

Comments

Pawan Kiran 24-Jul-10 2:53am

Reason for my vote of 5
Thanks to you for posting answers in both VB,C#.

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Wazza9 · Accepted Answer · 2010-07-22T19:19:00

I had the same problem when I found your question, so I gave up searching. The code I wrote resolved the problem for me.

In your project, create two buttons named cmdBack and cmdForward and try the following:

VB

Private Sub cmdBack_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles cmdBack.Click
        Try
            Dim PrevForm As Form = Nothing
            For Each ChildForm As Form In Me.MdiChildren
                If ChildForm.Equals(Me.ActiveMdiChild) Then
                    If Not IsNothing(PrevForm) Then
                        Me.ActivateMdiChild(PrevForm)
                        PrevForm.Focus()
                        Exit For
                    End If
                End If
                PrevForm = ChildForm
            Next
            PrevForm = Nothing
        Catch ex As Exception

        End Try
    End Sub

VB

Private Sub cmdForward_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles cmdForward.Click
    Try
        Dim NextForm As Form = Nothing
        For Each ChildForm As Form In Me.MdiChildren.Reverse
            If ChildForm.Equals(Me.ActiveMdiChild) Then
                If Not IsNothing(NextForm) Then
                    Me.ActivateMdiChild(NextForm)
                    NextForm.Focus()
                    Exit For
                End If
            End If
            NextForm = ChildForm
        Next
        NextForm = Nothing
    Catch ex As Exception

    End Try
End Sub