Código de Barras

Bons colegas
Como capturo o que a leitora de código de barras leu
Estou fazendo assim:

No evento OnKeyPress do Form

var strCodigoLido : String [14];
begin
strCodigoLido: = key;
Showmessage(strCodigoLido);
end;

Má só lê o primeiro caracter ex: O código de barras (97715179900090)
A variável só traz (9) ou seja o primeiro caracter do código
O que estou fazendo de errado.
:oops: