[Страдалецъ]

1. Добавьте на форму контейнер картинок - компонент TImageList. Загрузите в него картинки животных. Не забудьте предварительно выставить размер картинок для животных в свойствах контейнера, иначе все картинки будут преобразованы к размеру 16х16 точек.
2. Добавьте на форму радионабор (TRadioGroup) и пропишите там столько элементов, сколько вы добавили картинок животных в контейнер
В событии OnClick для радионабора надо прописать такой код:

Код:

procedure TForm1.RadioGroup1Click(Sender: TObject);
begin
 if RadioGroup1.ItemIndex = -1 then Exit;
 Image1.Canvas.FillRect(Image1.ClientRect);
 ImageList1.GetBitmap(RadioGroup1.ItemIndex, Image1.Picture.Bitmap);
end;

По аналогии сделаете работу с меню. Удачи.