Thanks Sergey.
I've sent you an email with very small test files: tbr.vcx, tbr.vct, tbr.prg
I am using VFP 7 with SP1; Win 2K Pro SP 2. I also installed VFPCOM before installing VFP SP1.
>Hi Ramil,
>
>I followed your inctructions but didn't get any errors. VFP7 SP1 on Win2K SP2.
>
>>Hi all,
>>
>>This is how to reproduce the error in reference to my original thread#
627487.
Very Important!!! you must create this toolbar class visually for it to generate the error. This error occurs the first time you click on the commandbutton. If you add another commandbutton and put the same code in the click event, the same error will occur on the first click as well.
>>
>>*----
>>define class tbr as Toolbar
>> add object cmd as commandbutton
>> *--
>> procedure generr
>> _screen.ScaleMode = 0
>> endproc
>> *--
>> procedure cmd.click
>> this.Parent.generr
>> endproc
>>enddefine
>>
>>*-- tbr.prg to instantiate the toolbar
>>x=createobject('tbr')
>>x.show
>>read events
>>*--
>>
ramil
~~ learning to stand still