![foxpro 2.6 picture foxpro 2.6 picture](http://www.3kranger.com/interact/Reviews/9502f6blkrv.gif)
AddObject("image"+Trans(Recno()),"image") SetParent(Thisform.yhwnd, Thisform.HWnd) & change parent the form class as a child of the main form Thisform.Caption=Thisform.Caption+Trans(Reccount())+" images)-" Insert Into ycurs Values (m.yrep+gabase(i,1)) Sele * From Home(1)+"samples\data\customer" Into Cursor mycurs
![foxpro 2.6 picture foxpro 2.6 picture](https://cdn.slidesharecdn.com/ss_thumbnails/foxpro-121002224920-phpapp01-thumbnail-4.jpg)
Caption = "A scrollable container as form class-"ĭeclare Integer BringWindowToTop In user32 Integerĭeclare Integer SetParent In User32 Integer HWnd, Integer ParenthWndĭeclare Integer Sleep In kernel32 Integer