AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Multimedia Delphi Farbige bitmap schwarz weiß machen
Thema durchsuchen
Ansicht
Themen-Optionen

Farbige bitmap schwarz weiß machen

Ein Thema von ghost007 · begonnen am 15. Mai 2007 · letzter Beitrag vom 17. Mai 2007
Antwort Antwort
Seite 1 von 2  1 2      
Benutzerbild von ghost007
ghost007

Registriert seit: 31. Okt 2005
Ort: München
1.024 Beiträge
 
Delphi 7 Personal
 
#1

Farbige bitmap schwarz weiß machen

  Alt 15. Mai 2007, 22:38
Hallo,
ich hab folgendes problem.
Ich will auf ein LCD via Image ein bild zeichnen, welches mit als farbige bitmap vorliegt.
Wenn ich diese bitmap nun direkt sende, erkennt man lediglich die umrisse, der inhalt ist schwarz.
Nun meine frage, wie kann ich die farbige bitmap in eine schwarz/weiß bitmap umwandeln?

MfG - Ghost007
Christian
Es gibt möglich Dinge und unmöglich Dinge.
Für unmögliche braucht man lediglich etwas länger.
  Mit Zitat antworten Zitat
matashen

Registriert seit: 29. Jan 2007
Ort: daheim
471 Beiträge
 
Delphi 10.2 Tokyo Enterprise
 
#2

Re: Farbige bitmap schwarz weiß machen

  Alt 15. Mai 2007, 22:42
dafür gibt es die property bitmap.pixelformat:=pf1bit;

Wenn das zu krass ist, kannst du ja mit grauwerten experimentieren. Infos dazu bei dsdt
Matthias
Das Leben ist eines der härtesten.
  Mit Zitat antworten Zitat
Benutzerbild von ghost007
ghost007

Registriert seit: 31. Okt 2005
Ort: München
1.024 Beiträge
 
Delphi 7 Personal
 
#3

Re: Farbige bitmap schwarz weiß machen

  Alt 15. Mai 2007, 23:01
hm, also das mit dem pixelformat is zu krass, weil dann icons, welche keine dunklen randlinien haben, teilweise verscwhinden.
Mit den grausufen jedoch, kann ich zwar auf der form einen erkennbaren effekt erzielen, das LCD merkt jedoch keinen unterschied

MfG - Ghost007
Christian
Es gibt möglich Dinge und unmöglich Dinge.
Für unmögliche braucht man lediglich etwas länger.
  Mit Zitat antworten Zitat
Benutzerbild von ghost007
ghost007

Registriert seit: 31. Okt 2005
Ort: München
1.024 Beiträge
 
Delphi 7 Personal
 
#4

Re: Farbige bitmap schwarz weiß machen

  Alt 17. Mai 2007, 10:47
*PUSH*
Christian
Es gibt möglich Dinge und unmöglich Dinge.
Für unmögliche braucht man lediglich etwas länger.
  Mit Zitat antworten Zitat
Benutzerbild von chaosben
chaosben

Registriert seit: 27. Apr 2005
Ort: Görlitz
1.358 Beiträge
 
Delphi XE2 Professional
 
#5

Re: Farbige bitmap schwarz weiß machen

  Alt 17. Mai 2007, 11:01
Hi!

Ich denke du musst die Bilder per Hand in einem Grafikprogramm in SW umwandeln. Per Code wirst du wahrscheinlich nie ein annehmbares Ergebnis erzielen.
Benjamin Schwarze
If I have seen further it is by standing on the shoulders of Giants. (Isaac Newton)
  Mit Zitat antworten Zitat
Hawkeye219

Registriert seit: 18. Feb 2006
Ort: Stolberg
2.227 Beiträge
 
Delphi 2010 Professional
 
#6

Re: Farbige bitmap schwarz weiß machen

  Alt 17. Mai 2007, 12:31
Hallo,

wenn du die TGIFImage-Komponente von Anders Melander einbindest, kannst du mit Hilfe der Routine ReduceColors die Anzahl der Farben in einer Bitmap mittels Dithering reduzieren:

Delphi-Quellcode:
// uses GIFImage

var
  bmp : TBitmap;
begin
  bmp := ReduceColors(SourceBitmap, rmMonochrome, dmFloydSteinberg, 0, 0);
  TargetBitmap.Draw (0, 0, bmp);
  bmp.Free;
end;
Gruß Hawkeye
  Mit Zitat antworten Zitat
Benutzerbild von ghost007
ghost007

Registriert seit: 31. Okt 2005
Ort: München
1.024 Beiträge
 
Delphi 7 Personal
 
#7

Re: Farbige bitmap schwarz weiß machen

  Alt 17. Mai 2007, 12:37
hey,
danke das is doch mal ein passables ergebnis

MfG - Ghost007
Christian
Es gibt möglich Dinge und unmöglich Dinge.
Für unmögliche braucht man lediglich etwas länger.
  Mit Zitat antworten Zitat
alzaimar
(Moderator)

Registriert seit: 6. Mai 2005
Ort: Berlin
4.956 Beiträge
 
Delphi 2007 Enterprise
 
#8

Re: Farbige bitmap schwarz weiß machen

  Alt 17. Mai 2007, 12:56
Eine sehr simple Methode ist, alle RGB-Pixel durch (R+G+B)/3 zu ersetzen. Mir reicht das in den meisten Fällen
"Wenn ist das Nunstruck git und Slotermeyer? Ja! Beiherhund das Oder die Flipperwaldt gersput!"
(Monty Python "Joke Warefare")
  Mit Zitat antworten Zitat
Benutzerbild von ghost007
ghost007

Registriert seit: 31. Okt 2005
Ort: München
1.024 Beiträge
 
Delphi 7 Personal
 
#9

Re: Farbige bitmap schwarz weiß machen

  Alt 17. Mai 2007, 12:58
öhm, wie meinen ? ^^

MfG - Ghost007

P.S.:Kenn mich mit canvas null aus ...
Christian
Es gibt möglich Dinge und unmöglich Dinge.
Für unmögliche braucht man lediglich etwas länger.
  Mit Zitat antworten Zitat
Benutzerbild von inherited
inherited

Registriert seit: 19. Dez 2005
Ort: Rosdorf
2.022 Beiträge
 
Turbo Delphi für Win32
 
#10

Re: Farbige bitmap schwarz weiß machen

  Alt 17. Mai 2007, 16:10
Du nimmst den Color-Wert, extrahierst da die Rot, Grün und Blauanteile raus (Hier im Forum suchenColorToRGB) und setzt die Farbe auf (R+G+B)/3
Damit das schön schnell geht, solltest du Hier im Forum suchenScanline benutzen.
Nikolai Wyderka

SWIM SWIM HUNGRY!
Neuer Blog: hier!
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 2  1 2      


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 18:44 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