Columnas adicionales en TDBGrid

[noob]

Empezado por PepeLolo

Cuando piensa abrir DataSetProductos

Lo abro antes de asignar las propiedades Lookup.

Código Delphi [-]
procedure TForm1.FormCreate(Sender: TObject);
begin
  with DatasetVentas do
    begin
      Open;
      DatasetProductos.Open;
      FieldByName('Producto').LookupDataSet := DatasetProductos;
      FieldByName('Producto').LookupKeyFields := 'Codigo; Descripcion';
      FieldByName('Producto').LookupResultField := 'Codigo';
    end;
end;

Empezado por PepeLolo

supongo que has añadido los campos de DataSetVentas al dbgrid

Sí, están añadidos.

Empezado por PepeLolo

Por último cuando en el DBGrid pulses sobre el botón del campo "Producto" se desplegará el lookup.

No sale ningún botón en el campo Producto.

¿Qué está fallando?

Saludos.