Nahrazování v řetězci – Delphi – Fórum – Programujte.com

Mějme na vsatupu řetězec dejme tomu "3*pi*e^x" a na výstupu bychom rádi dostali "3*3.141592*2.7182818^x", prostě jed o to, nahradit konstanty jejich číselnou hodnotou. S tím e-čkem je to jasné,

for i:=1 to length(vstup)

do begin

if vstup[i] = 'e' then vystup:=vystup+'2.718281828'

                  else vystup:=vystup+vstup[i];

To BlackHole:
V podstate mas dve moznosti:
Bud pouzit StringReplace
nebo pokud se snazis udelat vyhodnocovani vyrazu, tak doporucuju text rozparsovat na tokeny a vytvorit derivacni a syntakticky strom, nebo pouzit metodu post(pre)fixoveho zapisu a pocitat to pomoi zasobniku-mene vhodna metoda, ale o trochu lehci.

To Jura: Já jsem ale pako:)) StringReplace mě vůbec nenapadlo! BTW parsovat se to bude až po vstupu do další procedury, chci mít na vstupu jen čísla, aritemtický funkce a neznámou.

Dík