Separar String y cargar en edit delphi

[Jasan_Records]

gracias por la ayuda pero quizas no fui bien claro, olvide comentar que la consulta que me trae ese dato pc-12345-a-16 y otros con el mismo formato lo hago con un adoquery, en el expte.DelimitedText:= ' ', debo poner el adoquery? perdon soy nuevo en esto y me apasiona aprender.

[Casimiro Notevi]

Empezado por Jasan_Records

... soy nuevo en esto y me apasiona aprender.

Entonces esto es lo que necesitas

[Neftali [Germán.Estévez]]

Aquí tienes la explicación de la clase TStringList con ejemplos que puedes probar.
En la misma línea que el ejemplo que te ha escrito Lepe.