Was typing case EventType of then pressed Ctrl-J on a whim. Voila: case EventType of etCustom: ; etInfo: ; etWarning: ; etError: ; etDebug: ; end; Nice feature, thanks a lot!