MenuView[(Last[#]->Dynamic[ExampleData[#]])&/@Take[ExampleData["AerialImage"],10],ImageSize->Automatic]