[ecfisa]

Hola lpitu21.

La mejor forma que se me ocurre para explicarlo es comentando el código, para lo cuál voy a expandirlo un poco:

Código Delphi [-]
  Edit1.SelStart := Length(Edit1.Text); // Seleccionar el último caracter del texto
  SendMessage(Edit1.Handle, WM_CHAR, VK_BACK, 0); // Enviar al Edit un mensaje con el caracter backspace

Si deseas ampliar:

• SendMessage function
• WM_CHAR Message
• VK_BACK

Sobre la propiedad SelStart de TEdit podes encontrar información en la propia ayuda de Delphi.

Saludos