Sign in Join
Wiki copytemporary

MouseAndKeyInput/fr: what changed

Revision 1 to 2. Removed lines have a minus sign; added lines have a plus sign.

OldNewLine
11# A propos
22
33Le paquet MouseAndKeyInput est un outil multi-plateform de manipulation avec la souris et l'entrée clavier. Vous pouvez déplacer le curseur vers une position spécifiée, envoyer des clicks et simuler des pressions de touche. Il est approprié pour le test des IHM ou le contrôle de programme de démonstration
44
55# Emplacement
66
77lazarusdir/components/mouseandkeyinput
88
99# Auteur
1010
1111Tom Gregorovic
1212
1313# Licence
1414
1515GPL
1616
1717# Journal des changements
1818
1919- Version 0.1
2020
2121# Restrictions
2222
2323- il n'est pas recommandé d'appeler la souris et les entrées clavier depuis des événements comme OnClick,, utilisez [[Asynchronous Calls/fr|Application.QueueAsyncCall]] à la place.
2424- ne pas oublier de revenir sur l'état d'un bouton de souris et d'une touche après la méthode Down avec la méthode Up.
2525
2626## Carbon
2727
2828- La pression sur les caractères alpha n'est pas supportée.
2929
3030## Gtk1/2
3131
3232- a besoin de la bibliothèque Xtst
3333- La pression sur les ALT+touche n'est pas supportée.
3434
3535# Comment faire
3636
3737Avec votre projet ouvert : Allez dans le répertoire d'installation de Lazarus -\> components -\> mouseandkeyinput.
3838
3939Là vous trouverez : `lazmouseandkeyinput.lpk`. Ouvrez et compilez le .lpk.
4040
4141Dans votre unit.pas ajoutez dans la clause Uses : MouseAndKeyInput ,LCLType
4242
4343Pour simuler la pression de F1 depuis une touche :
4444
4545``` pascal
4646procedure TForm1.HelpButtonClick(Sender: TObject);
4747begin
4848 KeyInput.Apply([ssCtrl]);
4949 KeyInput.Press(VK_F1); // This will simulate press of F1 function key.
5050 KeyInput.Unapply([ssCtrl]);
5151end;
5252```
5353
5454Les définitions VK sont trouvés ici : <http://lazarus-ccr.sourceforge.net/docs/lcl/lcltype/index-2.html>
5555
5656Contrôle de la souris :
5757
5858``` pascal
5959 MouseInput.Click(mbLeft,[],300,300); // Left click on X:=300 , Y:=300
6060 MouseInput.Click(mbRight,[],1365,2); // Right click on X:=1365 , Y:=2
6161```
6262
63-\
64-
6563---
6664*From the Free Pascal wiki, page "MouseAndKeyInput/fr", as it stood on 2020-02-20 after a change by Trev, out of the wiki's dump of 2024-05-26. Copyright stays with the author who wrote it, according to the old wiki's [[Licensing]] page. If you have concerns about this material, [message the admin](/wiki-contact).*

Back to history