ffmpeg Start/stop

[Jero]

Hello,
I'm doing some testing with ffmpeg for a screenshot.
I can start the ffmpeg program,
but I can't program it to shut down properly.
with the keyboard the letter 'q' ends the program correctly.

Windows 10-64 Lazarus 2.0.8 32bit

Thanks,

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

1. procedure RunFFmpeg(const params: string);
2. begin
3.   if P.Running then
4.     Exit;
5.   P.Parameters.Clear;
6.   P.InheritHandles := False;
7.   P.Executable := ('ffmpeg.exe');
8.   P.Parameters.Add((params));
9.   // P.Options := [poWaitOnExit, poStderrToOutPut, poNoConsole ];
10.   P.Options := [poUsePipes];
11.   P.Execute;
12. end;
13.  
14. procedure TForm1.BpStartClick(Sender: TObject);
15. begin
16.   RunFFmpeg('-f gdigrab -framerate 10 -to 20 -i desktop -y "output.mkv"');
17. end;
18.  
19. procedure TForm1.BpStopClick(Sender: TObject);
20. var
21.   st: string;
22. begin
23.   if p.Running then
24.   begin
25.     // P.Terminate(0); exit;
26.     st := 'q' + Lineending;
27.     p.input.Write(st[1], length(st));
28.   end;
29. end;
30.  
31. initialization
32.   P := TProcess.Create(nil);
33.  
34. finalization
35.   P.Free;
36. end.                                
37.  

[Jero]

answer by me, ''taskkill /im ffmpeg.exe'' working well.