VB6 : Can I make control box of an MDI form 'Invisible' ? (Cross button)

[neo008]

Hi All,

I want control box of my MDI form Invisible. I dont want user to click on cross button to exit.

I tried Unload events but I dont find it suitable for my project.


Can somebody help? I'm Using VB6

-NE☼

[hariharanmca]

Hi All,

I want control box of my MDI form Invisible. I dont want user to click on cross button to exit.

I tried Unload events but I dont find it suitable for my project.


Can somebody help? I'm Using VB6

-NE☼

i think, it is not possible but you can try it in unload event. can you post the method what you had been tryed?

[Hassan Darwesh]

in unload event type

Cancel = 1

that way the user will never get out it unless you send order to exit all program like in command click type

End

also you can use if function with flag to let the user exit with x botom like

'in general
dim flag as integer

'in form load
flag = 1

'in form unload
if flag = 1 then cancel = 1

you can change the flag to any other number from any event you want to let the user press x botom

that's all

[Killer42]

NE☼ has already worked out how to prevent the user closing the form, with a little help, in another thread. This one is specifically on how to remove the close button from MDI forms.
On a regular form, of course, you can just turn off the ControlBox property. But MDI forms don't have this property.

My guess is it will require an API call.

[neo008]

Correct Killer.

As hariharan asked here is the code i've used. but its not good for me due to other reasons. Moreover I want to make it "Invisible" not disable because it will look ugly in my case.

.

Private Sub MDIForm_Unload(Cancel As Integer)
    If Picture3.Visible = True Then Cancel = 0 Else End 
 End Sub

And I think it is as same as hassan suggested

[Killer42]

As hariharan asked here is the code i've used. but its not good for me due to other reasons. Moreover I want to make it "Invisible" not disable because it will look ugly in my case.

That's what I meant. If close function isn't available, the button is usually hidden.

... Else End

Why do you have an END there? That seems rather drastic.

[neo008]

Why do you have an END there? That seems rather drastic.

actually I was assigning an integer value there (in Else condition) as cancel is of integer type.

but I forgot what I had used to allow closing application and vice versa. (because I'm not using it anymore)

though, asked by hariharan I put the code and ....did what u caught.

:D