TGA Bilder laden - Versionsgeschichte

DGLBot: Der Ausdruck ''(.*?)'' wurde ersetzt mit ''$1''.

2009-03-10T18:10:39Z

Der Ausdruck ''<pascal>(.*?)</pascal>'' wurde ersetzt mit ''<source lang="pascal">$1</source>''.

2008-05-04T17:06:09Z

2008-05-04T16:59:49Z

Es ist kein Tutorial. In die Kategorie sollten nur Artikel die mit "Tutorial " anfangen und auf der Tutorial Seite aufgelistet sind.

2008-05-02T16:35:30Z

Inhaltsverzeichnis angepasst & Kategorie: Tutorial

2007-12-12T19:50:15Z

‎TGA Dateien - Warum?

2007-08-07T17:54:49Z

‎Definition eines Datentyps

2007-08-06T18:26:05Z

2007-08-05T21:25:03Z

‎Die Datei laden

2007-08-05T21:24:23Z

‎Definition eines Datentyps

2007-08-05T21:21:28Z

‎Die Datei laden

@@ Zeile 47: / Zeile 47: @@
 in unserem Dokument von wotsit):
-<pascal>
+<source lang="pascal">
 type
    TTGAFile = record
@@ Zeile 55: / Zeile 55: @@
       data: ^byte; // Pixels, dynamic length
    end;
-</pascal>
+</source>
 == Die Datei laden ==
@@ Zeile 70: / Zeile 70: @@
 sich natürlich auch Streams an. Allerdings ist dies für diesen konkreten Fall nicht von Belang.
-<pascal>
+<source lang="pascal">
 function LoadTGA(const filename: string): TTGAFile;
 var f: file; bytes: longword;
@@ Zeile 94: / Zeile 94: @@
    close(f);
 end;
-</pascal>
+</source>
 Diese Funktion lädt alle benötigten Daten aus der Datei; reserviert auf Basis
@@ Zeile 107: / Zeile 107: @@
 hier unser eigenes Record anstatt einer SDL-Surface verwendet. Nicht vergessen
 den dynamisch reservierten Speicher für die Pixeldaten nach der Verwendung mit
-<pascal>
+<source lang="pascal">
 FreeMem(TGARecord.data);
-</pascal>
+</source>
 wieder freizugeben!
-<pascal>
+<source lang="pascal">
 procedure TGATexture(const filename: string; var TexID: longword);
 var
@@ Zeile 136: / Zeile 136: @@
    end;
 end;
-</pascal>
+</source>
 Ich hoffe dieser Artikel war hilfreich (Ich will Feedback!) und wünsche euch

← Nächstältere Version		Version vom 4. Mai 2008, 17:06 Uhr
Zeile 142:		Zeile 142:

	Gruß Waran.		Gruß Waran.
		+
		+	[[Kategorie:Technik oder Algorithmus]]

@@ Zeile 6: / Zeile 6: @@
 Dieses Dateiformat ist für den Anfang aus verschiedenen Gründen auf voller
 Linie empfehlenswert. Es ist sehr einfach aufgebaut und die Pixeldaten liegen
-auch schon in einer von neueren OpenGL-Implementierungen direkt benutzbaren
+auch schon in einer von "neueren" OpenGL-Implementierungen (konkret: 1.2) direkt benutzbaren
 Ordnung vor.

@@ Zeile 39: / Zeile 39: @@
   Image Pixel Size     - anhand dieser können wir u.a. ermitteln, ob ein Alphakanal
                          vorhanden ist.
-  Identification Field - die eigentlichen Pixeldaten.
+  Image Data Field     - die eigentlichen Pixeldaten
 Damit haben wir alles benötigte zusammen und können diese Informationen schon

@@ Zeile 1: / Zeile 1: @@
 == TGA Dateien - Warum? ==
-In diesem Tutorial (mein erstes) geht es um das manuelle Laden von Truevision
+In diesem Artikel geht es um das manuelle Laden von Truevision
 Bilddateien mit der allseits bekannten Endung ".tga".
@@ Zeile 136: / Zeile 136: @@
 </pascal>
-Ich hoffe dieses Tutorial war hilfreich (Ich will Feedback!) und wünsche euch
+Ich hoffe dieser Artikel war hilfreich (Ich will Feedback!) und wünsche euch
 viel Spaß und Erfolg bei euren zukünftigen Projekten.
 Gruß Waran.

@@ Zeile 72: / Zeile 72: @@
 var f: file; bytes: longword;
 begin
-   assign(f, filename); reset(f, 1);
+   assign(f, filename);
    // type

@@ Zeile 79: / Zeile 79: @@
    // type
-   seek(f, 2); blockread(f, result.iType, 1);
+   seek(f, 2);
    // w, h, bpp
-   seek(f, 12); blockread(f, result.w, 5);
+   seek(f, 12);
    result.bpp := result.bpp div 8;
@@ Zeile 88: / Zeile 90: @@
    bytes := result.w * result.h * result.bpp;
    getmem(result.data, bytes);
-   seek(f, 18); blockread(f, result.data^, bytes);
+   seek(f, 18);
    close(f);