Exemplos »»

  O exemplo abaixo demonstra como imprimir um cadastro utilizando a sintaxe do C# (CSharp):

VisRel

1º Faça o download dos arquivos deste exemplo clicando aqui;

2º Abra o layout do relatório chamado "Exemplo.vrl";

3º Veja que foram inseridas apenas algumas linhas de programação na banda para fazer um loop de preenchimento das váriáveis (CTRL+F9). Assim é possível replica-la facilmente no seu programa a partir dos registros do cadastro;

VisRelEdit

4º Para integrar o layout acima com o programa C# (CSharp) abaixo, clique no menu "Editar - Copiar como - CSharp", e em seguida substitua todo o conteúdo abaixo em azul com o que estiver na área de tranferência (colar).

5º Em seguida basta compilar o programa e executá-lo. E o VisRel encarrega-se de fazer a quebra de página conforme o tamanho do papel selecionado pelo usuário.

using System;
using System.IO;
using System.Text;
using System.Diagnostics;

namespace GravaArquivoTexto
{
    class Program
    {
        public static void Main(string[] args)
        {
            StringBuilder linha = new StringBuilder();

            //* ================= Inicio do Relatório ===================== *//

            // Comentários ou Comandos iniciais
            linha.Append("EW");   // Comando
            linha.AppendLine();

            linha.Append("L ");   // Comando
            linha.Append("00");  // Cor da Linha 9(2)
            linha.Append("99");  // Cor do fundo 9(2)
            linha.Append("00064");  // Esquerda do item 9(5)
            linha.Append("00576");  // Comprimento do item 9(5)
            linha.Append("0100110000");  // Alinhamento do item 9(10)
            linha.Append("01");  // Espessura da linha 9(2)
            linha.AppendLine();
            linha.Append("F ");   // Comando
            linha.Append("14");   // Tamanho da fonte 9(2)
            linha.Append("1");   // Negrito
            linha.Append("0");   // Itálico
            linha.Append("0");   // Sublinhado
            linha.Append("0");   // Riscado
            linha.Append("Arial");   // Nome da fonte
            linha.AppendLine();
            linha.Append("T ");   // Comando
            linha.Append("02");  // Cor do texto 9(2)
            linha.Append("99");  // Cor do fundo 9(2)
            linha.Append("00066");  // Esquerda do item 9(5)
            linha.Append("00572");  // Comprimento do item 9(5)
            linha.Append("1010100010");  // Alinhamento do item 9(10)
            linha.Append("Empresa X");   // Texto
            linha.AppendLine();
            linha.Append("RH");   // Comando
            linha.Append(" ");
            linha.Append("00042");
            linha.AppendLine();
            linha.Append("QL");   // Comando
            linha.AppendLine();

            linha.Append("L ");   // Comando
            linha.Append("00");  // Cor da Linha 9(2)
            linha.Append("99");  // Cor do fundo 9(2)
            linha.Append("00064");  // Esquerda do item 9(5)
            linha.Append("00576");  // Comprimento do item 9(5)
            linha.Append("0101010000");  // Alinhamento do item 9(10)
            linha.Append("01");  // Espessura da linha 9(2)
            linha.AppendLine();
            linha.Append("F ");   // Comando
            linha.Append("10");   // Tamanho da fonte 9(2)
            linha.Append("1");   // Negrito
            linha.Append("0");   // Itálico
            linha.Append("0");   // Sublinhado
            linha.Append("0");   // Riscado
            linha.Append("Arial");   // Nome da fonte
            linha.AppendLine();
            linha.Append("T ");   // Comando
            linha.Append("00");  // Cor do texto 9(2)
            linha.Append("99");  // Cor do fundo 9(2)
            linha.Append("00066");  // Esquerda do item 9(5)
            linha.Append("00572");  // Comprimento do item 9(5)
            linha.Append("1010100010");  // Alinhamento do item 9(10)
            linha.Append("Cadastro de Fornecedores");   // Texto
            linha.AppendLine();
            linha.Append("RH");   // Comando
            linha.Append(" ");
            linha.Append("00026");
            linha.AppendLine();
            linha.Append("QL");   // Comando
            linha.AppendLine();

            linha.Append("L ");   // Comando
            linha.Append("00");  // Cor da Linha 9(2)
            linha.Append("99");  // Cor do fundo 9(2)
            linha.Append("00064");  // Esquerda do item 9(5)
            linha.Append("00088");  // Comprimento do item 9(5)
            linha.Append("0101010000");  // Alinhamento do item 9(10)
            linha.Append("01");  // Espessura da linha 9(2)
            linha.AppendLine();
            linha.Append("F ");   // Comando
            linha.Append("10");   // Tamanho da fonte 9(2)
            linha.Append("0");   // Negrito
            linha.Append("0");   // Itálico
            linha.Append("0");   // Sublinhado
            linha.Append("0");   // Riscado
            linha.Append("Arial");   // Nome da fonte
            linha.AppendLine();
            linha.Append("T ");   // Comando
            linha.Append("00");  // Cor do texto 9(2)
            linha.Append("99");  // Cor do fundo 9(2)
            linha.Append("00066");  // Esquerda do item 9(5)
            linha.Append("00084");  // Comprimento do item 9(5)
            linha.Append("0000100010");  // Alinhamento do item 9(10)
            linha.Append("Código");   // Texto
            linha.AppendLine();
            linha.Append("L ");   // Comando
            linha.Append("00");  // Cor da Linha 9(2)
            linha.Append("99");  // Cor do fundo 9(2)
            linha.Append("00152");  // Esquerda do item 9(5)
            linha.Append("00488");  // Comprimento do item 9(5)
            linha.Append("0101000000");  // Alinhamento do item 9(10)
            linha.Append("01");  // Espessura da linha 9(2)
            linha.AppendLine();
            linha.Append("T ");   // Comando
            linha.Append("00");  // Cor do texto 9(2)
            linha.Append("99");  // Cor do fundo 9(2)
            linha.Append("00154");  // Esquerda do item 9(5)
            linha.Append("00484");  // Comprimento do item 9(5)
            linha.Append("0000100010");  // Alinhamento do item 9(10)
            linha.Append("Nome");   // Texto
            linha.AppendLine();
            linha.Append("RH");   // Comando
            linha.Append(" ");
            linha.Append("00018");
            linha.AppendLine();
            linha.Append("FC");   // Comando
            linha.AppendLine();


            //* Texto inserido como 'Banda - Comentário' CTRL+F9 *//
            for (int varCod = 1; varCod < 500; varCod++)
            {
                string varNome = "Fornecedor " + varCod;

                linha.Append("F ");   // Comando
                linha.Append("10");   // Tamanho da fonte 9(2)
                linha.Append("0");   // Negrito
                linha.Append("0");   // Itálico
                linha.Append("0");   // Sublinhado
                linha.Append("0");   // Riscado
                linha.Append("Arial");   // Nome da fonte
                linha.AppendLine();
                linha.Append("T ");   // Comando
                linha.Append("00");  // Cor do texto 9(2)
                linha.Append("99");  // Cor do fundo 9(2)
                linha.Append("00066");  // Esquerda do item 9(5)
                linha.Append("00084");  // Comprimento do item 9(5)
                linha.Append("0100100010");  // Alinhamento do item 9(10)
                linha.Append(varCod);   // Texto
                linha.AppendLine();
                linha.Append("T ");   // Comando
                linha.Append("00");  // Cor do texto 9(2)
                linha.Append("99");  // Cor do fundo 9(2)
                linha.Append("00154");  // Esquerda do item 9(5)
                linha.Append("00484");  // Comprimento do item 9(5)
                linha.Append("0000100010");  // Alinhamento do item 9(10)
                linha.Append(varNome);   // Texto
                linha.AppendLine();
                linha.Append("RH");   // Comando
                linha.Append(" ");
                linha.Append("00018");
                linha.AppendLine();
                linha.Append("QL");   // Comando
                linha.AppendLine();

                //* Texto inserido como 'Banda - Comentário' CTRL+F9 *//
            }

            linha.Append("F ");   // Comando
            linha.Append("10");   // Tamanho da fonte 9(2)
            linha.Append("1");   // Negrito
            linha.Append("0");   // Itálico
            linha.Append("0");   // Sublinhado
            linha.Append("0");   // Riscado
            linha.Append("Arial");   // Nome da fonte
            linha.AppendLine();
            linha.Append("T ");   // Comando
            linha.Append("12");  // Cor do texto 9(2)
            linha.Append("99");  // Cor do fundo 9(2)
            linha.Append("00066");  // Esquerda do item 9(5)
            linha.Append("00396");  // Comprimento do item 9(5)
            linha.Append("0001100010");  // Alinhamento do item 9(10)
            linha.Append("Este é o rodapé!");   // Texto
            linha.AppendLine();
            linha.Append("F ");   // Comando
            linha.Append("10"); ;  // Tamanho da fonte 9(2)
            linha.Append("0");   // Negrito
            linha.Append("0");   // Itálico
            linha.Append("0");   // Sublinhado
            linha.Append("0");   // Riscado
            linha.Append("Arial");   // Nome da fonte
            linha.AppendLine();
            linha.Append("T ");   // Comando
            linha.Append("09");  // Cor do texto 9(2)
            linha.Append("99");  // Cor do fundo 9(2)
            linha.Append("00466");  // Esquerda do item 9(5)
            linha.Append("00172");  // Comprimento do item 9(5)
            linha.Append("0101100010");  // Alinhamento do item 9(10)
            linha.Append("Página (%_pag_%) de (%_pgs_%)");   // Texto
            linha.AppendLine();
            linha.Append("RH");   // Comando
            linha.Append(" ");
            linha.Append("00026");
            linha.AppendLine();
            linha.Append("RO");   // Comando
            linha.AppendLine();

            //* ================== Fim do Relatório ======================= *//

            StreamWriter arquivo = new StreamWriter(@"C:\Nome.rel", false, System.Text.Encoding.GetEncoding(1252));

            arquivo.Write(linha.ToString());
            arquivo.Flush();
            arquivo.Close();

            Process.Start(@"C:\Windows\VisRel.exe", @"/g C:\Nome.Rel /t Titulo");
        }
    }
}

No computador de seus clientes instale apenas a Run-Time do VisRel (RunTimeVisRel.exe).

Para evitar alguns dos problemas com permissão de acesso ao registro ou instalação de arquivos no Windows XP SP3 e mais recentes como Vista e Win7, foi criada uma nova opção de instalação na pasta "Instalar no cliente" do VisRelEdit com o nome de "Versão Compacta.zip", com os arquivos abaixo:

VisRel.exe
VisRel.exe.manifest
VisRelPDF.dll
MSMAPI32.ocx
MSWINSCK.ocx
RICHTX32.ocx
vbPDF417.dll
vbZip232.dll

Obs.: Basta copiar esses arquivos para a sua pasta de programas, ou para a pasta C:\Windows do usuário.

Veja mais detalhes das linhas de comando do VisRel clicando aqui.


Página Principal Página Principal Página Principal Página Principal Página Principal Comprar Comprar Comprar Comprar Comprar Comprar Contato Contato Contato Contato Contato Contato + Produtos + Produtos + Produtos + Produtos + Produtos + Produtos Download Download Download Download Download Download Sobre Sobre Sobre Sobre Sobre Sobre