Einzelnen Beitrag anzeigen

k--

Registriert seit: 24. Feb 2007
Ort: Berlin
9 Beiträge
 
Delphi 7 Professional
 
#1

TBitmap / TImage als TGA speichern macht Probleme

  Alt 20. Mär 2008, 16:16
Hallo werte DP-Community.


Wie der Titel des Threads bereits ankündigt habe ich Probleme den Inhalt eines TImage (wahlweise auch eines TBitmap) Ordnungsgemäß als Targa-Datei zu speichern. Habe bereits verschiedene Lösungsansätze ausprobiert:


1. GraphicEx Lib: Datei wird gespeichert, scheint aber komprimiert zu werden, was ich (in jedem Fall) vermeiden muss.

2. Graph64: Überhauptkeine Funktionalität — Verweigert den Programmstart mit einer Unmenge an Compilerfehlern.

3. Davie Reed's Targa Unit: Bisher am erfolgversprechendsten, unkomprimierte Speicherung etc. wie gewünscht (256px * 256px = 192kB)...
Problem: Ergebnisse sehen ähnlich diesen aus:
http://img155.imageshack.us/img155/790/crsu6.jpg | http://img155.imageshack.us/img155/5015/crqr4.jpg

4. turboPASCAL's Methoden (DP-Thread): 'Lange Version' gibt jedes Mal einen Fehler in der Zeile
Color32ToRGBA(P^ , c.r, c.g, c.b, c.a); aus. 'Kurze Version' erzielt nur eine Zugriffsverletzung. (Habe darauf geachtet, bei diesen Prozeduren nur TBitmap32 zu verwenden)


Nun zur weiteren Definition: Geöffnet wird ein Bild verschiedenster Formate (*.bmp; *.jpg; *.png; *.tga), was durch GraphicEx möglich gemacht wird. Anschließend soll ein Teil des Bildes (256px * 256px - Textur) als TGA, wie oben beschrieben, gespeichert werden. Realisiert habe ich das bisher über TImage-Komponenten und der Prozedur CopyRect().


Hoffe, jemand kann mir bei diesem Problem helfen. Bestensfalls unter Nutzung von Davie Reed's Targa Unit.



MfG.
  Mit Zitat antworten Zitat