Limitar el tamaño de un string al imprimirlo

[[ElDioni]]

No estoy seguro, pero si buscas en la ayuda de delphi FormatMaskText puede que esta funcion te valga.
o tambien puedes hacer en un string temporal lo siguiente:

Código Delphi [-]
procedure TForm1.QuinceCar();
var
temp:string
begin
temp:=ADOT_TablaTCAMPO.AsString[1]+ADOT_TablaTCAMPO.AsString[2]+ADOT_TablaTCAMPO.AsString[3]+...+ADOT_TablaTCAMPO.AsString[15];
end;

De esta forma tendras en temp los 15 primeros caracteres que quieres