Ver Mensaje Individual
  #1  
Antiguo 27-01-2010
Mystery Mystery is offline
Miembro
 
Registrado: jul 2007
Ubicación: Santiago de Cuba
Posts: 69
Reputación: 17
Mystery Va por buen camino
Problemas con Variant

Hola a todos....
bueno pues resulta que estoy tratando de utilizar un locate para ello creo una variable de tipo variant le doy la longitud en tiempo de ejecucion y sus respectivos valores pero cuando el compilador llega al locate me envia este error. "could not conver variant of type (Array Variant) into type (String)"... he estado leyendo en internet pero todavia no doy con la solucion OK...
aqui les dejo el codigo que he realizado...
Código Delphi [-]
var
  i:integer;
  arr:variant;
begin
  DMDatos.UtilMD.Active:=False;
  DMDatos.UtilMD.IndexName:='primaryKey';
  DMDatos.UtilMD.Active:=True;
  arr:=VarArrayCreate([0, DMDatos.UtilMD.IndexFieldCount], varVariant);
  DMDatos.Util.First;
  while not DMDatos.Util.Eof do begin
    for i:=0 to  DMDatos.UtilMD.IndexFieldCount-1 do
     arr[i]:=DMDatos.Util.FieldByName(DMDatos.UtilMD.IndexFields[i].FieldName).AsString;
    CAD1:=Keys(@DMDatos.Conn, DMDatos.UtilMD.TableName);
    if not DMDatos.UtilMD.Locate(CAD1, arr, [])then
     begin
      //aqui debe o no debe entrar segun el locate.. mas nada...//
     end;

chaooo
sin mas
Mystery

Última edición por rgstuamigo fecha: 27-01-2010 a las 19:39:23. Razón: Estética en el código
Responder Con Cita