Ecfisa Muchas gracias de antemano
al correr me envia el siguiente error
Código Delphi
[-]
until FindNext(SR) <> 0;
FindClose(SR);
en la segunda línea me envía el siguiente error
Incompatible types: 'Cardinal' and 'TSearchRec'
te agradezco tu tiempo y el interes sobre éste tema
gertorresm