Hi
DP,
Ich will das Bild eines Sprites transparent darstellen, also habe ich die "Draw"-Peozedur von TImagesprite überschrieben und folgenden Code eingesetzt:
Delphi-Quellcode:
procedure .....Draw;
begin
if (FVisible) and (Image <> nil) then
begin
if OverlapRect(Engine.SurfaceRect, BoundsRect) then
begin
Image.DrawAlpha(Engine.Surface, BoundsRect, Round(AnimPos), FTransparency);
end;
DoDraw;
end;
end;
Ich habe ein Breakpoint reingesetzt und er führt es aus, zeichnet es aber immer Opac, egal ob ich 255 oder 0 angebe.
Immerhin zeichnet er, aber nicht richtig.
MfG
xZise