Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
39.647 Beiträge
 
Delphi 11 Alexandria
 
#2

Re: Steganographie

  Alt 24. Feb 2009, 21:43
Delphi-Quellcode:
if bmp.PixelFormat <> pf24Bit then
begin
  MessageBox(Handle, 'Kein 24Bit Bmp-Datei', 'Fehler', MB_OK or MB_ICONWARNING );
  bmp := nil; <<<<<
ein schönes Speicherleck,
abgesehn davon gibt's beim nächsten Versuch ein Bild zu laden eine schöne Exception, da bmp nil ist und auf kein Objekt zeigt.

SetLeastSignificantBit der Name ist verwirrend ... 4 Bits sind kein Bit

Das mit dem extra Write-Button find ich verwirrend ... laß diesen Button weg und mach dieses mit in das Speichern-Menü rein.
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
Delphi-Tage 2005-2014
  Mit Zitat antworten Zitat