كذلك هذا الكود
كود :
procedure TForm1.sEdit2KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if key=vk_return then
sspeedbutton1.Click
