ImageEn, unit iexUserInteractions |
|
TIEButtonInteraction.FillColor
Declaration
property FillColor: TColor;
Description
Specify the color of the
Previous and Next buttons.
You can adjust the transparency of the button using
FillTransparency
The color of the button border is specified by
BorderColor
Default: clWhite
| Demos\Multi\MViewPreview\MViewPreview.dpr |
| Demos\Multi\MView_AttachedViewer\MViewPreview.dpr |
| Demos\InputOutput\IEViewMulti\IEViewMulti.dpr |
ImageEnView1.ButtonParams.FillColor := clSilver;
ImageEnView1.Update;
// Change event for Style combobox
procedure TForm1.cmbButtonStyleChange(Sender: TObject);
const
__cmbButtonStyle_Default = 0;
__cmbButtonStyle_BigCustom = 1;
__cmbButtonStyle_SemiTransparent = 2;
__cmbButtonStyle_Solid = 3;
begin
case cmbButtonStyle.ItemIndex of
__cmbButtonStyle_BigCustom:
begin
// Big yellow buttons with red border
ImageEnView1.ButtonParams.FillColor := clGold;
ImageEnView1.ButtonParams.FillTransparency := 255;
ImageEnView1.ButtonParams.BorderWidth := 2;
ImageEnView1.ButtonParams.BorderColor := clPastelRed;
ImageEnView1.ButtonParams.BorderTransparency := 255;
ImageEnView1.ButtonParams.Size := 40;
end;
__cmbButtonStyle_SemiTransparent:
begin
// Buttons with gray border and semi-transparent fill
ImageEnView1.ButtonParams.FillColor := clWhite;
ImageEnView1.ButtonParams.FillTransparency := 110;
ImageEnView1.ButtonParams.BorderWidth := 2;
ImageEnView1.ButtonParams.BorderColor := clDarkGray;
ImageEnView1.ButtonParams.BorderTransparency := 255;
ImageEnView1.ButtonParams.Size := 30;
end;
__cmbButtonStyle_Solid:
begin
// Solid red buttons without border
ImageEnView1.ButtonParams.FillColor := clPastelRed;
ImageEnView1.ButtonParams.FillTransparency := 255;
ImageEnView1.ButtonParams.BorderWidth := 0;
ImageEnView1.ButtonParams.BorderColor := clDarkGray;
ImageEnView1.ButtonParams.BorderTransparency := 255;
ImageEnView1.ButtonParams.Size := 30;
end;
else // __cmbButtonStyle_Default
begin
// Standard buttons with gray border and white fill
ImageEnView1.ButtonParams.FillColor := clWhite;
ImageEnView1.ButtonParams.FillTransparency := 255;
ImageEnView1.ButtonParams.BorderWidth := 1;
ImageEnView1.ButtonParams.BorderColor := clDarkGray;
ImageEnView1.ButtonParams.BorderTransparency := 255;
ImageEnView1.ButtonParams.Size := 25;
end;
end;
ImageEnView1.Update();
end;
See Also
◼ShowButtons
◼FillTransparency
◼BorderColor
◼BorderTransparency
◼BorderWidth
◼Size
◼Offset