Hi,
das hier ist der 4001ste Beitrag für
VCL-Fragen. Ganz schön viel.
Delphi-Quellcode:
procedure TForm1.StringGrid1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if not (key in [48..57,8,13]) then
key := 0;
with StringGrid1 do begin
case key of
VK_RETURN :
ich will nur die Zahlen 0..9 und Bacspace, Return zulassen im Stringgrid. Was ist an dem Code falsch ? Das key := 0 ist wirkungslos.
[edit=Daniel B]Delphi-Tags eingefügt. MfG Daniel B.[/edit]