Re: Copying image to clipboard

Return to index

Author

Message

Allen

Posted: 04/06/2003 22:10:03

Hi Sergey,

I use the following codes but it does not returns the name of the component,e.g

Image1 Image2 etc. There was just blank.

========================================================

procedure TForm1.SpeedButton3Click(Sender: TObject);

var x : integer;

         AName:string;Actrl:TControl;AValign:              TRVValign;ATag:integer;

begin

         x:= RVEdit1.CurItemNo;

           RVEdit1.GetControlInfo(x,Aname,Actrl,AVAlign,ATag);

{The Aname should be the control name is not it?}

             Form1.Caption := Aname; //Returns EMPTY spaces!!!;

end;

++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++

"Allen" <allen791@hotmail.com> wrote:

>

>Hello,

>I have inserted a TImage component with an image into the RVEdit.I have

to

>insert images in this way for programming reason related to my work.

>

>I SELECTED the image(the red square appear around the image). NOW, how can

>I get/identify the selected item(TImage) and copy the image(picture) inside

>the TImage to clipboard?

>

>I hope you can give a detailed description on how to copy the image. I do

>not need any references to RICHVIEW ACTIONS.

>

>Thank you for your time.

>

>