Einzelnen Beitrag anzeigen

Darkchild

Registriert seit: 13. Okt 2006
Ort: NRW
169 Beiträge
 
Delphi 2006 Enterprise
 
#1

Backspace Taste im OnKeyPress Ereigniss abfangen

  Alt 30. Jan 2007, 16:31
Hallo zusammen,

folgendes kleines Problemchen, oder besser gesagt 2. Aber mal besser vorne Anfangen.

1.Ich möchte bestimmte Tasten bei der Eingabe im Edit Feld nicht zulassen, andere wiederum schon, klappt auch fast alles so wie es soll, nur möchte ich noch die Backspace Taste zulassen, die im Augenblick gesperrt ist, nur wie muss ich diese Eintragen ?

Der Code sieht bis jetzt folgendermaßen aus:
Delphi-Quellcode:
procedure Tfrmgrundrechenarten.edtgrundrechenergebnissKeyPress(Sender: TObject;
  var Key: Char);
begin
case key of
    '0'..'9',',': ;
else
    Key := #0;
    Beep;
end;
end;
2.Das zweite Problem was ich habe ist das ich mir zufallszahlen generieren lasse um somit Aufgaben(Mathe) zu erstellen, klappt auch soweit wunderbar, nur möchte ich das bei der Division die ergebnisse nur mir 3 stellen hinterm Komma eigegeben werden müssen, das heist das Ergebniss welches ich mit der Eingabe vergleiche muss auf 3Stellen hinter dem Komma abgeschnitten werden, ich möchte die das vorher gerundet wird, sondern nur das die anderen stellen 'Verschwinden'.
Das ganze wäre sicherlich über die Stringfunktionen Pos usw. möglich, doch muss das ganze doch auch eleganter gehen, habe dann an die Formatbezeichner gedacht, aber das klappt scheinbar nicht, da ich die Variable mit dem Datentypen Variant belegt habe.

Kann mir da vieleicht jemand bei helfen ob es da noch andere Möglichkeiten gibt oder nur Stringfunktionen und Formatbezeichner in Frage kommen ?

Gruss
Darkchild
Ich bin der Geist der stets verneint und das mit recht, denn alles was entsteht ist wert das es zugrunde geht, drum besser wär das nichts entstünde, so ist denn alles was ihr Sünde, Zerstörung, kurz das Böse nennt, mein eigendliches Element.
  Mit Zitat antworten Zitat