Delphi-PRAXiS
Seite 3 von 6     123 45     Letzte »    

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Multimedia (https://www.delphipraxis.net/16-multimedia/)
-   -   Delphi 18bit Bilder erstellen?? (https://www.delphipraxis.net/57079-18bit-bilder-erstellen.html)

Simon6785 16. Nov 2005 20:50

Re: 18bit Bilder erstellen??
 
hey, schonmal echt danke für deine Hilfe, wäre echt verdammt cool wenn du das noch irgendwie hinbekommen würdest. leider kann ich kaum helfen, von der function die du geschickt hast verstehe ich nur banhof. meinst du denn das das irgendwie geht??Sag bescheid wenn doch noch mehr bilder oder infos oder sowas brauchst!

Gruß und danke SIMON

neolithos 17. Nov 2005 00:57

Re: 18bit Bilder erstellen??
 
schon mal versucht die Pixel und 2 bit nach links zu verschieben. Und das Bild verkehrt herum zu lesen?

Die Scheinen es genauso zu machen, wie es zu den alten Dos mit Bildern gearbeitet wurde. Damals gab es auch nur 6 Bit pro Farbe.

EDIT:
Das ist es erstmal nicht. Für Weis wird nur $FFFF, und irgentwie hab ich noch nicht raus für was das 3 byte da ist. Wahrscheinlich wird byte 1 und 2 und die 2 höchstens Bits von byte 3 verwendet.

neolithos 17. Nov 2005 03:18

Re: 18bit Bilder erstellen??
 
Liste der Anhänge anzeigen (Anzahl: 1)
Nach Umschreiben des Testprogrammes und mehrstündiger Analyse :coder2: der Hex-Darstellung :freak: im Vergleich zum Original bin ich zum Entschluss gekommen, dass diese Codierung vorliegt :dancer: :
Code:
32         5432 7654  7654 3276
bb__ ____  gggg bbbb rrrr rrgg
Die Unterstriche stellen nullen dar.
Angehängt ist der Quick&Dirty Algorithmus.
Muss unbedingt Optimiert werden.

EDIT:
Manchmal liegt er um eins oder zwei Farbwerte daneben, die scheinen sich was anderes für die Farbanpassung ausgedacht zu haben. Sehen wird man das aber mit dem blosen Auge nicht :mrgreen: .

Das war mal wieder eine Interessante Frage! THX

Simon6785 17. Nov 2005 07:32

Re: 18bit Bilder erstellen??
 
wow leute, ihr seid echt gut hier, soeine Hilfe hab ich ja in keinem Forum bisher bekommen!!:thumb: :thumb:

Hmm, den Code optimieren, das sagst du so, ich verstehe keine Zeile davon, aber ich werd alles mal nachschlagen und Probieren es zu verstehen, vlt kann ich ja dann was Optimieren...

Eine Frage, ich weiß ihr habt schon echt viel Zeit investiert, danke, aber ich brauch das auch noch anders rum! Also ich brauche eine Function die von 24bit bmp in dieses Bild umwandelt, und eine die zurück wandelt!!!

neolithos 17. Nov 2005 07:47

Re: 18bit Bilder erstellen??
 
Wenn du verstanden hast wie ich die eine Einrichtung erstellt habe. Kommst du auch auf den Weg für die andere.

Falls es Verständnis-Probleme gibt, stell am besten eine direkte Frage. Bitte nix allgemeines!

Simon6785 17. Nov 2005 08:05

Re: 18bit Bilder erstellen??
 
ich habe gerad kein delphi hier (erst heut abend wieder), probiere das gerade anhand des quellcodes zu verstehen... Wofür ist denn die Mouseover Procedure beim Image1? Wofür ist das Label und wofür das image2?!?

Naja, ich versteh das, das mit keinen allgemeinen Fragen, aber du stellst mich vor eine unlösbare Aufgabe, ich hab noch nie mit bitmaps oder den functionen dafür gearbeitet, ich würde das nie hinkriegen das andersrum zu machen...

neolithos 17. Nov 2005 08:13

Re: 18bit Bilder erstellen??
 
Vielleicht bin ich morgen wieder wach (in ca 9h) genug um mal ein paar Sätze zu schreiben. Was du da alles aufgezählt hast, hat nichts direkt mit dem Bitmap zu tun.

Im Prinzip sind Bitmaps die simpelste Darstellung eines Bildes. Sie sind nur ein 2D-Array mit Pixeln.

Und im Prinzip interessiert dich eigentlich primär nur die Funktion Bitmap18ToHandle.

Ich geb zu um die Geschichte andersherum zu gestalten muss, man sich auch mal mit der GDI beschäftigen oder die TBitmap-Klasse von Delphi verstehen. Wo ich letzteres Vorziehen würde.

Btw. Wenn ich nicht vergesse und Zeit habe kann ich die Funktion eve. etwas freundlicher Gestalten. Vielleicht findet sich auch jemand anderer in der Zwischenzeit.

Simon6785 17. Nov 2005 09:18

Re: 18bit Bilder erstellen??
 
hi, bitte vergiss mich nicht :wink:

ist es denn echt sehr Zeitaufwändig noch eine function zu bauen die es genau andersrum macht? Die code optimierung bekomme ich schon hin, ich probiere so lange rum bis es passt, aber die 2. Function, das kann ich nicht! ich schau heut abend nochmal rein, danke erstmal an alle die helfen!

neolithos 17. Nov 2005 09:22

Re: 18bit Bilder erstellen??
 
Liste der Anhänge anzeigen (Anzahl: 1)
So, das war aber jetzt wirklich der letzte Akt für heute.

Enthalten sind zwei Funktionen für das Konvertieren.

Vergiss den Autor nicht ;)

Versuch mal im Internet etwas über Bitmaps und deren Aufbau in Erfahrung zu bringen. Oder stell direkte Fragen.

Gute Nacht!

Simon6785 17. Nov 2005 10:04

Re: 18bit Bilder erstellen??
 
DANKE!! Ich weiß garnicht was ich sagen soll, echt danke.

2 verständnissfragen hab ich: der pointer bei der Bmp24ToBmp18 function, wir der nur zum freemem gebraucht?

Und: In wieweit wird denn da zeigerverkettet gearbeitet, dieses ^ ist doch das zeichen für ein zeiger, oder?


Alle Zeitangaben in WEZ +1. Es ist jetzt 07:56 Uhr.
Seite 3 von 6     123 45     Letzte »    

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