Extraer caracteres de una cadena
 

Saludos, tengo una base de datos, de la cual extraigo un campo, el campo tiene 10 caracteres y necesito extraer los caracteres quinto,sexto y septimo y no se como hacerlo.
Ejemplo

1234 >567< 890

567 tengo que extraerlo y asignarlo a una valiable.

Gracias.

Hola.

Código Delphi [-]

Cadena:='1234567890';
Subcadena:=Copy(Cadena,5,3);

Saludos

Gracias Newtron.