Ergebnis der Suchanfrage

• Forum: Multimedia

  AW: Leere Seite (blank page) filtern bei DelphiTwain

   
    by Jens01, 26. Aug 2015
  "Staatsanwalt" :shock: :shock: :shock:
  
  Vielleicht solltest Du die "leeren" Seiten nicht verwerfen, sondern nur extra ablegen.
• Forum: Multimedia

  AW: Leere Seite (blank page) filtern bei DelphiTwain

   
    by Jens01, 26. Aug 2015
  Du zählst dies lBlack hoch und prüfst es gegen eine Konstante. Du brauchst es aber nur prüfen, wenn es sich verändert hat (Inc(lBlack)). Ansonsten ist das Ergebnis der Prüfung (if lBlack >= MaxBlack then) gleich mit dem des vorherigen Schleifendurchlauf.
  Wenn die Hauptschleifen oft durchlaufen wird, kann sich des schon zeitlich auswirken.
• Forum: Multimedia

  AW: Leere Seite (blank page) filtern bei DelphiTwain

   
    by Jens01, 25. Aug 2015
  If (lLine^.rgbtred + lLine^.rgbtBlue + lLine^.rgbtgreen) Div 3 < Tolerance Then
  begin
  Inc(lBlack); // = dunkler Wert -> schwarz
  If (lBlack >= MaxBlack) Then // viele schwarze Pixel
  Begin
  Result:=False; // = Bild mit Inhalt
  // Exit; // Zeit sparen!!!
  End;
  End;
  Noch schneller...