¿Cómo cortar cadenas en Delphi 7?

[CM6ISG]

Gracias colega por tu respuesta, tan rápido.
Mas meno esa sería la idea pero deja hacerte más precisiones de lo que quiero lograr,
Mira yo estoy usado CportLib y el me devuelve a través del puerto Serial una Variable Str con una cadena de caracteres de mi Radio de HF esa cadena tiene esta estructura vista en un memo
#PO0
#SQS
#EM0
#FT0715000
#FR0711200

Y en un Edit se vería así #PO0#SQS#EM0#FT0715000#FR0711200

Lo que necesito es separar esta cadena en 5 cadenas y asignarla a 5 nuevas variables para de ahí seguir yo con el resto de la programación.

Ahora #POX #SQX #EMX #FTXXXXXXX #FRXXXXXXX fíjate en el detalle te puse (X) ese dato varia en depende de la frecuencia del radio, modo potencia, etc.

Lo otro seria como cambio ShowMessage(lCampos.Text); en su lugar necesito 5 variables con cada una de sus cadenas.
Ejemplo:

Power:=(‘POX’)
Qsl:=(‘SQX’)
Modo:=(‘EMX’)
FTX:=(‘XXXXXXX’)
FTR:=(‘XXXXXXX’)

Muchas gracias de antemanos