GFX LoadFile BMPTrans Turbo Pascal
aus Paswiki Turbo Pascal, der freien Wissensdatenbank
Beschreibung
Wie LoadFile_BMP. Jedoch wird die im zusätzlichen Parameter TransCol angegebene Farbe transparent gesetzt.
Deklaration
FUNCTION LoadFile_BMPTrans(Name : STRING; X0, Y0, XE, YE : Integer; TransCol : LongInt) : Integer;
Beispiel
{ ACHTUNG: Sie sollten ein Testbild namens TEST.BMP, }
{ das einige weiße Bereiche (Farbe $FFFFFF) aufweist }
{ im gleichen Verzeichnis wie das Programm deponieren ! }
PROGRAM Test;
USES GFX, Crt;
BEGIN
InitGraph(Mode800x600x24); { 24bit-Farbtiefe bei 800x600 Bildpunkten }
LoadFile_BMPTrans('TEST.BMP', 0,0,0,0, $FFFFFF); { lädt die BMP-Datei in voller Größe, }
ReadKey; { läßt jedoch alle weißen Punkte aus }
END.
