Fórum Procedure ou função Split alguem da um help #396093

procedure Split (const Delimiter: Char; Input: string; const Strings: TStrings);
begin
  Assert(Assigned(Strings));
  Strings.Clear;
  Strings.Delimiter := Delimiter;
  Strings.DelimitedText := Input;
end;

chamando assim

campo := TStringList.Create;
    try
      Split(' ', leitor, campo);
    finally

Eu tô usando esta função para separar um txt que to lendo com uma TStringList
ai eu acesso ela assim campo[0] ... campo[1] e assim vai posso acessa - la como s fosse um vetor

mais quero trocar o campo "delimitador" eu pensei que era o primeiro campo da função em amarelo, o segundo é a variável TStringList que será quebrada e a terceira é a variável que será jogado esses valores e se transformará em um vetor em verde;

Split(' ', leitor, campo);
se eu disse besteira pode fazer a correção mais acho que era isto mais o campo amarelo que eu pensava que era o campo "delimitador" como eu faço para ser quebrado a cada '=' ou '#' pois substituir pelo espaço em branco não funciona???