fmpfunctions/selection.delete.fmfn at master · djdarkbeat/fmpfunctions · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
/*
 * =====================================================
 * selection.delete ()
 *
 * RETURNS:        (string) Active field contents less selection or one backspace
 * DEPENDENCIES:   none
 * NOTES:          Useful when determining field contents with keystroke triggers
 * =====================================================
 *
 */


Let ( [
  var.content = Get ( ActiveFieldContents );
  var.endPoint = If ( Get ( ActiveSelectionSize ) > 0 ; Get ( ActiveSelectionStart ) + Get ( ActiveSelectionSize ) ; False );
  var.toDelete = Middle ( var.content ; Get ( ActiveSelectionStart ) ; var.endPoint - Get ( ActiveSelectionStart ) )
];

  If ( not var.endPoint;
    Replace ( var.content ; Get ( ActiveSelectionStart ) -1 ; 1 ; "" );
    Substitute ( Get ( ActiveFieldContents ) ; var.toDelete ; "" )
  )

)