lo de las constantes es bueno , pero cuando las quiero utilizar en una aplicacion clx no funciona por eso uso
Código Delphi
[-]
procedure Tfrmventas.Edit4KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
var I:integer;
begin
if Key=4100 begin
es esto correcto, ó hay otra forma?