andyhill
Australia
133 Posts |
Posted - Aug 27 2022 : 03:34:01
|
procedure TfMain.ImageEnView1LayerNotifyEx(Sender: TObject; layer: Integer; event: TIELayerEvent); begin
////////////////////////////////////////////////////////////////////////////// // TIELayerEvent = (ielSelected, ielMoved, ielResized, ielMoving, ielResizing, ielRotating, ielRotated, ielBeginResizing, // ielBeginRotating, ielBeginMoving, ielDeselected, ielEdited, ielBeginCreating, ielCreating, ielCreated, // ielAction, ielMovedPoint, ielArranged, ielBeforeRemove, ielRemoved, ielEditedProps, ielTextEditorClick, // ielTextEditorChange); //////////////////////////////////////////////////////////////////////////////
if event = ielCreated then begin s:= ''; end;
Andy |
|