Zeichen in String an Position x ersetzten

[fcg]

Wie kann ich das machen? Ich möchte an Position x ein Zeichen in einem String ersetzen...

thÄnxX
fcg

[fkerber]

Hi!

Wenn ich nicht irre so:

Delphi-Quellcode:

var 
str: string;

begin

str:='Test';
str[2]:='a';
end;

Müsste eigentlich jetzt Teat sein.

(Untested)

Ciao fkerber

[Dax]

Wir nehmen an, du hast einen string:

Delphi-Quellcode:

var s: string;

Diesem String gibst du eien wert:

Delphi-Quellcode:

s := 'was weiss ich';

Du willst ein Zeichen an Position x ersetzen (wir benutzen x = 4):

Delphi-Quellcode:

s[x{oder 4}] := {Anderes zeichen}'Ä';

[fcg]

yo danke.. Habe das mit Labels verwechselt, wo das so nit funzt...

fcg

[Neg]

Zitat:

Zitat von fkerber

Hi!

Wenn ich nicht irre so:

Delphi-Quellcode:

var 
str: string;

begin

str:='Test';
str[2]:='a';
end;

Müsste eigentlich jetzt Teat sein.

Nein, str ist jetzt gleich "Tast". Strings beginnen mit 1, nicht mit 0.

@fcg:
Nur ein kleiner Hinweis (, falls du es noch nicht weißt):
Wenn du die einzelnen Buchstaben eines Strings direkt ansprichst, dann gehe immer sicher, dass der entsprechende Buchstabe auch existiert, der String also nicht kleiner ist, sonst kriegst du eine AV.

[edit]Verdammte Typos...[/edit]

[fkerber]

:oops:
Sorry, mein Fehler.
Tja Theorie und Praxis.

Ciao fkerber

[Synonym]

@neg wieso hast du das

Zitat:

[edit]Verdammte Typos...[/edit]

so klein geschrieben?

synonym

[Neg]

Naja, muss ja nicht jeder mitkriegen, dass ich meinen Post editieren musste, weil ich einen Rechtschreibfehler korrigiert habe, oder? :mrgreen:

[TPeterT]

Delphi-Quellcode:

var 
str: string; 

begin 

str:='Test'; 
str[2]:='a'; 
end;

Und wie könnte ich das Zeichen an dieser Stelle löschen?
#8 geht nicht...

Liebe Grüsse
Peter

[edit=Sharky]Delphi-Tags gesetzt. Mfg, Sharky[/edit]

[marabu]

Hi Peter,

bei einem so alten thread hättest du einen neuen aufmachen dürfen. Zu den Funktionen zur string Manipulation gehören Insert() und Delete(). Schau mal in die Delphi Online-Hilfe.

Grüße vom marabu