procedure MakeWMCharMsgSafeForAnsi(var Message: TMessage);

TntControls

This is function TntControls.MakeWMCharMsgSafeForAnsi.