Fazendo um Parser em uma String

Question

Ol� pessoal!Estou com o seguinte problema:Tenho que receber no c�digo do Delphi uma express�o em String como por exemplo: �(14350.75*90)/100�. Eu tenho que poder pegar separadamente cada um dos elemen...

Beppe · Answer

Se vc quer apenas separar os elementos ent�o vc precisa de um [i:59740156cf]lexer[/i:59740156cf]. O Delphi inclui um(para arquivos *.dfm, mas pode reaproveit�-lo), que erroneamente � chamado de TParser.

with TParser.Create(TStringStream.Create(�(14350.75*90)/100�)) do
try
  while Token <> toEof do
  begin
    Memo1.Lines.Add(TokenString);
    case Token of
      toSymbol: ;  // + * / - ( ) etc
      toString: ;  // "string"
      toInteger: ; // 123
      toFloat: ;   // 123.45
    end;
    NextToken;
  end;
finally
  Free;
end;

Nota: eu n�o liberei a string que eu criei.

F�rum Fazendo um Parser em uma String #274343