Dann
darf die STRG-Taste aber nicht gedrückt sein. Wieso nicht einfach
Delphi-Quellcode:
procedure TForm1.FormKeyUp(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
Color := FormColor;
end;
Weil wenn man folgende Tasten drückt:
- ↓ CTRL
- ↓ Andere Taste (z.B. A)
- ↑ Diese andere Taste
- ↑ CTRL
Dann wird zu früh die Color zurückgesetzt. Wobei ich mich Frage ob das nicht auch der Fall ist, wenn man auf
not(ssCtrl in Shift) testet.
MfG
Fabian