Re: red 'X' in upper right hand corner

[Gale Johnson]

Is there any way of disabling or removing the 'X' in the upper right corner? I would like to control the "ending" within my program instead of allowing users to stop by using the "X". My main screen is left on and hidden in the background. By hitting the "X" it brings users back to the main screen, but does not close all of the tables. If someone immediately restarts the program before turning it off fully and restarting, an error message appears saying that some tables are already in use.

 

[Rioven]

Hi, perhaps you could try f'ormlib.dll' using fullscreen?

FullScreen method removes the menu bar and the title bar if requested.
Syntax: FullScreen (RemoveTitle As Boolean)

When removing the title bar be sure to provide a way to close the form.

Regards,

 

[Erel]

You could use the Form_Close event to cancel the closing event:

Sub Form1_Close
 if msgbox("Do you really want to close?","",cMsgboxYesNo) = cNo then
   Form1.CancelClose
 End If
End Sub

 

[yildi]

Nice trick,

Thank you Erel! It is included in TRPPC now ;-)

Murat

 

[Gale Johnson]

Re: "X" problem

I solved the problem by inserting an indicator with each of the 10 tables I am using. At the main screen, each indicator is checked (0=ok), (1= table-in- use). RemoveCol is used to clear each table having a '1' indicator, and everything runs fine.