Hi,
ich brauche nur numerische Werte und mache das so :
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]