create cursor _tempCur(myPic g) >append blank >append general myPic from myDummyBitmapFileName link >this.addobject("DummyBMP","OLEBoundcontrol") >with this.DummyBMP > .height = 20 > .width = 10 > .left = 0 > .top = 0 > .enabled = .f. >endwith >this.addobject("DummyCover","Shape") >with this.DummyCover > .height = 21 > .width = 11 > .left = 0 > .top = 0 > .backcolor = this.BackColor > .BorderStyle = 0 && Transparent >endwithCetin