Objetivo e utilização:
Lê o próximo registro selecionado por IniciaCadeia do primeiro ao último. Os registros serão lidos na ordem em que foram incluídos, os parâmetros são compatíveis com os do mesmos nome descritos acima.
Sintaxe:
LeProximoCadeia(char * arquivo, struct Itens * itens, char * área)
Parâmetros:
Exemplo em Delphi:
begin
Arquivo := ‘arq1’;
ret := LeProximoRegistroCadeia(@Arquivo,@reg);
if ret = -1 then
begin
{Fim de Arquivo - EOF}
end
else if ret = 0 then
begin
{Achou registro para esta pesquisa}
end
else
begin
{Aqui ret é maior que 0 – Deu erro}
ret := ObtemMensagem(@msg);
ShowMessage(msg);
end;
end;
Exemplo em VB: