usalo de la siguiente manera.
Código Delphi
[-]procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
if key =#13 then
begin
Button1.OnClick(self);
end;
end;
Si estás trabajando a distancia y el operador no sabe como configurar el lector de código de barra para que tire un enter, puede usar un timer, cualquier cosa avisame.
Martin, Artaza.