Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Custom messagebox
Message
 
 
To
08/07/2002 12:06:42
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00676092
Message ID:
00676184
Views:
16
>>Hi everybody,
>>
>>I'm looking for messagebox replacement, which allows any number of buttons with custom captions. It also should support standard icons (? !, etc.)
>
>< snip >
>
>As you are limited from VFP to pass 27 parameters, you may acheave this using comma separated or memo-like list format for the parameters for captions.
>As for standard icons... I have developed class that extracts the EXE icon and shows it in Visual FoxPro HWND control. Same approach can be used to extract icons from any file with resource info - maybe some of the system DLLs or OCXs...
>
>However HWND control is no longer shipped with VFP. So I am not sure whether it will be legal or not to redistribute a VFP7 app with the Visual FoxPro HWND control.
>(If I remember you still use VFP6 at job so this is not problem for you at the moment)
>
>Kind Regards

Hi Zlatin,

I found Alert program in Downloads section written by Dragan Nedeljkovich. He passes a semicolon delimited list of buttons captions, so we can have unlimited number of buttons. I enhanced this program by adding ability to show standard VFP icon (I added a 5th parameter with a character picture to pass). We have all messagebox images in our BMPS directory (I don't know, where they come from, probably from another Download).

The only little thing I don't like in this program, what it uses its own font, and not the default font in MessageBox, so the look is slightly different, than standard messagebox. Anyway, I can live with it, or I can go the hard route and implement retrieving of MessageBox font attributes, as shown in Vlad's FAQ (he once helped me to find these properties for Form's Title bar).
If it's not broken, fix it until it is.


My Blog
Previous
Reply
Map
View

Click here to load this message in the networking platform