![]() |
Delphi-Version: 2010
Suche andere Funktion als "StringReplace"
Hi!
Und zwar, ich habe folgendes Problem: Ich habe einen Text in ein Memo geladen, der in seiner Länge nicht eingeschränkt ist, d.h. er könnte über mehrere tausend Zeilen gehen. Diesen Text muss ich auf bestimmte Bedingungen überprüfen, darunter fällt auch der Austausch von Wortgruppen. Dazu benutze ich die Funktion "StringReplace". Nun folgendes Problem: In dem Text suche ich nach "hard" und möchte dieses durch "Anton" austauschen. Ist ja alles easypeasy: Text := Stringreplace(Text, 'hard', 'Anton', [rfReplaceAll]); Nun steht aber in meinem Text auch "Gerhard". Nach meiner Verarbeitung würde dann aber daraus "GerAnton" entstehen. Nun meine Frage: Gibt es eine andere Funktion, die nur "hard" austauscht, also prüft, ob das Wort einzeln steht. Oder gibt es eine andere Möglichkeit, dieses Problem zu beheben? Vielen Dank schon mal für die Hilfe! |
AW: Suche andere Funktion als "StringReplace"
Zitat:
|
AW: Suche andere Funktion als "StringReplace"
zum Beispiel?
|
AW: Suche andere Funktion als "StringReplace"
Du könntest auch einfach die vorhandene StringReplace Funktion modifizieren. Code besorgen (ist nur eine Funktion) und prüfen links und rechts auf Buchstaben.
|
AW: Suche andere Funktion als "StringReplace"
Did is ne gute Idee. Mach ick!
Dank dir ;) |
AW: Suche andere Funktion als "StringReplace"
Ersetz doch einfach " hard " durch " Anton ". Ggf. dasselbe inkl. Satzzeichen wiederholen, oder doch auf reguläre Ausdrücke ausweichen, aber da muss man erst einmal die Syntax beherrschen.
|
AW: Suche andere Funktion als "StringReplace"
Jetzt noch an den Zeilen-Anfang und das -Ende denken, und Du hast alles zusammen.
Gruß K-H |
AW: Suche andere Funktion als "StringReplace"
Besser als mit Ausnahmen zu hantieren ist zu prüfen ob Zeichen vor und nach dem Wort Buchstaben sind. Spart man sich Arbeit.
|
AW: Suche andere Funktion als "StringReplace"
Zitat:
|
AW: Suche andere Funktion als "StringReplace"
Was ist mit .,:;+- usw? Popov hat Recht, Morphie hat Rechter. :wall:
|
Alle Zeitangaben in WEZ +1. Es ist jetzt 09:17 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz