Ver Mensaje Individual
  #3  
Antiguo 24-01-2004
Avatar de __hector
[__hector] __hector is offline
Miembro Premium
 
Registrado: may 2003
Ubicación: Santo Domingo, Rep. Dom.
Posts: 1.075
Reputación: 23
__hector Va por buen camino
Sencillo...

Declaras el arreglo del tipo, y lo recorres, tal y como lo planteas. Tan sencillo como:

Código:
var
   Arreglo : array[1..100] of TdetalleRecibo;
   m        : integer;
begin
   for m := 1 to 100 do 
   begin
       Arreglo[m].vrec_numero := 15;
       ...
       ...
   end;
__________________
Héctor Geraldino
Software Engineer
Responder Con Cita