VASCON

QUE AULA EM CARA! MUITO OBRIGADO, NILSON

BOM DIA PEASSOAL. Gostaria que alguém me explicasse, qual a relação que existe entre: STACKSIZE E HEAPSIZE. Eu uso: STACKSIZE 18500 HEAPSIZE 8192 Qual o limite máximo desses valores ? O aumento desses valores tem alguma coisa a ver com a memória da máquina? Alterá-los para o limite máximo poder trazer qualquer outro problema? O tamanho do programa pode influenciar em alguma coisa? Abraços NILSON

KAPIABA Este arquivo TXT é para transmitir arquivos para o Bradesco. O tamanho das linhas é de: 400 caracteres CAMP73:=STRZERO(9,1)-> campo para inserir o numero "9" ao final do arquivo. Impresso na coluna: 00 oPrn:say(K,00, CAMP73) CAMP15:=STRZERO(mCONTA,6,0) -> campo para inserir o número da linha. Impresso na coluna: 394 oPrn:say(K,394, CAMP15) Em vez de usar linha e ou K para pular de linha (K=K+1) Obrigado pela atenção NILSON

No texto que envei anterioramente não saiu o bendido "quadrado". Logo após a impressão do registro aparece um quadrado. (000068) Kapiaba: veja que não esqueci de pular de linha (K=K+1) Segue parte final do PRG, por favor o que há de errado? CAMP15:=STRZERO(mCONTA,6,0) CAMP73:=STRZERO(9,1) oPrn:say(K,00, CAMP73) oPrn:say(K,394, CAMP15) K=K+1 oPrn:EndPage() oPrn:End() RETURN(NIL) NISON

OLà PESSOAL, BOM DIA! Tenho um pequeno problema ao gerar um arquivo TXT que no clipper não ocorre. Junto ao último ítem do relatório aparece este bentido quadrado: 000068 O Correto seria: 000068 Não deveria estar na história: Por acaso falta algum comundo da TDosPrn() Abraços NILSON

MAIS UMA: Existe algum programa para instalação automática dos programas devolvidos em Fivewin, ou seja: a) instalar exe criar pastas c) extrair DBF's d) instalar icone e) reconhecer o Sistema Operacional para configuração das Variáveis de Memória. f) Configurar: Autoexec.BAT/NT e Config.BAT/NT Observação: não estamos falando em arquivos de lote "BAT" Abraços NILSON

PESSOAL! BOA NOITE! Na mudança da versão 2.0 para a versão 2.3 há a necessidade de se reescrever os prg's por causa do tratamento dos pixels. Pergunto: também há esse inconveniente na mudança do 2.3 para outra versão mais atualizada? Abraços NILSON

BOA NOITE PESSOAL! PEÇO UMA DICA: Quando se usa o SET FILTER TO ou o ORDSCOPE() se faz uma previa seleção dos elementos de um arquivo para uma posterior montagem do listbox. Pergunto: é possível se estabelecer uma condição no momento da montagem do listbox? Seria algo mais ou menos assim: @01.00,00.5 LISTBOX oBrw0; IF SAIDA > ENTRADA (se os valores dos registros saida forem maiores que os de entrada) FIELDS NUMORC,; DTOC(DATENT),; INVEST; HEADERS "PEDIDO",; "DATA ",; "C.F.O.P."; ENDIF Abraços, obrigado. NILSON

OLà PESSOAL! Mais uma. Uso os arquivos abaixo nos meus programas, mas na realidade não sei para que servem, alguém poderia me dar uma dica: WAIT.OBJ, MPAR.OBJ e VMW.OBJ Abraços NILSON

OLà PESSOAL! Me ajuda em mais essa: Tenho usado o Fivewin versão 2.0 Para usar a versão 2.3, simplesmente mudei o LNK alterando o caminho das LIB´s, de FW20 para a pasta FW23, conforme abaixo: LIB C:\FW23\LIB\FIVE LIB C:\FW23\LIB\FIVEC LIB C:\FW23\LIB\OBJECTS LIB C:\FW23\LIB\WINAPI Compilou normalmente, mas os botões das telas desapareceram e os get´s ficaram desconfigurados (fora de alinhamento). Meus programas são escritos utilizando o "@ SAY". Pergunto, qual o mistério? Tem alguma outra providência a ser alterada? Abraços NILSON

OLà PESSOA! BOA NOITE. Preciso de uma dica: Quando um arquivo é muito grande e excede a capacidade de um ARRAY (ERROR BASE 1187 BOUNDE ERROR ADD, simplificando excede o limite de 4096), como fazer? Abraços NILSON

Olá Pessoal, boa noite! Peço ajuda para manipular um array dentro de um listbox. Na função abaixo estou carregando os dados de um arquivo dentro da variável "COD". Como faço para carregar esta variável dentro de um listbox? IF NETUSE("LANDI","DILAN",.F.,10) SET INDEX TO DILAN1 GOTO TOP DO WHILE !EOF() IF QTDSAI > QTDENT AADD(COD,{NUMORC,DTOC(DATENT),INVEST}) ENDIF SKIP ENDDO GOTO TOP ELSE MsgAlert("Arquivo não Disponivel", "Aguarde !") ENDIF Grato pela atenção. Abraços NILSON

Olá pessoal! Boa noite! Tenho gerado arquivos txt para encaminhar via internet. Funciona bem, mas falta qualidade visual. Pergunto: existe alguma maneira de se gerar um arquivo com mais qualidade visual? Exemplo: HTML, por exemplo. Abraços NILSON

Olá Pessoal! Boa Noite! Estou com uma dificuldade: Ao usar a TDOSPRN, se a palavra foi escrita com ç (C - Cedilha), esta letra não imprime e desalinha as demais palavras. Como resolver isso? Abraços NILSON

Elitenet Se você puder me mandar, ficarei grato. Abraço NILSON na.vasconcellos@terra.com.br

Betovsp Caso você não poste em dicas, peço o favor de me mandar. Grato NILSON

OLà PESSOAL! Preciso enviar um relatório gerado em fivewim via e_mail. Pergunta: gero um arquivo .txt, ou existe ou forma melhor? Abraço. NILSON

Kapiaba x aeluiz Por favor: O texto é escrito no word e a classe tword faz a conversão? Se voces puderem, me dá uma dica para encontrar esta classe e como fazer? Grato, abraço. NILSON

OLà PESSOAL Lá vai dúvida: Como faço para justificar linhas de um texto. Exemplo: oPrn:Say( nRow, 13*nColStep, "O presente contrato, celebrado nos termos da Lei 8.991") numlinha++ nRow += nRowStep oPrn:Say( nRow, 07*nColStep, "20 de janeiro de 1995, tem por objeto o fomento mercantil das ati-") numlinha++ nRow += nRowStep oPrn:Say( nRow, 07*nColStep, "vidades da CONTRATANTE pela CONTRATADA, mediante a presta‡ao cumu-") numlinha++ nRow += nRowStep Abraço NILSON

OLà PESSOAL PEÇO AJUDA PARA FORMATAR OS CAMPOS ABAIXO DE UM LISTBOX O CAMPO B[1][1] ---> FORMATAR PARA VALORES (TRANSFORM) O CAMPO B[1][2] ---> FORMATAR PARA DATAS (DTOC) O CAMPO B[1][3] ---> FORMATAR PARA NUMERO (TRANSFORM) #include "fivewin.ch" #include "report.ch" Function PRECL() LOCAL oSaida, oIncluir, oExcluir, oImprimir, oEditar, oPesquisa, oGravar, oInicio, oFim, oDados, oConfirma PRIVATE B:=ARRAY(4,3) DEFINE FONT oFont_cli NAME "MS SANS SERIF" SIZE 0,-15 DEFINE DIALOG oDlgPGF from 01,15 to 17,90; TITLE '************'; COLOR CLR_BLACK, CLR_HGRAY @01.00,00.5 LISTBOX oBrw0; FIELDS B[1][1],; B[1][2],; B[1][3]; HEADERS "VALOR",; "DATA",; "DIA"; COLOR CLR_BLACK,Rgb(255,255,235); FIELDSIZES 90,90,90; FONT oFont_cli; OF oDlgPGF; SIZE 150,70 @05.5,36.0 BUTTON oSaida PROMPT "&Sair" OF oDlgPGF SIZE 33,08 ACTION oDlgPGF:End() CANCEL ACTIVATE DIALOG oDlgPGF CENTERED RETURN(NIL) GRATO NILSON

OLà PESSOAL! GOSTARIA DE SABER PORQUE ESTà ACONTECENDO ISSO: NENHUM PRG FOI INCLUIDO NO SISTEMA. HOUVE APENAS ALTERAÇÃO EM UM PRG. A COMPILAÇÃO OCORREU NORMALMENTE. QUANDO SE CHAMA O PROGRAMA APARECE A SEGUINTE MENSAGEM: "UM DISPOSITIVO ANEXADO AO SISTEMA NÃO ESTà FUNCIONANDO" QUAL O MISTÉRIO ABRAÇOS NILSON

Olá JEF2_TIM Se entendi o que você esta querendo fazer, lá vai um dica que adotei como padrão nos meus programas, e está funcionando muito bem. Crie um arquivo temporário onde serão gravados os registros selecionados e apresentados em um listbox. Dentro desse listbox coloque as opções (buttons) para que o usuario possa alterar, incluir, excluir, etc. Para cada operação dê um refresh()e um setfocus() para atualizar as informações. Depois de feitas as operações necessárias devolva os registros para o arquivo definitivo. NILSON

Olá Pessoal! Se alguém puder me informar: O Dbase IV funciona com qualquer versão do Fivewin? Onde conseguir? Qual o Custo? (+ ou -) Grato Nilson

ELIAS Nem a função e nem o SetTextJustification funcionou. O grande problema é justificar texto como no Word. Se você me diz que isto não é possível no Fivewin, pergunto: tem alguma outro alternativa? Usando a impressão TDOSPRN não tem problema, mas a necessidade é para impressora Jato de Tinta. ABRAÇO NILSON

ENDEREÇO MSN nilsonvasconcellos@hotmail.com ABRAÇOS