Buen dia Foro..
Disculpa por meterme aca y no abrir un hilo nuevo, pero ya que estaba este problema planteado y al codigo lo saque de este hilo, me gustaria consultar una duda y un problema que tengo con tal codigo..
Yo estoy utilizando este codigo
Código Delphi
[-]if MiTabla.Locate('campo1; campo2; campo3', VarArrayOf[Valor1, Valor2, Valor3], []) then
pero el error que me salta ami es
Código:
[Error] Not enough actual parameters
yo lo interprete como que no hay suficientes parametros.. les paso mi codigo actual
Código Delphi
[-]...
var
mes, anioo: Word;
fecha: TDate;
dia, mess: string;
begin
case Meses.ItemIndex of
1: mes:=1;
2: mes:=2;
3: mes:=3;
4: mes:=4;
5: mes:=5;
6: mes:=6;
7: mes:=7;
8: mes:=8;
9: mes:=9;
10: mes:=10;
11: mes:=11;
12: mes:=12;
end;
case mes of
1: mess:='ENERO';
2: mess:='FEBRERO';
3: mess:='MARZO';
4: mess:='ABRIL';
5: mess:='MAYO';
6: mess:='JUNIO';
7: mess:='JULIO';
8: mess:='AGOSTO';
9: mess:='SEPTIEMBRE';
10: mess:='OCTUBRE';
11: mess:='NOVIEMBRE';
12: mess:='DICIEMBRE';
end;
case anio.ItemIndex of
1: anioo:=2011;
2: anioo:=2012;
3: anioo:=2013;
4: anioo:=2014;
5: anioo:=2015;
6: anioo:=2016;
7: anioo:=2017;
8: anioo:=2018;
9: anioo:=2019;
10: anioo:=2020;
end;
if not (DM.Q_agen_tur.Locate('MES; ANIO', VarArrayOf[mess, anioo], []))then
...
Me podrian decir donde o que estoy haciendo mal.. Desde ya muchisimas gracias..