Robby
01-10-2002, 02:22 AM
I needed something like this for a client, so I created this MsgBox.
I 'm sure a lot of you have done the same.
The DLL is 52K ..... Zipped code=23K
It works with the same rules as a VB MsgBox.
- All parameters are optional
- Prompt (The text is inside a locked Text Box so the user may select and Copy it.
- Buttons (with List Constants) or you can use VB constants. ie vbOKOnly or OKOnly.
- Title (If left blank the dialog box will not have a title bar and will not be moveable)
- Context (with List Constants, Default= None) ie bsCritical
- Beep (True or False,Default=True)
- Back Color ( Color of the Dialog Box,Default=Dark Blue)
- Fore Color ( Text color,Default=White)Font=Arial 8 Bold
- Height ( Dialog Box hieght, Default=2600 Twips) Minimum=2600, Max is 1000 < Screen Hieght
( unlike the VB version which can be off your screen)
- Center Text (true or False,Default=Left justify)
Return from users' Button Click is the same as VB constants ( vbMsgBoxResult )
The client process will pause until the user clicks a button.
Esc only works with vbOKOnly and if there is a Cancel button
No Esc allowed for something like vbAbortCancelRetry (same as VB)
The Default button is the one with an optomistic context.(so the user can hit Enter instead of a button)
Feel free to use it or even modify it.
Your comments are welcome
Open project with "BassicMessage.vbp"
Download from the next post
I 'm sure a lot of you have done the same.
The DLL is 52K ..... Zipped code=23K
It works with the same rules as a VB MsgBox.
- All parameters are optional
- Prompt (The text is inside a locked Text Box so the user may select and Copy it.
- Buttons (with List Constants) or you can use VB constants. ie vbOKOnly or OKOnly.
- Title (If left blank the dialog box will not have a title bar and will not be moveable)
- Context (with List Constants, Default= None) ie bsCritical
- Beep (True or False,Default=True)
- Back Color ( Color of the Dialog Box,Default=Dark Blue)
- Fore Color ( Text color,Default=White)Font=Arial 8 Bold
- Height ( Dialog Box hieght, Default=2600 Twips) Minimum=2600, Max is 1000 < Screen Hieght
( unlike the VB version which can be off your screen)
- Center Text (true or False,Default=Left justify)
Return from users' Button Click is the same as VB constants ( vbMsgBoxResult )
The client process will pause until the user clicks a button.
Esc only works with vbOKOnly and if there is a Cancel button
No Esc allowed for something like vbAbortCancelRetry (same as VB)
The Default button is the one with an optomistic context.(so the user can hit Enter instead of a button)
Feel free to use it or even modify it.
Your comments are welcome
Open project with "BassicMessage.vbp"
Download from the next post