A few questions

Return to index

Author

Message

John

Posted: 11/18/2003 22:46:21

Hi,

My questions are as follows:

1. To create event in the ONRVmousemove. I use the code below but it seems

that it did not work well. I want to get the itemNo of the specific item

under the cursor. The code below could not get the ITEMNO when the mouse

moves over it. There are PICTURES and texts.

{---------}

procedure TForm1.RichViewEdit1RVMouseMove(Sender: TObject; id: Integer);

var CurPos:TPoint;

    X,Y: Integer;

    ItemNo: Integer;

    Word:string ;

begin

    GetCursorPos(CurPos);

RichViewEdit1.GetWordAt(CurPos.X,CurPos.Y,

                ItemNo,

                Word);

       Form1.Caption:=  inttostr(itemNo);{itemno not shown}

end;

{---------}

Please comment a way to get the ItemNo and ItemStyle when the mouse moves

over the richviewEdit.Your codes are deeply appreciated.

2.Is it possible to click on a picture(not bullet and others)

and get it to shellexecute? How do I do this? I suppose I need to add a hotspot

to the picture. How can I achieve this?

Question 1 is not related to question 2. We need them for separate projects

aims.

Thank you.