Ayuda con Edit

[CROWW_007]

Hola, mi problema es el siguiente, tengo un edit (edit1), dentro de una forma (form4) en delphi, lo que quiero hacer es que al momento de entrar en esa forma y que una persona con un escaner lea un codigo de barras de 5 digitos, automaticamente se vaya a otra forma (form5).

Es decir que cuando llegue al caracter 5 (de la cadena de numeos), se pase a la siguiente forma, me podrian ayudar??

Gracias

[nenufer]

Hola!! No se si es esto lo que buscas. Pero con esto cuando llegas al caracter nº 5 te lleva al form5. Si lo que buscas es mas, porque veo que hablas de un scaner o algo asi, buf ahi no creo que te pueda ayudar. Espero que esto te sirva de algo.

Código Delphi [-]
procedure TForm4.EditChange(Sender: TObject);
begin
  if length(Edit.Text) = 5 then
    Form5.Show;

end;

[Acanol]

No se si te servira, pero en el change del edit:

Código Delphi [-]
procedure TForm1.Edit1Change(Sender: TObject);
var
tam:integer;
begin
Tam:=Length(edit1.text);
if tam=5 then
   begin
       form2.show;
   end;
end;

Se me adelantaron