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
FillTransparencyThe color of the button border is specified by
BorderColorDefault: 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