Delphi Stringgrid akzeptiert nicht gewünschte Zeichen - Seite 2

Thema durchsuchen

Ansicht

Themen-Optionen

Stringgrid akzeptiert nicht gewünschte Zeichen

Ein Thema von Hansa · begonnen am 11. Jul 2003 · letzter Beitrag vom 11. Jul 2003

Vorheriger Beitrag

Nächster Beitrag

Hansa

Registriert seit: 9. Jun 2002
Ort: Saarland
7.554 Beiträge

Delphi 8 Professional

Stringgrid akzeptiert nicht gewünschte Zeichen

11. Jul 2003, 08:22

Hi,

ich brauche nur numerische Werte und mache das so :

markieren

Delphi-Quellcode:

			procedure TForm1.StringGrid1KeyDown(Sender: TObject; var Key: Word;

  Shift: TShiftState);

begin

  if not (key in [48..57,8,13,27]) then

    key := 0;

showmessage (IntToStr (key));

Trotzdem kann ich in dem Stringgrid alles eingeben. Wieso ? Der key-Wert nach dem if ist bei falschen Eingaben 0.

[edit=Daniel B]Delphi-Tags korrigiert. Mfg, Daniel B[/edit]

Gruß
Hansa