ImageEn, unit imageenview

TImageEnView.OnButtonState

TImageEnView.OnButtonState


Declaration

property OnButtonState: TIEVButtonStateEvent;


Description

Occurs whenever the state of a button is queried




Example

procedure TForm1.ImageEnView1ButtonState(Sender: TObject; Button: TIEVButton; var Visible: Boolean; var Enabled: Boolean);
begin
  case Button of
    iebtPrevious : Enabled := ImageEnMView1.SelectedImage > 0;
    iebtNext : Enabled := ImageEnMView1.SelectedImage < ImageEnMView1.ImageCount - 1;
  end;
end;