-
Forum: Sonstige Fragen zu Delphi
Delphi
by TucTuc,
24. Jun 2010
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...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by TucTuc,
24. Jun 2010
geht auch so oder? dann hätte ich es noch übersichtlicher:
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;
-
Forum: Sonstige Fragen zu Delphi
Delphi
by TucTuc,
24. Jun 2010
zum heulen wenn ich das in tabellenform gelassen hätte...
gut ihr habt recht wesentlich besser
letztendlich muss ja 3 mal abgefragt werden...
sind beim dart schließlich 3 würfe und dann muss die wertung der 3 würfe noch gespeichert werden und das pro spieler pro runde und pro spielvariante
hab schon nen kumpel gefragt wir treffen uns morgen zur "lagebesprechung" :D na mal sehn ob uns da was...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by TucTuc,
24. Jun 2010
warum ist in case of besser?
würde das programm auch nicht kürzer machen?
und if in einer repeatschleife erschien mir einfacher...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by TucTuc,
24. Jun 2010
num 8, 4, 5, 6, 2 funktionieren trotzdem nicht
irgentwer ne ahnung ich verzweifle...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by TucTuc,
24. Jun 2010
hab das problem schon selbst gelöst:
taste tastenadresse Sodertastenadresse
num1 35 VK_NUMPAD1
num2 40 VK_NUMPAD2
num3 34 VK_NUMPAD3
num 0 96 VK_NUMPAD0
num, 110 VK_DECIMAL
die abfragen mit vk_ wie vk_esc oder eben vk_numpad1 werden offensichtlich direkt unabhängig von shift, numlock... abgefragt
-
Forum: Sonstige Fragen zu Delphi
Delphi
by TucTuc,
24. Jun 2010
nun der fuktionierende code:
procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
turnscore := 0;
ring := 0;
//Inner-Bull Ring1:
if key = 112 then
begin
-
Forum: Sonstige Fragen zu Delphi
Delphi
by TucTuc,
23. Jun 2010
man seid ihr kritisch sollte lediglich ne erklärung sein was ich mit meinem programm bezwecke
ja und ihr habt recht das mit then...and...; hab ich auch festgestellt
verzweifle gerade an der lösung möchte nocht jedes mal begin...end
hat da wer ne ahnung?
so für unsere syntax liebhaber: ( :P )
also das sollte ja wie gesagt den zweck des programms erklären:
ich habe schlechte erfahrungen mit...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by TucTuc,
23. Jun 2010
So es funktioniert ich war nur zu doof bzw. zu schwer von kapische...
Wie auch immer nocheinmal zusammengefasst für all die aderen die was ähnliches versuchen:
-Ziel war eine "Unsichtbare Tastenabfrage"
-Man klickt auf das Formular, so das es den Fokus hat
links im Objektinspektor müssten nun die Eigenschaften von TForm1 oder wie ihr es auch immer genannt habt stehen
=> dort klickt ihr...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by TucTuc,
16. Mai 2010
Also erstmal ein paar misverständnisse mit den labelanzeigen hatte ich mir schon so gedacht mit dem klicken und on key press zum testen
ich wollte das gerne ohne editfeld haben da lag mein problem wenn ich das über on key press mache geht das ohne editfeld aber ich scheine lediglicjh eine taste belegen zu können...
Ich möchte eifach das wenn ich eine taste drücke ein paar variablen werte...
-
Forum: Sonstige Fragen zu Delphi
Delphi
by TucTuc,
15. Mai 2010
unit Tastendruck_Testprogramm;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
-
Forum: Sonstige Fragen zu Delphi
Delphi
by TucTuc,
14. Mai 2010
Vielen Dank euch allen, muss das wenn ich morgen wieder Daheim bin testen. Und ich wusste nicht das man auch daneben Doppelklicken kann, wenn man draufklickt bekommt ja "Onclick" sprich die Aktion wird nur beim draufklicken ausgeführt, deshalb hatte ich das kompliziert. Man kann immer alles so einfach haben :wall:
Grüße
TucTuc
-
Forum: Sonstige Fragen zu Delphi
Delphi
by TucTuc,
14. Mai 2010
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;
type
TForm1 = class(TForm)
-
Forum: Sonstige Fragen zu Delphi
Delphi
by TucTuc,
14. Mai 2010
Schon mal vielen Dank für die Antworten aber wie deklariere ich den Bezeichner keypreview ist doch schließlich keine Variable?!
Könntet ihr mir ein Quellcode Beispiel geben?
Grüße
TucTuc
-
Forum: Sonstige Fragen zu Delphi
Delphi
by TucTuc,
14. Mai 2010
Ich möchte gerne z.B. die "Caption" eines Labels mit einem druck einer voher festgelegten Taste änder müssen.
Also im Prinzip if a gedrückt then caption.label1 := 'tasta a wurde gedrückt'.
Letztendlich soll jedem Tastendruck auch ein Wert zugewiesen werden können.
Soll heißen wenn ich die Taste a Drücke soll das Programm eine Variable z.B. den Wert 20 zuweisen.
If a gedrückt then f:= 20.
