canvas and PasLibVlc

[Vaytl]

Hello All.
I am trying to make the volume display of PasLibVlcPlayer.

Code: Pascal  [Select][+][-]

1. procedure TForm1.volume(Sender: TObject);
2. begin
3.   Canvas.Brush.Color:=RGBToColor(0,166,81);
4.   Canvas.Font.Color:=RGBToColor(255,255,255);
5.   Canvas.TextOut(80,60,'Volume 50%');
6. end;

But I cannot display the canvas on top of the player.
Please tell me what am I doing wrong?