Autor Beitrag
GerhardS
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 49



BeitragVerfasst: Fr 23.10.09 22:06 
Hallo,
ich möchte mit Delphi HTML-Code bearbeiten. Konkret möchte ich
<p class=MsoNormal style='margin-top:9.0pt;margin-right:0cm;margin-bottom:0cm;margin-left:14.2pt;margin-bottom:.0001pt;text-indent:-14.2pt'>
durch
<p class="Spiegelstrich">
ersetzen.
Leider scheitert das schon bei der Suche nach dem zu ändernden String:
ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
ToReplStr:= '<p class=MsoNormal style=''margin-top:9.0pt;margin-right:0cm;margin-bottom:0cm;margin-left:14.2pt;margin-bottom:.0001pt;text-indent:-14.2pt''>';
   if Pos(ToReplStr, ASL) > 0 then
   begin
   ShowMessage('Gefunden');
   NewStr := StringReplace(ASL, ToReplStr, '<p  class="Spiegelstrich">', [rfReplaceAll]);
   Result := NewStr;
   end
   else ShowMessage('nix gefunden');

ergibt immer Null (nix gefunden).
Edit:
Thema hat sich erledigt: im HTML-Code war ein Umbruch versteckt, so dass die Pos-Funktion den gesuchten String nicht gefunden hat. Die Maskierung war und ist in Ordnung.

Moderiert von user profile iconKlabautermann: Code- durch Delphi-Tags ersetzt