Hi Franz,
Sorry for bothering you again.
>>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?
>Step by step instructions:
>1. include the dircetory, where you have MSGSVC installed to your path
>2. copy the MSGSVC.DBF, .FPT and .CDX files to you project directory
>3. run MSGDEMO.PRG to see what you can do with this tool
>4. open MSGSVC located in your project directory and do a browse
>5. append a record
>6. insert "DynamicMessage" in the CKEY field
>7. insert "Ok" in the CFUNCTION field
>8. open the memo of the CORIGINAL field und insert follow text: This message
>has more than one line: %c1% [press Enter] %c2% [press Enter] %c3%
>9. insert "info.bmp"in the CGUIVISUAL field
>10. insert "Some title" in the CTITLE field
>11. insert "Courier,10,N~Arial,9,B" in the CWINFONT field. 1st font for the
>messagetext, 2nd font for the buttontext
>12. ok thats it, close the browse window
>13. in the command window: input "DO msgsvc with "dynamicmessage",
>"String1~String2~String3" and press Enter. You should see a message which
>looks like the messagebox of VFP.
Almost :)
Ok, I did this. What I noticed:
1) Background of info.bmp and some other bmps are darker than form background and doesn't look nice.
2) Windows MessageBox has ok button widhter and also has disabled "x" close button.
3) How can I change mytitle on the fly? "Some title" was just an example, I want myTitle as a variable.
4) I also noticed that I can pass myString containing itself chr(13) and it works fine.
>I did not send you any subclassed code, as I don't know, if you will need it
>(e.g. for the Tips dialog ...). But just let it me know and you will get it (per email)
I don't know now, but may be in the future...
>BTW: in the directory where you have installed the MSGSVC, there is a small
>help file which may help you.
Yes, I saw.
Thanks a lot.
If it's not broken, fix it until it is.
My Blog