Error al activar Indice Secundario

[marcoszorrilla]

Creo que no me has entendido bien. No se trata de tener 2 tablas detalle sino dos Ttable que son el componente de conexión con las tablas uno de ellos tendría relación maestro/detalle y el otro no, este segundo se usaría para el filtrado, pero ahora que explicas más lo que quieres, sería mejor en vez de utilizar un segundo Ttable utilizar un Tquery y en este utilizando SQL extraer los datos.

Código Delphi [-]
Var
dIni,dFin:TDate;
Begin
..
Query1.Sql.Close;
Query1.Sql.Clear;
Query1.Sql.Add('Select * from MiTabla');
Query1.Sql.Add('Where Fecha between :F1 And :F2');
Query1.ParamByName(F1).AsDate:=dIni;
Query1.ParamByName(F2).AsDate:=dFin;
Query1.Open;

Esta consulta le pones un TDataSource y a éste por ejemplo le conectas con una rejilla para ver el resultado, dIni y dFin que son variables de tipo fecha habrá que capturarlas antes de realizar la consulta.

Un Saludo.

[jhonalone]

GRACIAS, de nuevo, Marcos.

Soy muy novato en tablas, disculpa las barbaridades que pueda decir.

Nunca he utilizado un TQuery, pero voy a hacerte caso y lo voy a estudiar y utilizar. Ya te contaré.

Surgen algunas dudas.
1.-¿Necesito mantener el índice "Por fechas" en la base detalle para usar el TQuery?
2.-¿Cómo accedo a los registros del intervalo de fechas seleccionado, para obtener sumas y proporciones?
3.-¿La tabla de referncia del TQuery, se especifica en tiempo de ejecución, no en la fase de disaño?

GRACIAS, otra vez, me pongo con el TQuery?
Un saludo.

[jhonalone]

Hola, otra vez.

Estoy intentando instaurar el TQuery como te comenté.

Pero no me compila las siguientes líneas. (Uso Delphi 7)

Código Delphi [-]
Query1.Sql.Close;  // He tenido que cambiar por Query1.Close;
Query1.Sql.Clear;
Query1.Sql.Add('Select * from MiTabla');
Query1.Sql.Add('Where Fecha between :F1 And :F2');
Query1.ParamByName(F1).AsDate:=dIni; // "Undeclared identifier: 'F1' "
Query1.ParamByName(F2).AsDate:=dFin; // "Undeclared identifier: 'F2' " 
Query1.Open;

No sé si D7 no admite estos comandos...

Respecto a mis 3 preguntas.

la númro 1 no tengo ni idea.
las otras dos, creo que las tengo solucionadas, aunque como no he podido compilarlo, no estoy seguro.

Si alguien sabe sacarme de mis apuros, muchas gracias, si no, seguiremos peleando.

Saludos a todos.

[jhonalone]

Yo mismo me respondo.
Faltaban los apóstrofos (')

Código Delphi [-]
Query1.Sql.Close;  // He tenido que cambiar por Query1.Close;Query1.Sql.Clear;Query1.Sql.Add('Select * from MiTabla');Query1.Sql.Add('Where Fecha between :F1 And :F2');Query1.ParamByName('F1').AsDate:=dIni;Query1.ParamByName('F2').AsDate:=dFin; Query1.Open;

Bien, he conseguido compilar el código, pero no consigo listar el contenido.
Ya os contaré.
Saludos.

[jhonalone]

Hola de nuevo.
Perdonad que el código saliera en una línea, pero no me explico por qué. Sólo hice copiar y pegar entre los corchetes de código.

!! SOLUCIONADO !!

Con este código:

Código Delphi [-]
dIni:=StrToDate(FechaDesde.Text);
dFin:=StrToDate(FechaHasta.Text);
Query1.Close;
Query1.Sql.Clear;
Query1.Sql.Add('Select * from Actos.DB');
Query1.Sql.Add('Where FechCitaActo between :F1 And :F2');
Query1.ParamByName('F1').AsDate:=dIni;
Query1.ParamByName('F2').AsDate:=dFin;
Query1.Open;

Siempre estamos aprendiendo.
Lo más importante de este post es lo que me dijo Marcos:
"Supongo que tienes tabla A relacionada con otra B y quieres cambiar el índice activo de la tabla relacionada con lo cual no funcionará la propiedad Master-Detai."



GRACIAS A MARCOS QUE FUE QUIEN ME PUSO EN EL CAMINO.
SALUDOS PARA TODO EL FORO.

[ecfisa]

Perdonad que el código saliera en una línea, pero no me explico por qué. Sólo hice copiar y pegar entre los corchetes de código.

Hola jhonalone.

Es un problema que tiene la interfaz del editor de mensajes cuando tenés seleccionada la opción: Interfaz mejorada - Edición con WYSIWYG.
Esto no sucede si utilizas la opción: Editor Estándar - Controles de Formato Extra.

Podés cambiar la opción desde: User CP -> Editar Opciones -> Interfaz del Editor de Mensajes.

Saludos.