AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Sprachen und Entwicklungsumgebungen Object-Pascal / Delphi-Language Delphi Steuerzeichen (Zeilenumbrüche) aus einem String entfernen?
Thema durchsuchen
Ansicht
Themen-Optionen

Steuerzeichen (Zeilenumbrüche) aus einem String entfernen?

Ein Thema von simlei · begonnen am 29. Nov 2006 · letzter Beitrag vom 29. Nov 2006
Antwort Antwort
simlei

Registriert seit: 23. Nov 2005
119 Beiträge
 
Delphi 7 Professional
 
#1

Steuerzeichen (Zeilenumbrüche) aus einem String entfernen?

  Alt 29. Nov 2006, 07:09
Hallo!
Ich habe ein Problem mit Strings, die einen Zeilenumbruch beinhalten, in folgender Weise:
Ich lese eine HTML-Seite ein, aus der ich eben einige Inhalte extrahieren will. nur funktioniert das mit AnsiMidStr oft nicht, da inmitten des Substr, den ich herausgesucht habe, ein Zeilenumbruch ist. Die gesamte Website liegt in einem String vor, die Zeilenumbrüche sind eben noch als Steuerzeichen enthalten. Man muss noch dazu sagen, dass der String sehr lang ist, optimal wäre also eine zugleich schnelle Methode, aber ich bin da jetzt nicht so wählerisch
Kann mir jemand verraten, wie ich vor dem Beginnen des Durchlaufes diese Steuerzeichen entfernen kan, sodass alles funktioniert? Danke!
  Mit Zitat antworten Zitat
Ines

Registriert seit: 22. Aug 2006
Ort: Augsburg
96 Beiträge
 
Delphi 2009 Enterprise
 
#2

Re: Steuerzeichen (Zeilenumbrüche) aus einem String entferne

  Alt 29. Nov 2006, 07:16
Hallo,
ich entferne Steuerzeichen, Umlaute u.ä. mit "StringReplace".
Code:
function StringReplace(const S, OldPattern, NewPattern: string; Flags: TReplaceFlags): string
Gruß Ines
Ines
  Mit Zitat antworten Zitat
Benutzerbild von Duffy
Duffy

Registriert seit: 19. Mär 2003
Ort: Wuppertal
835 Beiträge
 
Delphi 3 Standard
 
#3

Re: Steuerzeichen (Zeilenumbrüche) aus einem String entferne

  Alt 29. Nov 2006, 07:17
Hallo simlei

so könnte es gehen ...
Delphi-Quellcode:
function DelCRLF(const S: string): string;
var
  I: Integer;
begin
  Result := S;
  for I := Length(Result) downto 1 do
  begin
    if (Result[I] = #13) or (Result[I] = #10) then
    begin
      Delete(Result, I, 1);
    end;
  end;
end;
bye
Claus
Künftige Generationen wollen ihre Fehler selber machen.
Jedes Programm wird nie das können, was Du wirklich brauchst.
Das Gegenteil von gut ist gut gemeint
-----
  Mit Zitat antworten Zitat
Blackheart

Registriert seit: 4. Mai 2005
846 Beiträge
 
Delphi 7 Enterprise
 
#4

Re: Steuerzeichen (Zeilenumbrüche) aus einem String entferne

  Alt 29. Nov 2006, 10:47
Hallo
Schau mal nach Trim, das könnte auch was sein für Dich.

Blackheart
  Mit Zitat antworten Zitat
Thorben_K

Registriert seit: 22. Okt 2006
Ort: Darmstadt
105 Beiträge
 
Delphi 2006 Professional
 
#5

Re: Steuerzeichen (Zeilenumbrüche) aus einem String entferne

  Alt 29. Nov 2006, 11:34
trim entfern aber nur leerzeichen (und steuerzeichen) am ende und am anfang eines string, nicht in der mitte
Thorben
  Mit Zitat antworten Zitat
Benutzerbild von SirThornberry
SirThornberry
(Moderator)

Registriert seit: 23. Sep 2003
Ort: Bockwen
12.235 Beiträge
 
Delphi 2006 Professional
 
#6

Re: Steuerzeichen (Zeilenumbrüche) aus einem String entferne

  Alt 29. Nov 2006, 12:46
@Duffy: Die Deletevariante ist nicht besonders schnell. Besser ist wenn du eine zweite String-Variable nimmst und alle Zeischen darein kopierst außer das #13#10 und am Ende einmal die Länge setzt.
Jens
Mit Source ist es wie mit Kunst - Hauptsache der Künstler versteht's
  Mit Zitat antworten Zitat
Benutzerbild von Duffy
Duffy

Registriert seit: 19. Mär 2003
Ort: Wuppertal
835 Beiträge
 
Delphi 3 Standard
 
#7

Re: Steuerzeichen (Zeilenumbrüche) aus einem String entferne

  Alt 29. Nov 2006, 13:15
Hallo Jens,
Zitat von SirThornberry:
@Duffy: Die Deletevariante ist nicht besonders schnell. Besser ist wenn du eine zweite String-Variable nimmst und alle Zeischen darein kopierst außer das #13#10 und am Ende einmal die Länge setzt.
Es war ja nur ein Hinweis wie es gehen könnte ...


bye
Claus
Künftige Generationen wollen ihre Fehler selber machen.
Jedes Programm wird nie das können, was Du wirklich brauchst.
Das Gegenteil von gut ist gut gemeint
-----
  Mit Zitat antworten Zitat
marabu

Registriert seit: 6. Apr 2005
10.109 Beiträge
 
#8

Re: Steuerzeichen (Zeilenumbrüche) aus einem String entferne

  Alt 29. Nov 2006, 15:15
Hallo,

bei HTML-Text sollte man etwas genauer hinschauen. Eine Zeilentrennung kann in der Regel nicht einfach entfernt werden, sondern muss in der Regel (Ausnahme z.B. PRE) durch ein Leerzeichen ersetzt werden. Außerdem müsste streng genommen noch eine white space Verdichtung nachgeschoben werden. Ich würde auf den HTML-Code aber nicht mit String-Routinen losgehen, sonder den MSHTML-Parser benutzen.

Freundliche Grüße
  Mit Zitat antworten Zitat
Antwort Antwort


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 08:47 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