stFILE is structure as FILENAMEprodutos
// Cria uma estrutura igual a analyse
MyFileRecord is Record of MyAnalysisFile

// use as funções hreadxxx... para localizar record no arquivo original
//pra preehcer as estruturas com os nomes dos campos
MyfileRecord = MyAnalysisFile

MyfileRecord = MyAnalysisFile
//depois é só fazer a atribuição

algumacoisa = MyFileRecord.nomedocampo