Entwickler-Ecke
Delphi Language (Object-Pascal) / CLX - TShiftState selbst befüllen
Bergmann89 - Fr 13.02.09 15:48
Titel: TShiftState selbst befüllen
HI,
ich bin grad dabei mir ne eigene Komponente zu schreiben. Unteranderem hat sie ein MouseMoveEvent und da übergeb ich als Variable Shift: TShiftState und ich weiß aber nich wie ich das dann mit den gedrückten Tasten befüllen soll. Gibts da ne Funktion die mir das macht oder muss ich das alles selbst machen, wann ja wie?
MfG & Thx Bergmann.
jaenicke - Fr 13.02.09 16:09
Ein wenig Spielerei: :mrgreen:
Delphi-Quelltext
1:
2:
3:
4:
5:
| Shift := [ssCtrl];
Shift := Shift + [ssShift];
Include(Shift, ssAlt);
Exclude(Shift, ssCtrl);
Shift := Shift - [ssShift]; |
Bergmann89 - Fr 13.02.09 16:30
HI,
das hab ich gesucht, dankö^^
MfG Bergmann.
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!