Hi Franz,
>> My goal is - create MessageBox with info icon, my title, my message (multilines) and my font. How can I achieve this?
>>
>
>Yes, the code is a little bit complicated, but it has many advantages. You can subclass some classes to adopt it to your need, or simple change some lines.
>
>e.g.
>existing code: (near the top)
>LPARAMETERS txPara1, txPara2, txPara3
>PRIVATE lcSystemFont, lxRetVal
>lcSystemFont= GetSystemFont()
>
>changes to support if a special font (e.g. Tahoma) exists in your system:
>lcSystemFont=IIF(!AFONT(laFont, "Tahoma"), GetSystemFont(), "Tahoma")
This line of code changes System Font to "Tahoma" in all MessageBoxes, right?
>If you like, I can send you some pice of code to show how subclassing works.
Yes, it will be very helpful.
Because I still don't know how use this, how pass my own string (consisting from many lines) and display my own message, my own title, my own set of buttons, using my own font for message and different for buttons and info icon.
For example, I have:
myString=String1+chr(13)+String2+chr(13)+...
myTitle="Some title"
myButton="Ok button"
myFont for message - any proportional, for Example, Courier 10
myFont for buttons - "Arial 9"
myIcon - info
What do I need to do next?
Thanks for your help
If it's not broken, fix it until it is.
My Blog