bitmap dursichtig zeichnen

[Aya]

Mh...??

Du kannst nich einfach nen Bitmap zeichnen, du kannst es nur als Textur verwenden.

Du mußt also nen Quad erstellen und darauf dein Bitmap als Textur verwenden.. schau dir mal in der kglTextures.pas die beschreibung der Befehle an (ganz oben).. sollte eigentlich verständlich sein :)

Au'revoir,
Aya~

[negaH]

Delphi-Quellcode:

Canvas.Brush.Color := clRed;
Canvas.BrushCopy(Bounds(), Bitmap, Bounds(), clWhite);

zeichnet die Bitmap und ersetzt alle clWhite Pixels durch clRed.

Ansonsten schau dir TImageList ggenauer an, und .Masked, .AddMasked.
Über's API gibt es MaskBlt().

Gruß Hagen

[Aya]

Hi,

@Hagen: er möchte das ganze doch mit OpenGL machen ;)

Au'revoir,
Aya~

[negaH]

Shit, stimmt das habe ich überlesen. Ich habe mich schon gewundert warum die Experten nicht auf BrushCopy hingewiesen haben. Naja, lesen sollte man halt können :)

Gruß Hagen

[Illuminator-23-5]

@aya
ich hab mir die beschreibungen durchgelesen, aber könntest du mir mal ein beispiel-prog schicken?

[Aya]

Hi,

was klappt denn da nicht? :roll:

Du erstellst eine Textur:

Delphi-Quellcode:

MyTex:=TTextur.Create('C:\...\bla.jpg');

dann machst du die farbe Rot transparent:

Delphi-Quellcode:

MyTex.SetAlphaColor(255,0,0,0);

(Die 4te Zahl ist der AlphaWert für die Farbe - RGBA)

und dann kannst du die Textur jederzeit dort verwenden wo du sie brauchst mit:

Delphi-Quellcode:

MyTex.Bind;

Natürlich noch AlphaMasking aktivieren davor :)

Au'revoir,
Aya~