ImageEn, unit iemview

TIEOnChangedEx


Declaration

TIEOnChangedEx = procedure(Sender: TObject; Operation: TIEUpdateParamsOp; Index: Integer; ParamEx: Integer) of object;


Description

Occurs after changes to the structure of TImageEnMView content (adding, removing, moving of images).


Example

procedure TForm1.ImageEnMView1ChangedEx(Sender: TObject; Operation: TIEUpdateParamsOp; Index, ParamEx: Integer);
begin
  case Operation of
    iepuInsert   : memo1.Lines.Add( format( 'Image %d inserted', [ Index ]));
    iepuDelete   : memo1.Lines.Add( format( 'Image %d deleted', [ Index ]));
    iepuMove     : memo1.Lines.Add( format( 'Image %d moved to %d', [ Index, ParamEx ]));
    iepuSwap     : memo1.Lines.Add( format( 'Image %d swapped with %d', [ Index, ParamEx ]));
    iepuMoveGroup: memo1.Lines.Add( format( 'Images starting at %d moved to %d', [ Index, ParamEx ]));
    iepuClear    : memo1.Lines.Add( 'All images cleared');
    iepuAllocate : memo1.Lines.Add( format( '%d images allocated', [ ParamEx ]));
  end;
end;