Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi AnsiReplaceStr/AnsiReplaceText (https://www.delphipraxis.net/116348-ansireplacestr-ansireplacetext.html)

Der Jan 27. Jun 2008 08:14


AnsiReplaceStr/AnsiReplaceText
 
Hallo,

ich möchte in einem String Teilstrings ersetzen und habe dazu AnsiReplaceStr/AnsiReplaceText verwendet.
Da das Ergebnis fehlerhaft war, habe ich debuggt und dabei festgestellt, daß die Replace-Funktionen schlichtweg nichts taten, nach dem Replace stand noch das selbe drin wie vorher. Um andere Fehler auszuschließen, habe ich das ganze mal reduziert auf:
Delphi-Quellcode:
var
  s: string;
begin
  s := 'Das ist ein Test.';
  ShowMessage(IntToStr(AnsiPos('ein', s)));  //Ergebnis: 9 ('ein' wird also gefunden)
  AnsiReplaceText(s, 'ein', 'kein');
  ShowMessage(s);                            //Ergebnis: Das ist ein Test.
end;
Hab s auch mal zum AnsiString gemacht, (man weiß ja nie :) ) und mit AnsiReplaceStr versucht, kein Erfolg.
Vielleicht steht ja wer auf meiner Leitung... Weiß jemand Rat? :gruebel:
Das passiert unter Delphi6. Andere IDEs zum testen habe ich leider gerade nicht installiert.

soulies 27. Jun 2008 08:17

Re: AnsiReplaceStr/AnsiReplaceText
 
heisst es nicht

Delphi-Quellcode:
 s:=AnsiReplaceText(s, 'ein', 'kein');
cya

spaxxn 27. Jun 2008 08:18

Re: AnsiReplaceStr/AnsiReplaceText
 
Delphi-Quellcode:
  AnsiReplaceText(s, 'ein', 'kein');
wird zu
Delphi-Quellcode:
  s := AnsiReplaceText(s, 'ein', 'kein');

soulies 27. Jun 2008 08:26

Re: AnsiReplaceStr/AnsiReplaceText
 
@spaxxn - denn machst du wohl was falsch ...

code komplett:
Delphi-Quellcode:
var
  s: string;
begin
  s := 'Das ist ein Test.';
  ShowMessage(IntToStr(AnsiPos('ein', s)));  //Ergebnis: 9 ('ein' wird also gefunden)
  [b]s := [/b]AnsiReplaceText(s, 'ein', 'kein');
  ShowMessage(s);                            //Ergebnis: Das ist [b]kein[/b] Test.
end;
cya

spaxxn 27. Jun 2008 08:28

Re: AnsiReplaceStr/AnsiReplaceText
 
Was redest für einen Stuss? Bei mir steht dasselbe wie bei dir...

Der Jan 27. Jun 2008 08:59

Re: AnsiReplaceStr/AnsiReplaceText
 
Autschn... Da stand wirklich bös einer auf der Leitung, gepaart mit Tomaten auf den Augen. :wall:
Danke euch.

soulies 27. Jun 2008 09:17

Re: AnsiReplaceStr/AnsiReplaceText
 
@ spaxxn
Zitat:

Was redest für einen Stuss?
Kennen wir uns ? Na dann ...

Du schreibst
Zitat:

s := AnsiReplaceText(s, 'ein', 'kein'); ???????
ShowMessage(s); //Ergebnis: Das ist ein Test.
Die Fragezeichen deuten für mich darauf hin, dass Du dich fragst was ich da eigentlich gemacht hab.
und da das
Zitat:

//Ergebnis: Das ist ein Test.
bei Dir falsch sein müsste hab ich mit
meinem darauf folgenden post fast alles richtig gemacht.

cya

spaxxn 27. Jun 2008 09:32

Re: AnsiReplaceStr/AnsiReplaceText
 
Meine Antwort war parallel zu deiner erstellt und die Fragezeichen bezogen sich auf das was vorher bei "Der Jan" stand.

Wenn ich mich auf dich beziehen wollen würde, dann würde ich dich zitieren. Danke


Alle Zeitangaben in WEZ +1. Es ist jetzt 14:36 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz