var

    vLayer2: TIELayer;

begin

  if ImageEnView1.LayersCount > 1 then

  begin

    vLayer2 := ImageEnView1.layers[1];

    vLayer2.fPosX :=scGPSpinEdit1.ValueAsInt;

    vLayer2.fPosY :=scGPSpinEdit2.ValueAsInt;

    ImageEnView1.Update;

  end

end