hallo habe das eben ausprobiert, so bald die aktuelle zelle den focus erhält wird nur die zahl eingegeben.
wenn ich folgendes realisiere
Delphi-Quellcode:
if (key in ['0'..'9']) and (length(SG1.Cells[2,2]) = 0) then
SG1.Cells[2,2] := ' + ' + key
else
SG1.Cells[2,2] := SG1.Cells[2,2]+ key;
und eine andere zelle als 2,2 den fokus erhält geht es
raik