No programa exemplo que tenho não tinha esta função. Inclui ela e testei, traz o retorno no showmessage e gera inclusive o retorno.txt. , mas quando sai da procedure acusa o erro e não consigo executar mais nada. Aparenta ser algo com alocação de memória. Não tenho certeza quanto a versão: 7.0.4.45 2015
procedure TfrmPrincipal.BitBtn1Click(Sender: TObject);
var
cDados : string;
s : string;
i : integer;
begin
try
for i := 1 to 879 do cDados := cDados+' ';
iRetorno := Bematech_FI_DadosUltimaReducaoCV0909( cDados);
Analisa_iRetorno();
Retorno_Impressora();
except
end;
Application.MessageBox( pchar( cDados ), 'Informações da Impressora', MB_IconInformation + MB_OK );
end;