Moin silent,
zu dem Zeitpunkt, zu dem OnKeyPress aufgerufen wird, steht das Zeichen noch nicht im im Edit1.Text steht.
Tausch einfach mal Deine Kopierzeile durch key := #00 aus.
Dadurch wird dann das einzufügende Zeichen gelöscht, und erscheint erst gar nicht im Edit1.Text.
BTW: Dazu hatten wir hier schon einiges. Vielleicht findest Du unter
OnKeyPress hier noch ein wenig mehr zum Thema.