IsMouseClick(integer) Method
Jelzi ha feldolgozatlan egérművelet áll rendelkezésre.
function IsMouseClick(const Kind: integer): boolean;
Parameters
- Kind
- Type: integer
Az egérművelet jellege (lásd alább).
Return Value
Type: boolean
A használható típusok:
Kind | Description |
---|---|
MouseMove | az egér mozog az grafikus képernyő felett |
MouseLeftDblClick | a bal egérgombbal dupla kattintás történt |
MouseLeftDown | a bal egérgombot lenyomták |
MouseLeftUp | a bal egérgombot felengedték |
MouseMiddleDblClick | a középső egérgombbal (görgő) dupla kattintás történt |
MouseMiddleDown | a középső egérgombot (görgő) lenyomták |
MouseMiddleUp | a középső egérgombot (görgő) felengedték |
MouseRightDblClick | a jobb egérgombbal dupla kattintás történt |
MouseRightDown | a jobb egérgombot lenyomták |
MouseRightUp | a jobb egérgombot felengedték |
procedure CircleAtClick; var X, Y: integer; begin repeat until IsMouseClick(MouseLeftDown); GetMouseClick(MouseLeftDown, X, Y); Circle(X, Y, 5); end;