1. This site uses cookies. By continuing to use this site, you are agreeing to our use of cookies. Learn More.

  2. Anuncie Aqui ! Entre em contato fdantas@4each.com.br

Duvida Compactação de texto

Discussão em 'Progress 4GL' iniciado por rafael.andrade, Fevereiro 24, 2016.

  1. rafael.andrade

    rafael.andrade Membro Master Moderador Equipe de Suporte

    Dentro do arquivo que anexei está a DLL da library com a descrição da versão e site e também a versão e site dessa classe feita em progress na pasta raiz.
  2. rafael.andrade

    rafael.andrade Membro Master Moderador Equipe de Suporte

    Corrigindo: No lugar de "arquivo LONGCHAR" leia "variável LONGCHAR".
  3. bootstrapmaster

    bootstrapmaster Moderator Moderador Equipe de Suporte

    e a .so.1 pra que funcione no linux também ? tem ela ?
  4. rafael.andrade

    rafael.andrade Membro Master Moderador Equipe de Suporte

  5. rafael.andrade

    rafael.andrade Membro Master Moderador Equipe de Suporte

    Gente, não use como include, use como .P e chame como BO, tipo:

    Código:
    DEF VAR texto AS LONGCHAR.
    DEF VAR Compressor AS HANDLE.
    RUN pasta\zlib4gl\funcoes_compressao.p PERSISTENT SET Compressor.
    texto = "Aqui vai ficar seu text longo que você deseja compactar e ficar extremamente pequeno.Aqui vai ficar seu text longo que você deseja compactar e ficar extremamente pequeno.Aqui vai ficar seu text longo que você deseja compactar e ficar extremamente pequeno.Aqui vai ficar seu text longo que você deseja compactar e ficar extremamente pequeno.".
    
    MESSAGE "ORIGINAL: " SKIP texto VIEW-AS ALERT-BOX INFO BUTTONS OK.
    
    RUN CompactarTexto IN Compressor(INPUT-OUTPUT texto).
    MESSAGE "COMPACTADO: " SKIP texto VIEW-AS ALERT-BOX INFO BUTTONS OK.
    
    RUN DescompactarTexto IN Compressor(INPUT-OUTPUT texto).
    MESSAGE "ORIGINAL: " SKIP texto VIEW-AS ALERT-BOX INFO BUTTONS OK.
    
    Segue em anexo.

    Arquivos Anexados:

  6. bootstrapmaster

    bootstrapmaster Moderator Moderador Equipe de Suporte

    Deve ser por causa dos .cls, com function não dá muito certo, o correto, pra quem usa OOP, criar classezinha bonitinha e tal.

Compartilhe esta Página