QuickRep delphi 4

Peesoal, uso o quickrep no delphi 4 pra exibir relatorios.

Tenho uma tabela produtos com cod_produto e cod_fornecedor.

Quando executo minha aplicacao e vou em relatorio de fornecedor ele aparece mostrando todos os campos normalmente mas se antes de abrir o relatorio eu abrir o cadastro de produtos meu relatorio soh aparece a primeira linha.

O erro esta aki.
Formulario de produtos

Evento onshow
DmPrincipal.Tb_Fornecedores.Open;

Evento onClose
DmPrincipal.Tb_Fornecedores.Open;

Se eu comentar essas linhas o relatorio funciona normal, caso contrario dah o erro citado acima.

Se eu comento a achave estrangeia representada por um lookup combobox fica inabilitada.

Acho q eh isso, vcs entenderam???
Obrigado!!!