www.f-in-box.com

Hi there,
Does anyone know how to get the Movie Background color and CONVERT IT TO TCOLOR ....

it looks like the control returns an integer but it is not the same as TCOLOR...

Thanks.

I am asking the same.

Please tell us how to make the movie background transparent in delphi without affecting movie inside.

See the new updated control, supports transparancy.

The following will convert between Flash and delphi colours.


function FlashToTColor(const FColor:dword):TColor;
var
r, g, b:byte;
begin
R := (FColor and $00FF0000) shr 16;
G := (FColor and $0000FF00) shr 8;
B := FColor and $000000FF;
result:=RGB(r,g,b);
end;

function TColorToFlash(const AColor:TColor):integer;
var
r, g, b:integer;
begin
result:=$000000;
result:=result or(AColor and $00FF0000) shr 16;
result:=result or(AColor and $0000FF00) ;
result:=result or(AColor and $000000FF) shl 16;
end;

Hope this helps

Pete

Pete, your great again... thanks.