Codigo que produce un error

[aanil]

Hola.

Te presente este codigo que funciona bien en Delphi 7

Código Delphi [-]
procedure TForm5.Edit2Change(Sender: TObject);
begin
with query2 do begin
close;
sql.Clear;
sql.Text := ' select * from tabla1 where matricula like:variable or nombres like:variable';
parameters[0].Value := '%'+edit2.Text +'%';
parameters[1].Value := '%'+edit2.Text +'%';
open;
bitbtn5.Enabled := true;
end;
end;

Este corre bien en delphi 7.

Saludos.