Желательно также сразу изменить и здесь свойство Autosize на true, чтобы панель принимала размеры, соответствующие кнопкам.
Таким образом, создайте две кнопки, потом разделитель и еще одну кнопку. У вас должно получиться нечто похожее на рис:Теперь создадим кнопки на панели. Для этого щелкните по ней правой кнопкой мыши и выберите из появившегося меню пункт New Button. Пункт New Separator этого же меню создает разделитель между кнопками. Если вам нужно будет удалить кнопку или разделитель, то просто выделяете его и нажимаете на клавиатуре клавишу <Del>.
В принципе, простая панель уже создана, но она простая. Теперь необходимо сделать так, чтобы кнопки что- то отображали. Но для начала выделите саму панель и измените свойство Flat на true, чтобы кнопки на панели выглядели более изящно (плоско). Да, для современных приложений этот вид уже не такой современный, но все же достаточно удобный.
Теперь установим на форму компонент TlmageList и добавим в него три картинки. Их изображение пока не имеет особого значения, поэтому можно выбирать любые. Главное, чтобы размер был 16x16.
Выделите панель и в свойстве images укажите созданный набор картинок. На кнопках сразу же отобразятся картинки в той последовательности, в которой вы их добавили. Если вы хотите изменить картинку на какой-нибудь кнопке, надо выделить ее И изменить СВОЙСТВО Imageindex.
Для каждой кнопки в свойстве caption напишите осмысленный текст (по умолчанию там стоит текст TooiButton плюс порядковый номер кнопки). Желательно, чтобы текст соответствовал изображению на картинке. Давайте сделаем так, чтобы панель отображала на кнопках не только картинки, но и указанный в свойствах caption текст. Для этого установите true в свойстве Showcaptions у панели инструментов. Результат вы можете увидеть на рис. 11.41.
Как видно, в данном случае текст отображается под изображением. Если еще установить свойство List у панели инструментов, то текст будет отображаться справа от картинки.
Для закрепления материала давайте создадим обработчик события для какой- нибудь из кнопок. Последняя кнопка — Выход, вот для нее и создадим обработчик.
Для этого дважды щелкните по ней левой кнопкой мыши и в созданной Delphi процедуре напишите close.