I know there are several scripts out there which all have a very similar effect. Unfortunately none of them work the way I'd expect. Here is an idea using a different procedure as a base.

What about a script which:

1. Take care of the selected Track(s).

2. Selects the Event under the cursor of the selected Track(s).

3. Set an Out-Point (Loop-Region) where the Cursor is.

4. Cursor jumps to the beginning of selected Event.

5. Set an In-Point (Loop-Region) where the cursor is.

6. Selects the Loop-Region (just what SHIFT+Q would do).

7. Deletes the part inside the Loop-Region (this is just the regular Delete command).

8. Cursor jumps forward to the first frame of selected Event.

And a second script which does same for cutting off the end of an Event:

1. Take care of the selected Track(s).

2. Selects the Event under the cursor of the selected Track(s).

3. Set an In-Point (Loop-Region) where the Cursor is.

4. Cursor jumps to the end of selected Event.

5. Set an Out-Point (Loop-Region) where the cursor is.

6. Selects the Loop-Region (just what SHIFT+Q would do).

7. Deletes the part inside the Loop-Region (this is just the regular Delete command).

8. Cursor jumps backward to the last frame of selected Event (if needed here in this second script case).

Possible?

Marco