& ersetzen, wenn es nicht als && vorkommt

[himitsu]

Zitat von Sinspin:

Zitat von HolgerX:

s := StringReplace(s, '&', '', []);

Das schießt zu kurz. da würde auch die erwünschten doppel & (&&) platt machen.

Zitat von DeddyH:

Nein, es würde nur das erste Vorkommen von "&" löschen.

Delphi-Quellcode:

StringReplace(s, '&', '', [rfReplaceAll]);
ReplaceStr(s, '&', '');
s.Replace('&', '')

[himitsu]

[deleted]

[Uwe Raabe]

Zitat von DeddyH:

Nein, es würde nur das erste Vorkommen von "&" löschen.

Schon, aber das wäre bei einem String "List && Label &Designer" nicht wirklich hilfreich.

[DeddyH]

Das war ja nicht mein Code.

[himitsu]

s := ReplaceStr(ReplaceStr(ReplaceStr(s, '&&', #1), '&', ''), #1, '&')
s := s.Replace('&&', #1).Replace('&', '').Replace(#1, '&')
oder Regexen

[Sinspin]

Zitat von DeddyH:

Nein, es würde nur das erste Vorkommen von "&" löschen.

Jup, du hast recht.

Zitat von himitsu:

s := s.Replace('&&', #1).Replace('&', '').Replace(#1, '&')

Das ist schon richtig gut , aber die doppelten sollten ja erhalten bleiben.
also : s := s.Replace('&&', #1).Replace('&', '').Replace(#1, '&&') .

Beachten, #1 ist kein String!
Sondern ASCII Nummer 1. Also unwahrscheinlich dass das jemand aus versehen eingetippt hat.

[Uwe Raabe]

Zitat von Sinspin:

aber die doppelten sollten ja erhalten bleiben.

Ich nehme an, die sollen wohl eher durch einfache ersetzt werden, damit man dann den tatsächlich angezeigten String bekommt.

[TurboMagic]

Zitat von Uwe Raabe:

Zitat von Sinspin:

aber die doppelten sollten ja erhalten bleiben.

Ich nehme an, die sollen wohl eher durch einfache ersetzt werden, damit man dann den tatsächlich angezeigten String bekommt.

Deine Annahme stimmt!
Ich habe das mit einer leicht modifizierten Variante der VCL Funktion gelöst, ihr könnt euch also um wichtigere Probleme kümmwern...

[Sinspin]

Nur wenn Du die durch einfaches "&" ersetzt werden dir beim anzeigen via VCL Komponenten diese wieder durch Unterstrich oder unterstrichenen Buchstaben ersetzt und kein & angezeigt. && wird ja verwendet um ein einzelnes & in den Text zu bekommen ohne das es sich in einen Shortcut verwandelt.

[himitsu]

Nicht, wenn du im TLabel das ShowAccelChar auf True setzt.

Aber ja, wie/wo es dann benutzt wird, entscheidet, ob man es als & oder && benötigt.