through the steps I have explained and apply it on u'r application where u had
left as this functionality is not supported on Notes.It is only Scripting which
make it to possible to happen.
1.In the PostSave Event of the form gets the RichText Item and
sets the IsSummary Value to true (normally false with RichText Items).
Here in the example the form contain the rich text field name "Picture"
Sub Postsave(Source As Notesuidocument)
Dim doc As NotesDocument
Dim item As NotesItem
Set doc = Source.Document
Set item = doc.GetFirstItem("Picture")
item.IsSummary = True
2.Compose the Form.
3.Insert a image resource in a rich text field.
(U can do it from the menu as create/Image Resouce)
4.Save the document.
5. Now Create a view for the specific form and map the Rich text field
"Picture" to the
first column and don't forget to tick the column property "Display value as
6.Now u can view u'r image in the first column of the view.