delphi7中在edit中敲enter(回)的ascii不是13?怎事啊?想的事情不了?
Delphi7.0中Edit1中敲Enter(回)怎不showmessage('ssssss');而要shift+Enter才showmessage('ssssss');

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if Key=#13 then showmessage('ssssss');
end;



[解决办法]
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if Key=VK_RETURN then showmessage( 'ssssss ');
end;