Ergebnis der Suchanfrage

• Forum: Multimedia

  AW: Überflüssigen Hindergrund bei Bildern entfernen

   
    by MuTzE.Y85, 10. Jul 2013
  Für alle die das Gleiche suchen hier noch das Ganze mit Scanline:
  
  
  uses
  Math;
  
  procedure RemoveBackground(aBitmap: TBitmap);
  type
  PixArray = Array of Byte;
  var
• Forum: Multimedia

  AW: Überflüssigen Hindergrund bei Bildern entfernen

   
    by MuTzE.Y85, 29. Jun 2013
  Ich hatte das System nicht gleich verstanden.
  
  Ich werde das bei Gelegenheit mal mit Scanline probieren.
  Wenn es klappt poste ich hier gleich die Lösung.
  
  Danke schon mal!
• Forum: Multimedia

  AW: Überflüssigen Hindergrund bei Bildern entfernen

   
    by MuTzE.Y85, 28. Jun 2013
  Also ob das Objekt konkav oder konvex ist spielt eigentlich keine Rolle. Es soll ja einfach nur der Anfang gefunden werden.
  
  Also für Oben und Unten habe ich schon den Code.
  Die Frage ich jetzt nur wie ich Links und Rechts prüfe.
  
  Oben
  
  for H := 0 to aBitmap.Height - 1 do
  begin
  // Zeile einlesen
• Forum: Multimedia

  Überflüssigen Hindergrund bei Bildern entfernen

   
    by MuTzE.Y85, 26. Jun 2013
  Hi,
  
  ich arbeite zurzeit an einer Routine um überflüssigen Hintergrund eines Bildes zu entfernen.
  
  Kurz erklärt:
  
  Ich habe ein Foto von einem Gegenstand, auf einem weißen Hintergrund.
  Der Hintergrund steht an jeder Seite etwas über. Ein normales Bild halt.
  Jetzt möchte ich den weißen Hintergrund an jeder Seite soweit entfernen bis an jeder Seite die Außenkanten des Gegenstands an den...