> * Note - you probably would not want to rename these images in VFP but instead, do it in Windows Explorer
> * I offer the VFP version just to show you what I mean by "renaming the file."
> RENAME [c:\Fish\Images\CodFish.Jpg] TO [c:\Fish\Images\Img12345.Jpg]
> * and then in your form when you wish to display that image
> lcImagePath = [c:\Fish\Images] && or what ever (best not to hard code paths but this serves as an example)
> lcImageFileName = [Img]+ALLTRIM(TRANSFORM(MyTable.RecordID))+[.jpg]
> ThisForm.MyImage.Picture = ADDBS(lcImagePath)+lcImageFileName
> LOCATE FOR MyTable.FishName = [CodFish]
> lcImage = FULLPATH(GETPICT()) && Here the user will navigate to that Codfish.jpg file.
> IF NOT EMPTY(lcImage)
> REPLACE MyTable.cImage WITH lcImage IN [MyTable]
> * And in your form,
> ThisForm.MyImage.Picture = MyTable.cImage