[[egostar]]

Hola

Código Delphi [-]
begin
  fmodulo.consulta.Close;
  fmodulo.consulta.SQL.Text := 'Select r.*, c.categoria FROM tabla_reporte r '+
                               'INNER JOIN acciones c ON (reporte.id_accion = c.id_accion)';
  fmodulo.consulta.Open;
end;

Salud OS