keydown Strg+ALt+s gedrückt?

[gandime]

Hi,
wie finde ich heraus ob Strg+ALt+s gedrückt ist, da

Delphi-Quellcode:

KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);

ja nur Shift und Key mitliefert und somit würde mir noch Alt oder Strg fehlet jehnachdem welches als erstes gedrückt wurde.
Wie bekomme ich das hin?

mfg
ganidme

[timog]

Hi,

vielleicht hilft Dir ja ein Blick in die Hilfe :-)

Delphi-Quellcode:

TShiftState = set of (ssShift, ssAlt, ssCtrl, ssLeft, ssRight, ssMiddle, ssDouble);

Viele Grüße

Timo

[gandime]

nee tut es nicht da die Tasten ja gleichzeitig gedrückt werden und da TShiftState immer nur einen Wert haben kann geht das leider nicht:

Delphi-Quellcode:

if (Shift=[ssCtrl]) and (Shift=[ssAlt]) then

[Lannes]

Hallo,

versuch es mal damit:

Delphi-Quellcode:

if Shift = [ssAlt, ssCtrl] then

[Muetze1]

Zitat:

Zitat von gandime

nee tut es nicht da die Tasten ja gleichzeitig gedrückt werden und da TShiftState immer nur einen Wert haben kann geht das leider nicht:

Delphi-Quellcode:

if (Shift=[ssCtrl]) and (Shift=[ssAlt]) then

Das behauptest du. Schonmal gefragt warum du hier eckige Klammrn schreiben musst bei dem Vergleich aber z.B. bei

Delphi-Quellcode:

if Label1.Alignment = alTop then

nicht?

[] ist eine Mengenangabe und eine Menge (deutlich erkennbar an dem Set Of in der Deklaration) ist - wie der Name schon sagt - eine Menge und diese kann kein Element sowie auch mehrere Elemente enthalten. Ganz im Gegensatz zu einer Enumeration (wie z.B. TAlignment beim Label, erkennbar am nicht vorhandenen Set Of) welches nur ein Element enthalten kann.

Zu deiner Abfrage: Es gibt bei Mengen den Operator in mit dem du abfragen kannst ob ein bestimmtes Element in der Menge enthalten ist. von daher z.B. so:

Delphi-Quellcode:

if ( ssCtrl in Shift ) and ( ssAlt in Shift ) and ( Key = 's' ) then

Andere Möglichkeit: Wenn du der Menge die beiden Elemente ssAlt und ssShift hinzufügst und die sie danach immernoch den gleichen Inhalt hat, dann sind beide Elemente enthalten, sprich:

Delphi-Quellcode:

if ( Shift + [ssCtrl, ssAlt] = Shift ) and ( Key = 's' ) then

MfG

/EDIT:

Zitat:

Zitat von Lannes

versuch es mal damit:

Delphi-Quellcode:

if Shift = [ssAlt, ssCtrl] then

Damit würdest du prüfen ob in der Menge nur ssAlt und ssCtrl enthalten sind. Wenn dort vllt. eine Maustaste gedrückt ist (ssLeft) oder vllt. Shift (ssShift), dann würde die Abfrage fehlschlagen. Ein direkter Mengenvergleich geht genauso, aber damit sind dann auch alle anderen Möglichkeiten ausgeschlossen. Von daher musst du schauen, welches Verhalten du erreichen willst.

[gandime]

geht ja doch so danke :-)

[Lannes]

Hallo,

Zitat:

Zitat von Muetze1

Damit würdest du prüfen ob in der Menge nur ssAlt und ssCtrl enthalten sind. Wenn dort vllt. eine Maustaste gedrückt ist (ssLeft) oder vllt. Shift (ssShift), dann würde die Abfrage fehlschlagen. Ein direkter Mengenvergleich geht genauso, aber damit sind dann auch alle anderen Möglichkeiten ausgeschlossen.

das ist klar, für die Prüfung auf Strg+Alt+s ist es ausreichend, denn ich denke das z.B. bei Strg+Alt+Shift+s das Ergebnis False sein soll.

Zitat:

Zitat von Muetze1

Von daher musst du schauen, welches Verhalten du erreichen willst.

genau.

[Muetze1]

... das war nicht auf dich bezogen sondern als Erklärung für gandime gedacht. Schliesslich sieht deine Lösung anders aus als das was ich beschrieben habe und da diese Lösung noch fehlte wollte ich sie gleich noch erklären und den Unterschied festmachen. Deine ist genauso wenig falsch wie schlecht wie andere Lösung und so sollte es auch nicht rüberkommen. Sorry.

[Lannes]

Hallo,

ist nicht so rübergekommen :) ,
seh meinen Beitrag als zusätzliche Hinweis zu Deinen guten und ausführlichen Erläuterungen.