Hola luisito2011 y bienvenido al Club Delphi.
Te aconsejo que leas la
guia de estilo ( unas pocas normas básicas para entendernos mejor )
Si el dato está en una cadena de caracteres (string) podés valerte del procedimiento
Delete.
Ejemplo:
Código Delphi
[-]
...
function EliminarDigito(Cad: string; Posic: Integer): string;
begin
Delete(Cad, Posic, 1);
EliminarDigito:= Cad;
end;
var
s: string;
begin
s:= '1202';
Delete(s,3,2);
Writeln(s);
Writeln(EliminarDigito('7895', 1));
Readln;
end.
Nota: Borré la alusión a tu correo electrónico por que además de que no corresponden las respuestas privadas (ya que no ayudan al resto de los foristas), publicar tu email te va a llenar de spam.
Un saludo.