Re: Help Image

Return to index

Author

Message

Yernar

Posted: 12/18/2002 16:23:54

Try this:

procedure TForm1.Button1Click(Sender: TObject);

var

  bmp: TBitmap;

begin

  if OpenPictureDialog1.Execute then begin

    bmp := TBitmap.Create;

    bmp.LoadFromFile(OpenPictureDialog1.FileName);

    RVE.InsertPicture('', bmp, rvvaBaseline);

  end;

end;

"visitorrr" <static-toad@ifrance.com> wrote:

>

>I do this:

>  bmp := TBitmap.Create;

>  bmp.LoadFromFile(FileName);

>  RVE.AddPictureEx('', bmp, ParaNo, rvvaBaseline);

>

>My picture is correctly load but at the end of file. I want my picture is

>load at the current cursor position ! Please help. Thank you.