como copiar parte de una cadena ?

[roman]

Usa la función Copy:

S := Copy(
  '001500|cadena tres|50.25|cccc', // cadena origen
  8, // primer caracter a copiar
  11 // número de caracteres a copiar
);

// Saludos