Applies toTESBBaseEdit
DeclarationTKeyStringEvent = Procedure(Sender: TObject; var S: WideString; var Handled: Boolean) of object;