I am not sure why you want this in a layer, but
in the demo all you have to do is add a layer:
while Test1Button.Down do
begin
i := 0;
ilayer := ImageEnView1.LayersAdd;
ImageEnView1.MouseInteract := [miMoveLayers, miResizeLayers];
William Miller
Email: w2m@frontiernet.net
EBook: http://www.imageen.com/ebook/
Apprehend: http://www.frontiernet.net/~w2m/index.html