XProfan

Source wurde al 15.07.2007 de el MMJ-Quellcodesammlung (Dietmar Horn) en el Babyklappe en XProfan.Com abgelegt:
Mapa de bits-Anzeige
Lauffähig de Profano-Versión 5.0
-----------------------------------------------
titel:    Einfache Bitmapanzeige
autor:    Rolf Koch - ROKO-SOFTWARE
e-mail:   webmaster@rokosoft.de
homepage: http://www.rokosoft.de
datum:    14.01.2001
-----------------------------------------------
Erklärung:
----------
Ein Ventana es schön y bien, aber qué se una
Ventana sin Grafik u.s.w.
Profano unterstützt de Haus de el Bilder en el Formato
*.bmp - otro Formate sólo con entsprechenden Bibliotheken.
Hier habe Yo bewußt Bilder genommen, welche en el Windowsverzeichnis
C:Windows mentira (normalerweise es el sí el Pfad).
declarar ende%				Variables preparar
WINDOW 30,30 - 300,300			Ventana redactar
WINDOWTITLE Einfache Bitmapbefehle	Fenstertitel
Hier nun el gängigsten Anzeigeoptionen:
******************************************************************************
LoadSizedBmp C:WINDOWSSETUP.BMP,0,0-300,300;0
LoadSizedBmp SATURN.BMP,0,0-300,300;0
Mit Loadsizedbmp kann uno el Bild el Ventana adaptar. Bedeutet hier:
Bild C:WINDOWSSETUP.BMP se con 0,0 en el linken oberen Ecke
en 300,300 - also Größe des Fensters con el KOPIERWERT 0 (normal) adecuado!
******************************************************************************
LOADBMP C:WINDOWSKACHELN.BMP,30,30;0
LOADBMP WOLKEN.BMP,30,30;0
Angezeigt se hier el Expediente Kacheln.bmp a el Position
X=30 Y=30 (also oben bastante links) con 0 also Normal como el Bild aussieht adecuado!
******************************************************************************
LOADBMP C:WINDOWSÄgypten.BMP,80,30;-1
LOADBMP WINLOGO.BMP,80,30;-1
Angezeigt se hier el Expediente Ägypten.bmp a el Position
X=80 Y=30 (also oben bastante links) con -1 (linkes untere Pixel definiert el)
Farbe (lt. Profanhilfe), welche tranzparent erscheinen se) adecuado!
******************************************************************************
CopyBmp 10,10-40,40 > 140,30;0
Der Zona 10,10 (linkes oberste Ecke) en uno Größe 40x40 se a
Position 140,30 en el Normalmodus (0) kopiert y muestra.
******************************************************************************
CopySizedBmp 10,10-40,40>190,30-30,30;0
genau dasselbe como en Copybmp, sin embargo con el Diferencia:
el kopierte Zona se verkleinert (el hinteren 30,30) muestra.
Hinweis!!!: Schaut en el Ayuda después de más Bitmapbefehlen después de.
Alle Befehle beziehen se en el Endeffekt en el hier beschriebene Sistema.
Posesiones Yo en allen Demodateien en una Dummyschleife a erreichen!:

WHILENOT ende%				Solange no Variable ende%=1

    WAITINPUT				Wartet en Ratón oder Taste
    WEND					Zurück a WHILENOT ende%