lo que se me ocurre es lo siguiente
si el dato esta en el campo, podrias crear un edit simple
Código Delphi
[-]
edit1.Text := Copy(tabla1Campo.value,3,Lenght(tabla1Campo.value))
eso si es que simpre va a tener ese formato de 2 caracteres al inicio, si puede que tengan otros formatos (no se,... quiza mas caracteres no necesariamente al principio o al medio o a la derecha), podrias crear nua rutina que te vaya chequeando caracter por caracter y armes una cadena la cual ira en el edit simple
saludos