Form canvas painting
lazarus / 21-General

----------------------------------------------------------------------
pcurtis · 2021-06-04 06:51

I have an external app (MPV) that can display videos on another apps
canvas. This works fine, but for example, if I create a form with a
button and MPV paints its output on that form the button is painted
over.
How would I keep the button visible?

----------------------------------------------------------------------
pcurtis · 2021-06-04 13:36

Seems like a lot of worxk. It doesn't have to be a real button, just a
box I can click.

----------------------------------------------------------------------
winni · 2021-06-04 14:45

Hi!

Don't use a button but a Hot Key:

Set in th main form the property keypreview to true.

Create a procedure for the KeyDown event of the Form:


Code: Pascal  [Select][+][-]window.onload = function(){var x1 =
document.getElementById("main_content_section"); if (x1) { var x =
document.getElementsByClassName("geshi");for (var i = 0; i uses ...,
LCLtype;... procedure TForm1.FormKeyDown(Sender: TObject; var Key:
Word; Shift: TShiftState); begin  if (ssCtrl in shift) and (key=
VK_F5) then  MyAction;  end; 

In the above example the key combination Ctrl-F5 is triggered.

Now you only have to write a procedure MyAction where you define
what's gonna happen.

Winni

----------------------------------------------------------------------
pcurtis · 2021-06-04 16:32

I know these options it's more about drawing on the canvas and not
getting it over painted.

----------------------------------------------------------------------
pcurtis · 2021-06-09 11:54

I pass the handle to the app.