Annak kiderítésére, hogy egy gomb megnyomásával az egér
Hogyan kihallgatni az állam az egér gombok onMouseMove esemény?
F1 + utolsó bekezdés
eljárás TForm1.FormMouseMove (Sender: TObject; Shift: TShiftState; X,
# XA0; Y: Egész szám);
kezdődik
ha (GetKeyState (VK_LBUTTON) és 128.) = 128
majd Caption: = „gomb megnyomása
mást Caption: = „gomb nincs lenyomva”;
végén;
Ez I.Pavel: nagyon köszönöm!
Ha a gomb megnyomása, hogy hozzáférjen a kontroll kurzort, majd mausmuva soha.
és ha megnyomja a gombot a vezérlő, elég megérteni, mi shiftsteyta összeszorított gombra.
És mégis, „128” írás nem szép, mert nem jelenik meg logikai lényegét.
> Ha a gombot addig, amíg a kurzort a beviteli ellenőrzés, akkor mausmuva
> Általában nem.
Úgy tűnik, csak a bal gomb, jobb?
mindenesetre elég shifisteyta
const
B128 = 128;
ha GetAsyncKeyState (VK_LBUTTON) és $ 8000 <> 0
# XA0, majd Caption: = "gomb megnyomásakor"
# XA0; máshol Caption: = "gomb megnyomása";
> Egyébként shifisteyta elég
elegendő csak akkor, ha (például, már említett érvként).
> Elegendő csak akkor, ha
Ha dorgaesh eseménykezelő közvetlenül, hanem az, hogy enyhén szólva is arra utal, hogy meg kell gondolni az építészet.
Shiftstate - ez is egy változatot, hanem azért, mert úgy hangzott, az [1], úgy döntöttem, hogy alternatívát kínáljon.
> A magasztos kérdések és ideális formája ez a szellem Vasisualy
> Lokhankin.
sőt, ő még csak három neidealnoformovyh és nevysokomaterialnyh: csirke, könnyű a WC és Barbara.
Ezért 128 (0x80). Nem ez az első, hogy menjen az egér?
> Miért 128 (0x80). Nem ez az első, hogy menjen az egér?
LSB szerint a „kapcsolt”, hogy a gomb (például, ha a CapsLock off), és a magas -, hogy a gomb megnyomása:
Ha a magas rendű bit értéke 1, a kulcs meg; egyébként, hogy felfelé.
Ha az alacsony rendű bit értéke 1, a kulcs kapcsolva. A kulcs, mint például a CAPS LOCK billentyűt, úgy váltakozik, ha be van kapcsolva.
A kulcs ki van kapcsolva és untoggled ha az alacsony rendű bit értéke 0.
Egy gomb key „s jelzőfény (ha van ilyen) a billentyűzeten lesz, amikor a kulcsot kapcsolva, és kikapcsol, ha a kulcs untoggled.
Memória: 0,76 MB
Idő: 0,056 c