Delphi) Hoe capture/gebruik ik de extra muisknoppen Deel2

[Verwijderd]

Mijn eigen oplossing gemaakt om alle muisknoppen realtime en systemwidth af te
vangen. (Na veel commentaar in het vorige gesloten topic)
======================================
Met dank aan Curry & Lord Larry voor de inspiratie.
======================================
Hier volgt mijn eigen ontwikkelde code die waarschijnlijk te simpel is voor got, maar je moet er maar opkomen om het op deze manier te doen, toch?

code:

procedure TForm1.Timer1Timer(Sender: TObject);
var
keyloop, KeyResult : Integer;
begin
keyloop := 0;
repeat
KeyResult := GetAsyncKeyState(keyloop);
if KeyResult = -32767 then
begin
//Controleer op alle muisknoppen
if keyloop = 5 then Form1.Caption := 'OndersteZijMuisknop';
if keyloop = 6 then Form1.Caption := 'BovensteZijMuisknop';
if keyloop = 1 then Form1.Caption := 'LinkseMuisknop';
if keyloop = 2 then Form1.Caption := 'RechtseMuisknop';
if keyloop = 4 then Form1.Caption := 'MiddelsteMuisknop';
end;
inc(keyloop);
until keyloop = 255;
end;
end.

[ Voor 19% gewijzigd door Verwijderd op 27-02-2003 15:21 ]

[curry684]

[LordLarry]

Ik ben blij dat je zelf tot een oplossing bent gekomen En nog wel een hele andere als waar we eerst heen gingen.

PS: Vergeet je [code] tags niet, dat maakt het stukke leesbaarder

[Verwijderd]

Dank je ik was vergeten hoe dat werkte
En nu lukt het weer niet...


Nogmaals bedankt Code Larry

[ Voor 51% gewijzigd door Verwijderd op 27-02-2003 15:21 ]

[LordLarry]

afsluiten met [/code]

en als je [code=taal] gebruikt ziet het er nog beter uit. Waar je taal natuurlijk vervangt door de taal waar je het in schrijft.

[ Voor 76% gewijzigd door LordLarry op 27-02-2003 15:21 ]

[whoami]

Leuk dat je tot een oplossing gekomen bent, maar ik zie eerlijk gezegd het nut niet echt in om daarover een nieuw topic te openen.


(Ow, het is natuurlijk wel tof van je natuurlijk dat je de mensen die je geholpen hebben ff bedankt hebt. ) Maar goed, dit topic heeft waarschijnlijk niet veel meer nut dan het bedanken, dus doe'k em maar dicht.

[ Voor 48% gewijzigd door whoami op 27-02-2003 17:02 ]