Obter o número do registro atual no Delphi
Table1.RecNo()