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 [erledigt]Verständnis-Frage "String zerhackstückeln" (https://www.delphipraxis.net/64401-%5Berledigt%5Dverstaendnis-frage-string-zerhackstueckeln.html)

Loki77 3. Mär 2006 09:12


[erledigt]Verständnis-Frage "String zerhackstückeln&quo
 
`Morgen!
Lösche Tags aus HTML-SC. Aber zum verständnis:

Delphi-Quellcode:
function StripHTML(S: string): string;
var
  TagBegin, TagEnd, TagLength : integer;
begin
  TagBegin := Pos( '<', S);
  while (TagBegin > 0) do begin
    TagEnd := Pos('>', S);
    TagLength := TagEnd - TagBegin + 1;        //          <--- WARUM ... - TagBegin + 1 ???
    Delete(S, TagBegin, TagLength);
    TagBegin:= Pos( '<', S);
end;
  Result := S;
end;
Hab´mir gerade zwar die unteschiede string(C/C++) und strin(Delphi) angeschaut,
seh´den Wald vor lauter Bäumen aber nicht mehr..... :gruebel:
Danke, Loki

Klaus01 3. Mär 2006 09:18

Re: Verständnis-Frage "String zerhackstückeln"
 
angenommen eine HTML Ausschnitt schaut so aus...

<tag>

dann ist < an Position 1
und > and Position 5

die Länge des Tags ist dann
endpos - startpos +1
5 - 1 +1 => 5

wenn +1 weggelassen wird wird die Länge des Tags nicht richtig berechnet.

Grüße
Klaus

Angel4585 3. Mär 2006 09:19

Re: Verständnis-Frage "String zerhackstückeln"
 
angenommen
"<" ist auf Pos 2
">" ist auf Pos 8
2345678
sind 7 Stellen
8-2 gibt aber nur 6 also +1

Loki77 3. Mär 2006 09:33

Re: Verständnis-Frage "String zerhackstückeln"
 
Klar....Danke!
Manchmal sitzt man auf seiner Leitung....
Hab mir den string nur als "ganzes" betrachtet, dann machts keinen Sinn.
:stupid: ähmm,ja...
Gruß Loki


Alle Zeitangaben in WEZ +1. Es ist jetzt 14:20 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