ImageEn, unit iexUserInteractions

TIEButtonInteraction.BorderWidth

TIEButtonInteraction.BorderWidth


Declaration

property BorderWidth: Integer;


Description

Specify the width of the outline of the Previous and Next buttons.
You can also adjust the border color and transparency.

Default: 1


Demos

Demo  Demos\Multi\MViewPreview\MViewPreview.dpr
Demo  Demos\Multi\MView_AttachedViewer\MViewPreview.dpr
Demo  Demos\InputOutput\IEViewMulti\IEViewMulti.dpr


Examples

// Thick border
ImageEnView1.ButtonParams.BorderWidth := 3;
ImageEnView1.Update;

// No border
ImageEnView1.ButtonParams.BorderWidth := 0;
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
 BorderColor
 BorderTransparency
 FillColor
 FillTransparency
 Size
 Offset