Ver Mensaje Individual
  #2  
Antiguo 22-12-2015
Avatar de Caminante
Caminante Caminante is offline
Miembro
 
Registrado: oct 2010
Ubicación: Lima - Peru
Posts: 338
Reputación: 16
Caminante Va camino a la fama
Hola

Pues hasta donde se no es posible recorrer asi los campos de un record ya que no es una estructura vectorial. Lo que se me ocurre es crear una clase y simular recorrer como indice los campos

Código Delphi [-]
TMiclase=class
private
FCampo1:integer;
FCampo2:string;
//...
//etc
Procedure SetFields(i:integer;Value:variant);
Functon GetFields(i:integer):variant;
public
Property Fields[i:integer]:variant read GetFields write SetFields;
end;

Y en la implementacion devuelves el valor que quieras de acuerdo al indice

Código Delphi [-]
Function TMiclase.GetFields(i:integer):variant;
begin
case i of
0:result:=FCampo1;
//...
//los demas campos
end;
end;

Espero sea util

Saludos
__________________
Caminante, son tus huellas el camino y nada más; Caminante, no hay camino, se hace camino al andar.
Antonio Machado
Responder Con Cita