Zeichen in einem String ersetzen???

[EDatabaseError]

Hi, kleine Frage wie kann ich ein '#' in einem String durch ',' ersetzen???

Hab schon gesucht aber da steht nur was von StringReplace das mein D3 Prof. leider nicht kennt.


Mfg
Tobi

[marabu]

Hallo Tobi,

Löschen und Ersetzen kannst du auch mit der Funktion Translate().

Grüße vom marabu

[Klaus01]

oder so:

Delphi-Quellcode:

var
 
  s:String;

while pos('#',s) <> 0 do
  s[pos('#',s)]:=',';

Grüße
Klaus

[DGL-luke]

*Delphi 3 startet*

tasache, gibts nicht... aber in dem fall is es einfach:

Delphi-Quellcode:

for i := 1 to length(s) do
  if s[i] = '#' then s[i] := ',';

(sollte sogar performanter als generische funktionen sein, @marabu)
@Klaus01: Sehr viel unperformanter als meine Variante, bei mir wird der string nur einmal durchlafuen, bei dir sher oft ;)

[Klaus01]

@Lukas: chapeau

[EDatabaseError]

Zitat:

Zitat von Klaus01

oder so:

Delphi-Quellcode:

var
 
  s:String;

while pos('#',s) <> 0 do
  s[pos('#',s)]:=',';

Grüße
Klaus

danke geht...

[DGL-luke]

na wenn er schon seinen hut vor mir zieht...?

[EDatabaseError]

Zitat:

Zitat von DGL-luke

na wenn er schon seinen hut vor mir zieht...?

sry... hab deins übersehen. Ich nehm nu deins weils wirklich zeitsparender ist (0,00000000000000001 µs)


mfg
tobi

[jmd anders]

@ ed~

der geschwindigkeitsunterschied kommt bei sehr großen strings zum ausdruck. und dann kann das sogar en vielfaches sein.

[DGL-luke]

jop, pos macht nämlich nichts anderes als ich, nur dass es erstens zweimal aufgerufen wird bei jedem zu ersetzenden zeichen und zweitens - viel gravierender - den kompletten string durchsucht bis ein zu ersetzendes zeichen gefunden wird.

(außerdem müllts den callstack voll :stupid: )