Transforma um texto OEM (MS-DOS) para o formato ANSI (Windows)

Exemplo da Rotina:

OemToAnsi([Expressão])

Exemplo 1- Convertendo um texto simples de OEM para ANSI:

cTexto := OemToAnsi("Daniel Atilio")

Exemplo em Vídeo:

Clique nesse link para ver um exemplo em Vídeo da nossa Maratona de Exemplos.

Observações:

– Caso tenha dúvidas ou problemas com os exemplos, entre em contato;

– Se tiver sugestões de rotinas, pode entrar em contato;

Referências:

– TDN