Declaration
property OnChanged: TNotifyEvent;
Description
Occurs after images have been added, removed or changed position in the control.
procedure Tfrmmain.ImageEnMView1Changed(Sender: TObject);
const
HORZ_PADDING = 8;
var
newWidth: Integer;
begin
// Widen control if scrollbar is visible
newWidth := ImageEnMView1.ThumbSizeInfo( itsOuter ).X + HORZ_PADDING;
if ImageEnMView1.CurrentScrollBars = ssVertical then
inc( newWidth, IEGlobalSettings().VScrollWidth() );
ImageEnMView1.Width := newWidth;
end;
See Also
◼OnChangedEx
◼OnImageAdd
◼OnImageAdded
◼OnCreateImage
◼OnDestroyImage