Tastenbestätigung in Delphi

[TucTuc]

Zitat:

Zitat von rollstuhlfahrer (Beitrag 1031440)

Sieht dann so aus:

Delphi-Quellcode:

case key of
  VK_RETURN: DoReturn;
  VK_NUMPAD1: begin Ring := 1; Turnscore := 2; end;
  VK_NUMPAD2: begin Ring := 3; Turnscore := 4; end;
end;

Bernhard

geht auch so oder? dann hätte ich es noch übersichtlicher:

Delphi-Quellcode:

case key of
      114: turnscore := 1 AND ring := 3;
      115: turnscore := 2 AND ring := 3;
      116: turnscore := 3 AND ring := 3;
      117: turnscore := 4 AND ring := 3;
      118: turnscore := 5 AND ring := 3;
      119: turnscore := 6 AND ring := 3;
      120: turnscore := 7 AND ring := 3;
      121: turnscore := 8 AND ring := 3;
      vk_F11: turnscore := 9 AND ring := 3;
      vk_F12: turnscore := 10 AND ring := 3;
      220: turnscore := 11 AND ring := 3;
      49 : turnscore := 12 AND ring := 3;
      50 : turnscore := 13 AND ring := 3;
      51 : turnscore := 14 AND ring := 3;
      52 : turnscore := 15 AND ring := 3;
      53 : turnscore := 16 AND ring := 3;
      54 : turnscore := 17 AND ring := 3;
      55 : turnscore := 18 AND ring := 3;
      56 : turnscore := 19 AND ring := 3;
      57 : turnscore := 20 AND ring := 3;
end;

was bezweck der befehl "DoReturn"?

Zitat:

Zitat von rollstuhlfahrer (Beitrag 1031440)

VK_RETURN: DoReturn;
Bernhard

Ich revidiere: mit AND funktioniert das nicht sieht schön aus läuft aber nicht => lässt sich nicht compilieren
ich weiss ich bin doof
oder auch: "denken - knopf drücken - sprechen"


nochwas soll ich den falschen code wieder löschen wer auch immer das vieleicht später liesst ist doch bestimmt total verwirrt?

[TucTuc]

HAB NOCH EIN PROBLEM ENTDECKT:

vk_F11 und vk_F12 lassen sich nicht benutzen
wenn das programm läuft wird ein "thread-ende" fehler angezeigt

wenn ich die F10-Taste drücke ließt er sie zwar aus zeigt in den labeln die richtigen werte aber die f10-taste beendet die eingabe bzw. den fokus auf das programm wenn ich mit der maus draufklicke und somit der fokus wieder auf dem program liegt läuft es wieder...