Einzelnen Beitrag anzeigen

Benutzerbild von Bernhard Geyer
Bernhard Geyer

Registriert seit: 13. Aug 2002
17.171 Beiträge
 
Delphi 10.4 Sydney
 
#10

Re: DBImage - Bitmap ist ungültig

  Alt 24. Apr 2009, 07:37
1, Lade das Image aus der DB in einen TMemory/TFileStream
2, Schreibe ab dem 79 Byte die Daten in einen weiteren Stream
Delphi-Quellcode:
OrgStream.Position := 78
OrgStream.SaveToStream(DestStream)
3, Speichere diesen 2ten Stream als Temporäre Datei
4, Lade diese temporäre Datei in einer TImage-Komponente
5, Lösche die temporäre Datei

Wenn du diesen Weg erstmal hast kannst du probieren diesen zu optimieren (Keine zwischenspeicherung auf Festplatte, ...)
Windows Vista - Eine neue Erfahrung in Fehlern.
  Mit Zitat antworten Zitat