Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Image Canvas Pixel in Memo (https://www.delphipraxis.net/114662-image-canvas-pixel-memo.html)

shmia 30. Mai 2008 09:23

Re: Image Canvas Pixel in Memo
 
Image.Width und Image.Height geben nicht immer die wirklich Höhe und Breite des Bitmaps wieder.
Man muss Image1.Picture.Width und Image1.Picture.Height verwenden!

PS: ich hab mit jetzt eine Stegano-Klasse programmiert, die ich demnächst als Freeware rausgebe.

Medium 30. Mai 2008 14:54

Re: Image Canvas Pixel in Memo
 
Häng doch am besten mal dein Projekt und das Testbild an. Beim reinen Draufgucken kann ich so erstmal keinen Fehler mehr feststellen, der zu genanntem Effekt führt.

XXcD 31. Mai 2008 14:12

Re: Image Canvas Pixel in Memo
 
Liste der Anhänge anzeigen (Anzahl: 1)
Sorry ich konnte noch nicht früher antworten mein Monitor streikt gerade,
aber hier habe ich mal das Projekt angehängt. Ich hoffe mal mir kann dann einer sagen
warum das nicht funktioniert.

Luckie 31. Mai 2008 15:21

Re: Image Canvas Pixel in Memo
 
Zitat:

Zitat von XXcD
Hallo,
ich versuche gerade ein Image pixel für pixel abzuarbeiten und die Fraben als Zeichen in ein Memofeld einzufügen.
Nur leider will meine Prozedur nicht richtig funktionieren.

Eigentlich sollte das rauskommen: Das ist ein Testtext.
Es kommt aber das heraus: ˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙

Sagt mal Jungs, wo kauft ihr eure Glaskugeln? Wie kommt man bei der Problembeschreibung auf Steganographie?

Medium 1. Jun 2008 01:04

Re: Image Canvas Pixel in Memo
 
@Luckie: Bei Text in Bildern "vergurkst" kann man schon in die Richtung denken, aber der TE ließ an sich nix in diese Richtung verlauten, da stimme ich zu :)

@XXcD: Du hast in dem rar ein anderes Bild genommen, als in deiner Ausgangsfrage beschrieben, und hierbei ist der Effekt, dass nachher nichts im Memo steht. Das liegt daran, dass der erste Pixel im Bild komplett schwarz ist, also am Anfang gleich ein chr(0) steht. #0 ist aber bei PChar (was die Win-API intern nutzt) das Zeichen für "Ende des Strings", und somit ist klar warum der restliche Text "Testex" nicht im Memo landet, obwohl er im zusammengesetzten String drin steht.

Lösung: Du musst entweder darauf achten, dass in den Bildern nur Blauwerte > 31 auftauchen, oder vor dem Anhängen an den String diese ausschließen da es nicht darstellbare Steuerzeichen mit unterschiedlichen Effekten sind. Da aber wie gesagt nicht das gleiche Bild wie o.g. im Archiv ist, kann man nicht sagen was genau da schief gegangen ist.


Alle Zeitangaben in WEZ +1. Es ist jetzt 05:25 Uhr.
Seite 2 von 2     12   

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