ImageEn, unit iexUserInteractions

TIEButtonInteraction.BorderTransparency

TIEButtonInteraction.BorderTransparency


Declaration

property BorderTransparency: Integer;


Description

Specify the transparency of the outline of the Previous and Next buttons.
You can also adjust the border width and color.
The transparency of the button fill is specified by FillTransparency



Default: 255 (fully opaque)


Demos

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


Example

ImageEnView1.ButtonParams.BorderTransparency := 127;   // 50% transparent
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
 BorderWidth
 FillColor
 FillTransparency
 Size
 Offset