Convertir una cadena de palabras separadas por # en array

[*Caro*]

Hola david, si no quieres usar ningun componente entonces usa un StringList y aplicas lo que te ha indicado tpc_ip.

Código Delphi [-]
var
 sl : TStringList;
begin
 sl := TStringList.Create;
 sl.delimiter:='#';
 sl.delimitedtext:='uno#dos#tres';
 
 for i:=0 to sl.Count-1 do
  showmessage(sl[i]);

Si no quieres usar un StringList entonces tendras que hacerlo con las funciones copy y pos.

Saluditos