Try this:
procedure TForm1.Paste1Click(Sender: TObject);
begin
ImageEnVect1.UnSelAllObjects;
ImageEnVect1.ObjPasteFromClipboard(-1, -1);
ImageEnVect1.Update;
end;
The pasted object will be located on top of the existing object.
To offset the paste from the copied object use large values (100, 100) not (1,1)... ie... ImageEnVect1.ObjPasteFromClipboard(100, 100); parameters of (1,1) pastes the object only offset by 1 from the original object so you can not see it visually.
Bill Miller
Adirondack Software & Graphics
Email: w2m@hughes.net
EBook: http://www.imageen.com/ebook/
Custom Commercial ImageEn Development