libmpv media player control

[domasz]

Fixed my FullScreen code above. It was making main form a bit too big. Now it's good.

[Espectr0]

Fixed my FullScreen code above. It was making main form a bit too big. Now it's good.

Excellent! Thanks for sharing! 

[domasz]

Here's something that would be nice to have but I can't figure out the params.
https://mpv.io/manual/master/#command-interface-screenshot-raw

[Espectr0]

Here's something that would be nice to have but I can't figure out the params.
https://mpv.io/manual/master/#command-interface-screenshot-raw

I think the easiest way would be a procedure like this:

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

1. procedure TMPVPlayer.ScreenshotToClipboard(const AScreenshotMode: TMPVPlayerScreenshotMode = smVideo);
2. var
3.   s : String;
4.   p : TPicture;
5. begin
6.   s := ChangeFileExt(GetTempFileName, '.png');
7.   ScreenshotToFile(s, AScreenshotMode);
8.   if FileExists(s) then
9.   begin
10.     p := TPicture.Create;
11.     try
12.       p.LoadFromFile(s);
13.       Clipboard.Assign(p.Bitmap);
14.     finally
15.       p.Free;
16.     end;
17.     DeleteFile(s);
18.   end;
19. end;                                                                          
20.