Einzelnen Beitrag anzeigen

marabu

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

Re: Seitenumbruch einer Seite erkennen

  Alt 16. Nov 2005, 17:17
Hallo Susanne,

wenn du die Datei in einer StringList verarbeitest, dann handelt es sich wohl um eine Textdatei. In Textdateien werden normalerweise nur ASCII control characters verwendet. #12 ist das Steuerzeichen für Seitenvorschub (form feed, FF), #13 ist das Zeichen für Wagenrücklauf (carriage return, CR). Finden kannst du Seitenvorschübe mit der Funktion Pos:

Delphi-Quellcode:
var
  s: TStrings;
  i: integer;
begin
  s := TStringList.Create;
  s.LoadFromFile(fileName);
  for i := 0 to Pred(s.Count) do
    if Pos(#12, s[i]) = 1
      then FormFeedFound(s[i])
      else WhatElse(s[i]);
  s.Free;
end;
Ob du auf dem richtigen Weg bist, kann ich natürlich nur sagen, wenn ich die Daten kenne.

Grüße vom marabu
  Mit Zitat antworten Zitat