|
andyhill
Australia
133 Posts |
 Posted - Aug 25 2022 : 21:47:53
|
I have many text layers
procedure TfMain.ImageEnView1LayerNotifyEx(Sender: TObject; layer: Integer; event: TIELayerEvent);
...
for i:= 0 to ImageEnView1.LayersCount-1 do begin
ALayer:= ImageEnView1.Layers[i];
if ( (ALayer.Locked = False)
and (ALayer.Selected = True)
and (ALayer.Kind = ielkText)
) then begin
do my thing
ImageEnView1.Deselect;
// ImageEnView1.LockUpdate;
ImageEnView1.LayersRemove(i); // throws errors ?
// ImageEnView1.UnlockUpdate;
ImageEnView1.Update();
Andy |
|
Search
Cannot understand why RemoveLayer throws out of bounds error ?
