aus einem string von x bis y alles weg

[Seikilos]

hm ich weiß, ich muss mit Pos und Copy arbeiten, hab schon gesucht.
Aber ich weiß nicht, was ich tun soll, wenn dies passiert.

Aus dem String soll ich alles was in [ ] steht sammt klammern rauslöschen. nun ja, ich such nach pos [, dann pos ] und kopiere den rest, aber was ist wenn ein ] vor einem [ auftaucht?

z.b
string:='Hallo ]D , ich bins [Andy]';

Nun find ich zwar das [ vor Andy aber das ] vor dem D.
Gibts eine Möglichkeit gezielter zu suchen?

[Garby]

Hallo,

es würde dir sicher helfen, mal andere Beiträge im Forum zu lesen :wink:

so gehts ziemlich einfach:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var Strg, Wert: String;
begin
  Strg := 'Hallo ]D , ich bins [Andy]';
  Wert := 'Andy';
  ShowMessage(StringReplace(Strg, '[' + Wert + ']', '', [rfReplaceAll, rfIgnoreCase]));
end;

[Seikilos]

Hab ich gelesen, aber ich kenne ja WERT nicht, es kann alles in den klammern stehen, sonst könnt ich auch [ANDY] suchen.

[thomasdrewermann]

Hier nochmal eine Selbstgebastelte Funktion:

Delphi-Quellcode:

function cutit(text:string):string;
var i,start,ende:integer; a:string;
begin
i:=1;
while (text[i]<>'[') and (i<lengtH(text)) do
i:=i+1;
start:=i;
i:=1;
repeat
I:=i+1;
until ((i>=start) and (text[i]=']')) or (i>length(text));
ende:=i;
a:=text;
if length(texT)=start then result:=text else
if (length(text)=ende) and (text[lengtH(text)]<>']') then result:=text else
delete(a,start,ende-start+1);
if result<>text then
result:=a;
end;

[Seikilos]

ah, danke, dann werd ich mal operieren :)

.

peep:

'Andy [ war ein [großer] Junge';

jetzt gehts nimma

[thomasdrewermann]

Sicher, er schneidet den Text zwischen den Klammern weg. Danach bleibt nur noch 'Andy Junge' stehn. Das ist doch korrekt. Aber die Funktion schneidet nur den ersten Kommentar weg!

[Seikilos]

nene, wenn jemand

Andy mit dem Coolen zeichen [D fuhr [schnell] zur hölle.

schreibt, dann muss schon das wort weg, nicht sein cooles zeichen