fb:porticula NoPaste

Info / Hilfe Liste

Übersicht / Liste Neu

Datei hochladen Suche

Quellcode suchen

Dateidownload

4.4: Bildgröße ermitteln

Uploader:	nemored
Datum/Zeit:	24.09.2011 12:10:40

Hinweis: Dieser Quelltext ist Bestandteil des Projekts OpenBook: 2D-Spieleprogrammierung, zu dem es auf FreeBASIC-Portal.de eine Projektseite gibt.

' *** CODE 4.4: Bildgröße ermitteln



DIM bild AS ANY PTR

DIM AS INTEGER breit, hoch, dateinr

DIM AS STRING datei = "meinbild.bmp"

dateinr = FREEFILE    ' freie Dateinummer ermitteln



' Bildgroesse (Breite und Hoehe) auslesen

OPEN datei FOR BINARY AS #dateinr

GET #dateinr, 19, breit

GET #dateinr, 23, hoch

CLOSE #dateinr



' Fenster und Bildpuffer erstellen

SCREENRES breit, hoch, 32

bild = IMAGECREATE(breit, hoch)



' Bild laden und ausgeben

BLOAD datei, bild

PUT (0,0), bild, PSET

IMAGEDESTROY bild

GETKEY

Impressum • Nutzungsbedingungen • Datenschutz

Microsoft, Windows, Windows NT, XBOX und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.