Anführungszeichen herausfiltern

[Andreas L.]

Hi,
wie kann ich überprüfen ob in einen String Anführungszeichen (") sind und diese ggf. herausfiltern.

Greetz und thx

[Sharky]

Hai onlinehome,

Stichwörter: Pos und StringReplace

[DP-Maintenance]

Dieses Thema wurde von "Sharky" von "VCL-Komponenten und Controls" nach "Object-Pascal / Delphi-Language" verschoben.
Hat ja nicht wirklich etwas mit VCL zu tun.

[Keldorn]

Hallo

in einer schleife durchgehen und s[i]='"' prüfen?

Wenns ums ersetzten geht: stringreplace, damit kannst du alle " mit einem schalg suchen und ersetzen

Mfg Frank

[Nikolas]

nimm pos und delete

Delphi-Quellcode:

while pos('''',string1)>0 do
delete(sytax weiss ich grad nicht)

[StefanDP]

Delphi-Quellcode:

StringReplace(DeinString, '"', '', rfREPLACE_ALL);

das mit pos zu machen, ist meiner meinung nach ein bissl übertrieben...

[Nikolas]

Er wollte aber wissen, ob in dem Text '' drin sind. Wenn du Stringreplace drüberjagst, hast du keine Möglichkeit rauszufinden, ob jemals welche drin waren.

[NicoDE]

Zitat:

Zitat von onlinehome

wie kann ich überprüfen ob in einen String Anführungszeichen (") sind und diese ggf. herausfiltern.

Kommt darauf an was Du damit machen willst...
Für das Ein/Auspacken von Kommandozeilen hab ich meist AnsiQuotedStr/AnsiExtractQuotedStr verwendet.

[Andreas L.]

Also ich möchte eine Datei öffnen (in ein Memo reinladen) und da müssen halt die Anführungszeichen weg.

Danke für eure Hilfe

[yankee]

Zitat:

Zitat von onlinehome

Also ich möchte eine Datei öffnen (in ein Memo reinladen) und da müssen halt die Anführungszeichen weg.

Anführungszeichen im Text, der nach dem Einladen in der Memo steht? Oder aus dem Dateinamen?
Ich schätze mal das erstere, sonst wäre es ja schwachsinn... Dann so:

Delphi-Quellcode:

StringReplace(memo1.text, '"', '', rfREPLACE_ALL);

Wie bereits von StefanDp vorgschalgen (nur auf memo angepasst)...

[Keldorn]

Zitat:

Delphi-Quellcode:

StringReplace(memo1.text, '"', '', rfREPLACE_ALL);

Wie bereits von StefanDp vorgschalgen (nur auf memo angepasst)...

wenn du schon keinem zutraust, Deinstring mit memo1.text zu ersetzen, hättest du es auch richtig hinschreiben können ... ([] haben gefehlt)

Delphi-Quellcode:

memo1.text:=StringReplace(memo1.text, '"', '', [rfReplaceAll]);

[yankee]

Zitat:

Zitat von Keldorn

wenn du schon keinem zutraust, Deinstring mit memo1.text zu ersetzen, hättest du es auch richtig hinschreiben können ... ([] haben gefehlt)

Ich traue es (fast) jedem zu, aber wenn onlinehome extra nochmal fragt...
Wusste ich nicht, dass da so olle [] hinkommen, ich habe doch nur StefanDP zitiert...

[Sharky]

Zitat:

Zitat von Keldorn

...wenn du schon keinem zutraust, ...

Zitat:

Zitat von yankee

...Ich traue es (fast) jedem zu,...

Und jetzt bitte zurück zum Thema. Wir wollen doch nicht persönlich werden :!: :stupid:

[Andreas L.]

Die Zeichen sollen aus dem Dateinamen raus.

Code:

"C:\test.txt"

soll

Code:

C:\test.txt

werden.

Greetz und thx

[yankee]

Ich frage mich zwar, wie die Zeichen in die Datei überhaupt reingekommen sind, aber wenn das immer so ist, dann würde ich das so machen:

Delphi-Quellcode:

DeinString[length(DeinString)-1]='';
DeinString[0]='';

Und wenn du nicht sicher bist, ob "" drum sind, dann:

Delphi-Quellcode:

if Deinstring[length(DeinString)-1] ='"' then DeinString[length(DeinString)-1]='';
...

[mytar]

In C gibt es StringTok, das ist ein Tokenizer,
d.h. man übergibt den String und den Teilstring,
und gibt zurueck ob er enthalten ist, oder die Position im String, ich weiß nicht
obs das auch in Delphi gibt?

mytar

[Mirilin]

:hi:

pos

mfg Tobias

[Nikolas]

Steht doch schon mehrmals im Thread :roll: