AGB  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Programmieren allgemein OnKeyDown und shift = ssShift geht nicht

OnKeyDown und shift = ssShift geht nicht

Ein Thema von roboter202 · begonnen am 25. Apr 2012 · letzter Beitrag vom 25. Apr 2012
Antwort Antwort
roboter202

Registriert seit: 6. Mär 2011
98 Beiträge
 
Delphi 6 Professional
 
#1

OnKeyDown und shift = ssShift geht nicht

  Alt 25. Apr 2012, 18:47
hi,

ich hab das:
Delphi-Quellcode:
procedure TForm1.ChatBoxKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if (Key = VK_RETURN) and (Shift = ssShift) then
  begin [...]
aber der Gerät sagt bei (Shift = ssShift inkompatible Typen dabei hab ich sogar in die Delphi Hilfe geschaut.


Was mach ich falsch?

Gruß roboter202
Christian
i := 0 ; While i = 0 do beep ;

Geändert von roboter202 (25. Apr 2012 um 18:50 Uhr)
  Mit Zitat antworten Zitat
Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
4.076 Beiträge
 
Delphi 10.1 Berlin Architect
 
#2

AW: OnKeyDown und shift = ssShift geht nicht

  Alt 25. Apr 2012, 18:50
Entweder (Shift = [ssShift]) oder (ssShift in Shift) je nachdem, was du erreichen willst.
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat
Benutzerbild von DeddyH
DeddyH

Registriert seit: 17. Sep 2006
Ort: Barchfeld
25.817 Beiträge
 
Delphi 10.1 Berlin Enterprise
 
#3

AW: OnKeyDown und shift = ssShift geht nicht

  Alt 25. Apr 2012, 18:51
if (Key = VK_RETURN) and (ssShift in Shift) then oder
if (Key = VK_RETURN) and (Shift = [ssShift]) then TShiftState ist eine Menge

[edit] *Gnarf* wo war der rote Kasten? [/edit]
Detlef
"Ich habe Angst vor dem Tag, an dem die Technologie unsere menschlichen Interaktionen übertrumpft. Die Welt wird eine Generation von Idioten bekommen." (Albert Einstein)
Dieser Tag ist längst gekommen
  Mit Zitat antworten Zitat
roboter202

Registriert seit: 6. Mär 2011
98 Beiträge
 
Delphi 6 Professional
 
#4

AW: OnKeyDown und shift = ssShift geht nicht

  Alt 25. Apr 2012, 18:51
achso stimmt es könnten ja mehrer Werte drin sein danke!
Christian
i := 0 ; While i = 0 do beep ;
  Mit Zitat antworten Zitat
Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 21:12 Uhr.
Powered by vBulletin® Copyright ©2000 - 2016, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2016 by Daniel R. Wolf