Como fazer o efeito lt;INSgt; no Tmemo ?

Galera como simular o efeito da tecla Ins no memo? Tipo no word, qdo o insert tá ligado ele adiciona os caracteres, quando tá desligado, os caracteres são substituídos...