Moin moin
Ich möchte gern wissen ob die Shift-Taste gedrückt ist, aber es funktioniert nicht.
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var state: TShiftState;
begin
if ssShift in state then Outputdebugstring('shift ist gedrückt')
else Outputdebugstring('shift ist nicht gedrückt');
end;
Wenn ich nun auf den Button1 klicke und dabei shift gedrücke halte, dann zeigts im Debugfenster: 'shift ist nicht gedrückt'
Weiss jemand wieso?
Gruss Jjep