Для расположения на поверхности компонента Image изображения нужно:
1) воспользоваться кнопкой  свойства Picture и в открывшемся окне с помощью кнопки Load выбрать нужный файл с
изображением;
2) свойство Stretch установить в значение True, т.е. рисунок надо привести к размерам компонента (рис. 2.3).
Рис. 2.3. Рисунок полностью разместился в компоненте
При программировании кнопок на включение/выключение изображений используем свойства: видимость и доступность.
procedure TForm1.Button1Click(Sender: TObject);
begin
Foto1.Visible:=true; {изображение 1 видно на форме}
Foto2.Visible:=false; {изображение 2 скрыто}
Button1.Caption:=’Кактус цветет’; {надпись на кнопке}
if Button1.Enabled {если кнопка1 доступна,}
then Button2.Enabled:=false {то кнопка 2 – нет}
end;
При работе с несколькими изображениями и наложении картинок друг на друга поменять порядок отображения компонентов можно с помощью команд контекстного меню: Control/Bring to Font либо Control/Send to Back. Если в приложении необходимо предусмотреть кнопку выхода, то в редакторе кода для этой кнопки нужно сгенерировать событие, содержащее вызов метода Close для закрытия данного приложения:
procedure TForm1. btExitClick(Sender: TObject);
begin
close {вызов метода для выхода из приложения}
end;
|
Главная
Каталог файлов
