Closing the MDI CHILD Form by pressing CTRL+F4 Keys

**aks_1610** · May 6th, 2003, 04:54 AM

Hi all,

I want to Close AMD CHILD Form by pressing CTRL+F4 keys. Any idea how to do that. I've used Form_KeyPress event but its not working bcoz i have different controls on my form and those controls grabs the focus, so Form_KeyPress never executes...

**VB IT** · May 6th, 2003, 04:59 AM

Set CHILD's Form KeyPreview = True
And Then Add the following Code In Child's Forms KeyDown Event

VB Code:

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 115 And Shift = 2 Then Unload Me
End Sub

**swatty** · May 6th, 2003, 05:05 AM

Make sure it is an MDI child.
Set its keypreview property to true, and it should work wihtout any coding.

**aks_1610** · May 6th, 2003, 05:11 AM

not working...

i've set its keypreview property to true. Still....

**swatty** · May 6th, 2003, 05:27 AM

I opened a new project , added a MDI form.
Changed form1 to MDI child , Keypreview = true
Added form2, set to MDI child; Keypreview = true

They are closing when they are active and Ctrl + F4 is pressed.

**aks_1610** · May 6th, 2003, 05:30 AM

Thanks SWATTY for replying,

i did the same thing, on one proj. the forms are Closing but on another ther are not...

**swatty** · May 6th, 2003, 05:57 AM

So you got a proj where it does work.

Check the properties for the MDI form in both .

As well for the MDI Child forms.

There should be something different.

**aks_1610** · May 6th, 2003, 06:01 AM

i've checked the properties,

i m able to close/Unload the form when i press F4 but not CTRL+F4 thr. coding..

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyF4 Then Unload Me
End Sub

**swatty** · May 6th, 2003, 06:16 AM

You have to check the value of Shift in there , it should be 2 for the Ctrl key

**VB IT** · May 6th, 2003, 06:21 AM

VB Code:

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer) 
If KeyCode = vbKeyF4 And Shift = 2 Then Unload Me 
End Sub

**techyspecy** · May 6th, 2003, 06:43 AM

Originally posted by aks_1610
Hi all,

I want to Close AMD CHILD Form by pressing CTRL+F4 keys. Any idea how to do that. I've used Form_KeyPress event but its not working bcoz i have different controls on my form and those controls grabs the focus, so Form_KeyPress never executes...

I do not know what you are talking about pal, but you do not have to code for that. Pressing Ctrl + F4 automatically closes the active MDI child form.

**aks_1610** · May 6th, 2003, 06:59 AM

i have done every thing. Removed the code but it did not Unload.

At last i tried unloading the form thr. coding that did work but CTRL+F4 is not working even if i use this code.

VB Code:

'Closing the form if user presses F4 Key
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
    If KeyCode = vbKeyF4 And Shift = 2 Then Unload Me
End Sub

**swatty** · May 6th, 2003, 07:02 AM

check the events on the form.

There isn't any code in the unload event which prevents it from unloading ??

Check Form_QueryUnload also.

**techyspecy** · May 6th, 2003, 07:04 AM

Originally posted by aks_1610
i have done every thing. Removed the code but it did not Unload.

At last i tried unloading the form thr. coding that did work but CTRL+F4 is not working even if i use this code.

VB Code:

'Closing the form if user presses F4 Key
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = vbKeyF4 And Shift = 2 Then Unload Me
End Sub

What are you guys doing ????

You do not need no code for this. Just open MDI open some child form and press Ctrl + F4, it will close the child form. It closes on my machine. I am running win 2K.

**aks_1610** · May 6th, 2003, 07:22 AM

hi swatty,
there is no Form_QueryUnload event on my form.

techyspecy:

i m also confused why the hell it is not working. i m also running win 2k .

**techyspecy** · May 6th, 2003, 07:24 AM

Originally posted by aks_1610
hi swatty,
there is no Form_QueryUnload event on my form.

techyspecy:

i m also confused why the hell it is not working. i m also running win 2k .

Post your project if you want us to help you.

**swatty** · May 6th, 2003, 07:52 AM

Originally posted by aks_1610
hi swatty,
there is no Form_QueryUnload event on my form.

techyspecy:

i m also confused why the hell it is not working. i m also running win 2k .

I think you must have something different then we got in mind.

Can you load the project up, so we could look into it.

**aks_1610** · May 6th, 2003, 08:19 AM

Please see the attached file:

**techyspecy** · May 6th, 2003, 08:25 AM

Originally posted by aks_1610
Please see the attached file:

Got the problem !
Its not closing the form because you have set its borderstyle property to 0-None. You cannot close forms with Ctrl + F4 if there's borderstyle is 0. Change it to 1 or 2 and it will close the form on Ctrl + F4.

**techyspecy** · May 6th, 2003, 08:29 AM

BTW - Very colourful application.

**aks_1610** · May 6th, 2003, 09:04 AM

Thanks techyspecy,

its the client's requirement.(Can' help it). I can't change it to 1 or 2. Is there any other method to do it.

Thanks again for the reply....

**swatty** · May 6th, 2003, 09:11 AM

I've thrown following code in the code pane of frmMain and it unloaded.

Don't know why it won't work on your side of the screen.

VB Code:

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
   If KeyCode = 115 Then
      If Shift = 2 Then
         Unload Me
      End If
   End If
End Sub

**swatty** · May 6th, 2003, 09:13 AM

Originally posted by aks_1610
hi swatty,
there is no Form_QueryUnload event on my form.

techyspecy:

i m also confused why the hell it is not working. i m also running win 2k .

In the project u provided i did find a QueryUnload event in frmMain ?

**aks_1610** · May 6th, 2003, 09:25 AM

where is it swatty.

i m not getting which QueryUnload event u r taking about.

**swatty** · May 6th, 2003, 09:30 AM

Don't bother the QueryUnload event , it isn't relevant in your code.

The KeyDown event did work over here.

**aks_1610** · May 6th, 2003, 09:38 AM

hi swatty,

it worked there bcoz Command Buttons at the top are disabled. Try enabling all those Command Buttons..

Thanks for the reply...

**swatty** · May 6th, 2003, 09:49 AM

For some reason when a button has the focus the combination of two keystrokes isn't coming through.

I've changed it if F4 is pressed it unloads , it works.

Depends if it is necesary the combination is used.
If so you should set the focus on the grid after a button is clicked to let it work properly.

**techyspecy** · May 6th, 2003, 09:51 AM

What are you two nutty kids doing with this easy thing. Why do you not put a command button on the form, set its cancel property to true and hide it behind any other control. Do it on every form. On this command_click event unload me. That way user can just press ESC and unload the form.

**aks_1610** · May 6th, 2003, 09:56 AM

thanks swatty,

after setting the focus on the Grid i m able to unload the form.

sometimes such little things do matters a lot...

anyways thanks ....

**McGenius** · May 6th, 2003, 10:19 AM

Originally posted by aks_1610
Hi all,

I want to Close AMD CHILD Form by pressing CTRL+F4 keys. Any idea how to do that. I've used Form_KeyPress event but its not working bcoz i have different controls on my form and those controls grabs the focus, so Form_KeyPress never executes...

MDI form doesn'r respond to any key event and since your child form is borderless you'd need to use a Timer (on the MDI form, Interval = 100) and some Windows API:

VB Code:

Option Explicit
 
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
 
Private Const VK_CONTROL = &H11
Private Const VK_F4 = &H73
 
Private Sub Timer1_Timer()
 
    GetAsyncKeyState(VK_F4) Then
        If GetAsyncKeyState(VK_CONTROL) Then
            Unload Form1 'assuming that Form1 is that child you need to unload
        End If
    End If
 
End Sub

Note: in order for this sample to work your borderless form will have to be the topmost at the moment.

**McGenius** · May 6th, 2003, 10:20 AM

Originally posted by techyspecy
What are you two nutty kids doing with this easy thing. Why do you not put a command button on the form, set its cancel property to true and hide it behind any other control. Do it on every form. On this command_click event unload me. That way user can just press ESC and unload the form.

Are you always this cocky?

**techyspecy** · May 6th, 2003, 10:34 AM

Originally posted by McGenius
Are you always this cocky?

I am not cocky, i'm a fun guy. I do not mind cracking jokes/sarcasm on others and always open for someone cracking joke/sarcasm on me.

Anyway forget about me, was just looking at your previous post, how can you even suggest such a pathetic and lousy solution ..

, i'm still wondering about it. *burnt*

**McGenius** · May 6th, 2003, 10:41 AM

And it's "a pathetic and lousy" because ... Do you mind to provide more argumented reply or otherwise don't bother. I belive I've mentioned that to you once before.

**techyspecy** · May 6th, 2003, 10:44 AM

Originally posted by McGenius
And it's "a pathetic and lousy" because ... Do you mind to provide more argumented reply or otherwise don't bother. I belive I've mentioned that to you once before.

because for the sake of one damn key, you're gonna make him put a timer on the MDI which is gonna fire every 100 milliseconds for no good reason .... ( system resources after all are expensive, specially on users machines )

BTW - you never mentioned that before - I'll note it down somewhere now .. hmm .. * looking for notepad *

Yours - McMoronic Techy ....

**McGenius** · May 6th, 2003, 10:54 AM

Yep, that's what I thought you'd say. Let me guess techy: you must be 15-16, may be 18 yo - at least your brain isn't any older. I have no intension to discuss anything with you any farther what-so-ever.
Also, go find that Notepad and make a note: learn some manners - you'll need'm time to time.

**techyspecy** · May 6th, 2003, 10:56 AM

Originally posted by McGenius
Yep, that's what I thought you'd say. Let me guess techy: you must be 15-16, may be 18 yo - at least your brain isn't any older. I have no intension to discuss anything with you any farther what-so-ever.
Also, go find that Notepad and make a note: learn some manners - you'll need'm time to time.

Is this Argumentative ?????

Looking at this .. you need manners more than i do ..

Make a note for yourself:

Only say what you mean, and always do what you say.

Yours ... McMoronic Techy ....

**techyspecy** · May 6th, 2003, 10:59 AM

I think you are ticked off

with my signature. Is that bothering you .... if yes, i'll never remove it.

Thread: Closing the MDI CHILD Form by pressing CTRL+F4 Keys

Thread Tools

Display

Closing the MDI CHILD Form by pressing CTRL+F4 Keys

Get IT

Chage your Code

Re: Closing the MDI CHILD Form by pressing CTRL+F4 Keys

Re: Closing the MDI CHILD Form by pressing CTRL+F4 Keys

Posting Permissions