>>>>Hi everybody,
>>>>
>>>>Do you know, how can I add a code into Caption_Assign method, if it's allowed. IOW, I'd like to add something to the form's caption (version number). Each time, when I change caption, I'd like to add something at the end, e.g. caption=caption+space(10)+'version 1.0'
>>>>
>>>>What would be the easiest way to do it?
>>>>
>>>>Thanks in advance.
>>>
>>>Hi Nadya,
>>>
>>>Just create form.caption_assign method with the code belos, it will work.
>>>
>>
>>>LPARAMETERS vNewVal
>> if not 'version' $ vNewVal
>>> vNewVal = vNewVal + space(10)+'version 1.0'
>> endif
>>>THIS.CAPTION = m.vNewVal
>>
>>
>>Thanks, Nick and Trey. Will do. It's simpler, than I thought :)
>
>Ok, I just did. Works fine, but there is a problem: how can I put version 1.0 at the right corner of the screen? IOW, calculate number of spaces between 'normal' caption and 'version 1.0'? Otherwise it doesn't look right.
I can't play with it right now, but I assume you can try to use SYSMETRIC() function to determine available space for the form caption, minus width of button used in the title bar, and then adjust the number of required spaces in the middle of your caption.
Nick Neklioudov
Universal Thread Consultant
3 times Microsoft MVP - Visual FoxPro
"I have not failed. I've just found 10,000 ways that don't work." - Thomas Edison