Jump to content
Fivewin Brasil

tiaoFW

Membros
  • Posts

    855
  • Joined

  • Last visited

  • Days Won

    4

Posts posted by tiaoFW

  1. Dentro do modo design o fastreport tem propriedades para estabelecer a distância entre os itens, basta aumenta-los conforme a necessidade. Não havendo assim a necessidade de colocar nada que simule o espaço entre os topicos do relatórios.

    veja as propriedades no masterdata: vaTop, Height

     

    Abraço

     

  2. To entendendo mais nada.

    O Jackson postou la no forum internacional agora, sugerindo que tirasse algumas linhas do manifest, mas eu já não tenho essas linhas em meu .RES, mas o problema no windows 8 ou 10 é real.

    Como resolver?

     

    Isso é o que tenho no meu manifest dentro do PellesC:

     

    <?xml version="1.0" encoding="UTF-8" standalone="yes"?>
    <assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0">
    <assemblyIdentity
        type="win32"
        name="MyOrganization.MyDivision.MyApp"
        version="1.0.0.0"
        processorArchitecture="X86"
        />
        <description>Verbal description of MyApp.</description>
        <dependency>
        <dependentAssembly>
        <assemblyIdentity
            type="win32"
            name="Microsoft.Windows.Common-Controls"
            version="6.0.0.0"
            processorArchitecture="X86"
            publicKeyToken="6595b64144ccf1df"
            language="*"
        />
        </dependentAssembly>
        </dependency>
    </assembly>

  3. Ahhhh, não vou não Tião, não sou chegado naquela galera que gosta de usar cintos cheios de bombas no corpo, to mais pra lava jato, mensalão e etc... deixa a gente as  minguas e nos mata aos poucos, mas ao menos morremos com o corpo inteiro, isso é se antes não roubaram nossos órgãos  (Rins, coração, fígado, córneas e etc...) ahauahuahuaa.

    Brincadeira a parte, pena que não fazem nenhum aqui no Brasil, vai ver que eles tem medo dos nossos terroristas, que matam milhares sem disparar um tiro sequer.

    []s,

    Nem por 72 virgens?

     

     

  4. Bom dia.

     

    Segue as declarações de uso da DLL DLLG2.DLL que é a mesma usada pela DataRegis.

     

    Você precisara consultar o manual de programação para ver como implementar cada comando:

     

    // Inicio Urano Logger2

    DLL32 FUNCTION T_INICIA(Canal AS STRING)                               ;
             AS _INT PASCAL FROM 'DLLG2_IniciaDriver'                          ;
             LIB xDll

    DLL32 FUNCTION T_ENCERR(Canal AS LONG)                                  ;
          AS _INT PASCAL FROM 'DLLG2_EncerraDriver'                         ;
          LIB xDll

    DLL32 FUNCTION T_LISTPA( Canal AS LONG, NomeParam AS STRING,            ;
          TamList AS LONG )                                                 ;
          AS STRING FROM 'DLLG2_ListaParams'                                ;
          LIB xDll

    DLL32 FUNCTION T_EXECUT(Canal AS LONG, Comando AS STRING)               ;
          AS _INT PASCAL FROM 'DLLG2_ExecutaComando'                        ;
          LIB xDll

    DLL32 FUNCTION T_CODERR(Canal AS LONG)                                  ;
          AS _INT PASCAL FROM 'DLLG2_ObtemCodErro'                          ;
          LIB xDll

    DLL32 FUNCTION T_NOMERR(Canal AS LONG, NomeErro AS PTR,                 ;
          TamNome AS PTR)                                                   ;
          AS STRING PASCAL FROM 'DLLG2_ObtemNomeErro'                       ;
          LIB xDll


    DLL32 FUNCTION T_CIRCUN(Canal AS LONG, Circunst AS PTR,                 ;
          TamCirc AS PTR)                                                   ;
          AS STRING PASCAL FROM 'DLLG2_ObtemCircunstancia'                  ;
          LIB xDll

    DLL32 FUNCTION T_TIMEOU(Canal AS LONG, Timeout AS LONG)                 ;
          AS NIL PASCAL FROM 'DLLG2_DefineTimeout'                          ;
          LIB xDll

    DLL32 FUNCTION T_DEFLOG(NomeArquivo AS STRING)                          ;
          AS NIL PASCAL FROM 'DLLG2_SetaArquivoLog'                         ;
          LIB xDll

    DLL32 FUNCTION T_LIMPPA(Canal AS LONG)                                  ;
          AS NIL PASCAL FROM 'DLLG2_LimpaParams'                            ;
          LIB xDll

    DLL32 FUNCTION T_ADDPAR(Canal AS LONG, NomeParam AS STRING,             ;
          ValorParam AS STRING, TipoParam AS LONG)                          ;
          AS NIL PASCAL FROM 'DLLG2_AdicionaParam'                          ;
          LIB xDll

    DLL32 FUNCTION T_TOTRET(Canal AS LONG)                                  ;
          AS _INT PASCAL FROM 'DLLG2_TotalRetornos'                         ;
          LIB xDll

    DLL32 FUNCTION T_RETORN(Canal AS LONG, Indice AS LONG,                  ;
          NomeRetorno AS STRING, TamNome AS LONG, ValorRetorno AS STRING,   ;
          TamvalorRetorno AS LONG)                                          ;
          AS _INT PASCAL FROM 'DLLG2_Retorno'                               ;
          LIB xDll

    DLL32 FUNCTION T_GETRET(Canal AS LONG, Retornos AS PTR,                 ;
          TamRetornos AS LONG)                                              ;
          AS STRING PASCAL FROM 'DLLG2_ObtemRetornos'                       ;
          LIB xDll

    DLL32 FUNCTION T_CONFVEL(Canal AS LONG, Speed AS LONG)                  ;
          AS STRING PASCAL FROM 'DLLG2_ConfiguraDriver'                     ;
          LIB xDll

    DLL32 FUNCTION BAUDRATE_U( InBaudRate AS LONG )                         ;
          AS STRING PASCAL FROM 'DLLReadDefineBaudRate'                     ;
          LIB xDllleit

    DLL32 FUNCTION LeMemorias_U( @szPortaSerial AS STRING, @szNomeArquivo AS STRING, ;
                                 @szSerieECF AS STRING, bAguardaConcluirLeitura AS STRING ) ;
          AS STRING PASCAL FROM 'DLLReadLeMemorias'                     ;
          LIB xDllleit // DLL LEITURA.DLL

    DLL32 FUNCTION GeraAto17_U( @szArquivoBinario AS STRING, @szArquivoTexto AS STRING, ;
                                @szPeriodoIni AS STRING, @szPeriodoFIM AS STRING, TipoPeriodo ;
                                AS STRING, @szUsuario AS STRING, @szTipoLeitura AS STRING ) ;
          AS STRING PASCAL FROM 'DLLATO17GeraArquivo'                     ;
          LIB xdllato17 // DLL ATO17.DLL

    // Fim Urano
     

    Segue anexo os manuais.

     

    Boa sorte.

     

    Manual DLL Windows.doc

  5. Bom dia Everton.

    O Copyfile exige que alem do caminho vc especifique o nome do arquivo a ser copiado.

    Veja o código:

     

    copy file ( alltrim( cFileName ) ) to ( alltrim( _xPathBackup ) )

     

    A variavel 

    _xPathBackup

    Pelo que percebi não contem o nome do arquivo apenas o caminho, então vc deveria colocar:

    _xPathBackup

    alltrim( cFileName )

    Ok?

     

    Aqui no meu sistema uso o comando do proprio Windows:

    Veja:

                copyfile(localexe+'SALC.BKK', localexe+'SALC.INI')
     

    Segue a declaração que vc deve colocar no prg principal.

     

    DLL32 FUNCTION COPYFILE( cExistingFileName AS LPSTR, cNewFileName AS LPSTR, lFailIfExists AS LONG ) AS BOOL;
        PASCAL FROM "CopyFileA" LIB "kernel32.dll"
     

     

    Att.

     

     

  6. Bom dia,

    Acho que vc deveria colocar o conteúdo a ser impresso de acordo com a ordem em que são criados os groupfooter.

    Creio que não há maneira de inverter a ordem dos groupfooter ou de qualquer objeto criado dentro do relatório.

    Pelo menos é o que da pra perceber da imagem que vc enviou.

    Att.

×
×
  • Create New...