Yo si veo la pantalla de productos correctamente.
De todas formas para llegar a ella, hay que corregir un eror que tienes en este procedimiento:
Código Delphi
[-]
procedure Tflistadoproductos.BitBtn4Click(Sender: TObject);
begin
fmodulo.qProductos.Active := true;
fmodulo.qProductos.Insert;
fproductos.Create(self).ShowModal;
end;
Debes llamar al
Create con la Clase(
Tfproductos), no con la instancia/variable (
fproductos).