ricardom1361303566

Eu vi uma vez no Forum uma recomendação sobre tamanho dos obj. Não consegui mais achar. Tem alguma limitação? Objs pequenos são mais fáceis de carregar, ou não tem nada a ver? É melhor dividir um prg grande em dois menores? Ricardo FW 24 - WS - Blinker - Clip53 -CDX

Giovany, Mande para meu Email rmattenhauer@gmail.com A atualização do perfil do Forum é meio confusa. Não consegui achar onde altera. Ricardo

Giovany, Esta sua lib é para (x)Harbour ou pode ser usado em FW 2.4? Atualmente uso FW 2.4 e DBF com CDX. Quais benefícios eu teria? E qual ADS usaria? No momento não dá para converter meus sistemas para Harbour e SQL. Ricardo FW 2.4 - Clip5.2/5.3 - blinker WS

Paulo, Só pude mexer neste programa hoje. Deu certo a função, com alguns testes que eu fiz. Obrigado Ricardo

ALGUEM TEM UMA FUNÇÃO QUE RETORNA DIA,MES E ANO DECORRIDOS, A PARTIR DE DETERMINDA DATA ATE A PRESENTE, CONSIDERANDO OS BISSEXTOS ETC? eXEMPLO: DATA : 01/04/1962: ATÉ HOJE: 44 ANOS,11 MESES,5 DIAS. RICARDO FIVE 2.4 - CLIP52E BLINKER WS

ALGUEM TEM UMA FUNÇÃO QUE RETORNA DIA,MES E ANO DECORRIDOS, A PARTIR DE DETERMINDA DATA ATE A PRESENTE, CONSIDERANDO OS BISSEXTOS ETC? eXEMPLO: DATA : 01/04/1962: ATÉ HOJE: 44 ANOS,11 MESES,5 DIAS. RICARDO FIVE 2.4 - CLIP52E BLINKER WS

Só para citar... Tenho uma função, para finalizar o sistema, contendo as diversas chamadas , function Finalizar() FreeLibrary() set resources to GlobalFree() ResAllFree() Release All, etc. que é chamada no valid da windows principal: ACTIVATE WINDOW oWnd MAXIMIZED valid finalizar() e que, por erro meu estava retornando NIL e não .t., para o valid. Só fui perceber quando testei o programa no windows 98. Acusava o erro na função, ou seja no XP saia normalmente, aceitando o NIL, como retorno para o valid, mas no 98 não. Mas como está encerrando o programa mesmo, talvez não haja maiores implicações. Ricardo Five 2.4 - WS - Blinker Como trabalho no XP, não dava erro

Só para citar... Tenho uma função, para finalizar o sistema, contendo as diversas chamadas , function Finalizar() FreeLibrary() set resources to GlobalFree() ResAllFree() Release All, etc. que é chamada no valid da windows principal: ACTIVATE WINDOW oWnd MAXIMIZED valid finalizar() e que, por erro meu estava retornando NIL e não .t., para o valid. Só fui perceber quando testei o programa no windows 98. Acusava o erro na função, ou seja no XP saia normalmente, aceitando o NIL, como retorno para o valid, mas no 98 não. Mas como está encerrando o programa mesmo, talvez não haja maiores implicações. Ricardo Five 2.4 - WS - Blinker Como trabalho no XP, não dava erro

Coloquei o KillProc como indicado. Parece que está funcionando. Ainda vou atualiar meu Five e passar para Harbour. Mas ja vi, pelo Forum, para quem utiliza classes de terceiros, como eu , dá algum trabalho. Uso muito o TsBrowse 7 e TsButton , terei que fazer algumas modificações nestas classes, bem como em algumas do Five que eu modifiquei. Assim, tenho que deixar funcionando bem meu atual desenvolvimento, para poder posteriormente atualiza-lo. Obrigado Ricardo

Algumas vezes, no Win XP, ao sair do aplicativo e entrar novamente, da a mensagem "Memória insuficente para rodar o aplicativo...". Se entrar logo em seguida, ele entra normalmente. NO meu aplicativo sempre elimino os dialogs, obj, freeresources, release all, etc. Procurei ver o desempenho antes do aplicativo e depois que ele fecha. Quase não altera. Observo que ele carrega o Wowexec, ao executar o programa. Parece que ele não libera, ao finalizar o programa. Se eu liberar este processo manualmente, executa o aplicativo novamente sem nenhum problema, se eu não libera-lo, ao retornar ao aplicativo, ãs vezes dá mensagem... Alguem ja teve isso? Ricardo FW24 Clipper 5.3 WS Blinker

Algumas vezes, no Win XP, ao sair do aplicativo e entrar novamente, da a mensagem "Memória insuficente para rodar o aplicativo...". Se entrar logo em seguida, ele entra normalmente. NO meu aplicativo sempre elimino os dialogs, obj, freeresources, release all, etc. Procurei ver o desempenho antes do aplicativo e depois que ele fecha. Quase não altera. Observo que ele carrega o Wowexec, ao executar o programa. Parece que ele não libera, ao finalizar o programa. Se eu liberar este processo manualmente, executa o aplicativo novamente sem nenhum problema, se eu não libera-lo, ao retornar ao aplicativo, ãs vezes dá mensagem... Alguem ja teve isso? Ricardo FW24 Clipper 5.3 WS Blinker

Pesquisei em Dicas e descobri que ja houve outras referencias a este problema, sem solução. Parece que é um problema do Fivewin com o XP. Em outras versões funciona perfeitamente. Ricardo

Kapiaba, Coloquei em tudo que é lugar: oDlg:Update(), oDlg:refresh(), SysRefresh(), nas variáveis também. Permanece o mesmo problema. Ricardo

Kapiaba, Eu peguei seu exemplo. Se voce alterar, no seu exemplo, o relogio do sistema, para outro horário, ele assume este horário, acho que por estar rodando em primeiro plano, não sei. Alterei seu exemplo, somente acrescentando o botao minimizar, no estilo da dialog, que não tinha. Agora, se eu minimizar o programa , e alterar a hora do sistema, ao maximizar , ele continua apresentando a hora anterior, e não atualiza para a nova hora. Ricardo

Observei que, em um aplicativo, ao iniciar, por exemplo, uma variavel com time(), ela pega a data do sistema ( fica igual ao relogio do Windows). Se eu minimizar o aplicativo e chamar o relogio do Windows, ou via janela DOS, e alterar o relógio do micro, a variável que contem o tempo, ou por exemplo, o relogio que eu colocar em minha barra de mensagem, permanece contando o tempo inicial captado, mesmo que eu chame novamente a função time(), e atualize a variável. Parece que o Five, ao inicializar o aplicativo, assume a data do sistema, e depois somente atualiza esta data com seconds() ou contador de tempo interno,não assumindo mais o do sistema ( relogio interno do micro). É assim mesmo?? Ricardo FW 2.4 - WS - clip53

Observei que, em um aplicativo, ao iniciar, por exemplo, uma variavel com time(), ela pega a data do sistema ( fica igual ao relogio do Windows). Se eu minimizar o aplicativo e chamar o relogio do Windows, ou via janela DOS, e alterar o relógio do micro, a variável que contem o tempo, ou por exemplo, o relogio que eu colocar em minha barra de mensagem, permanece contando o tempo inicial captado, mesmo que eu chame novamente a função time(), e atualize a variável. Parece que o Five, ao inicializar o aplicativo, assume a data do sistema, e depois somente atualiza esta data com seconds() ou contador de tempo interno,não assumindo mais o do sistema ( relogio interno do micro). É assim mesmo?? Ricardo FW 2.4 - WS - clip53

Ola, A rotina é igual a que o Marcelo postou. Mas observe que ela recebe o objeto oImage, ou seja , voce tem que criar antes, para JPG, o objeto e passa-lo para a função que ira imprimir, com sayImage. Tipo: DEFINE IMAGE oImage FILE "imagem.jpg" ... oBserve sua classe TImage. A padrão do FiveWin, necessita da nviewlib. Procure em dicas, por FREEIMAGE, que apresenta uma modificação na TImage, usando a freeimage.dll, que é melhor. Ricardo FW 2.4 - Ws

Ola Wagner, Ele retorna o path completo de onde está o executável. Embora venha com o nome curto, poderei utiliza-lo. É o que eu estava precisando. Respondendo ao Oliveira: Tenho um módulo( executável) de meu sistema, que, devido a particularidades, poderá ser instalado numa estação local (ficando no Tray do Windows), pegando os dados do servidor, pela rede, ou, localizado no servidor ( opção inicial) e executado como atalho, na estaçao. Poderá ter este atalho configurado como \\servidor\modulo, ou f:\servidor\modulo (mapeado). Como são diversas as opçoes, eu acho que, pelo retorno do path, consiguirei identificar como foi instalado,e pegar os arquivos corretos. Obrigado a todos Ricardo

Felipe, No meu exemplo, acrescente: if oWnd!=0 MsgAlert("O programa já se encontra aberto.","Atenção!!!") BringWindotoTop( oWnd ) ShowWindow( oWnd, 3 ) // <===== Return(.f.) endif Deve funcionar Ricardo

Marcelo a funçao getcurdir() retorna o nome tipo dos: Meusdo~1,e o curdrive, o drive atual. Se for caminho de rede( \\xxx\) nao funciona. Ricardo

Faço assim: ...... ....... cTitulo:= "Programa Tal" ( titulo exato usado no progama) oWnd:=FindWindow( 0, cTitulo ) if oWnd!=0 MsgAlert("O programa já se encontra aberto.","Atenção!!!") BringWindowToTop( oWnd ) Return(.f.) endif .......... ........ DEFINE WINDOW oWnd ; TITLE cTitulo ICON oIcon ; MENU BuildMenu() ........ ........ Ricardo FW2.4 - WS

Ola, Preciso de uma funçao que me retorne o path atual do aplicativo, com nome longo ou não, inclusive, se for em mapeamento de rede, tipo: x:= PathAtual() x poderá ser: C:\Aplicativo atual ou \\servidor\diretorio compartilhado\aplicativo atual , ou f:\diretorio compartilhado\aplicativo atual ( drive mapeado) Tentei adaptar algumas funções encontradas em Dicas, mas não obtive o resultado esperado. Obrigado Ricardo FW2.4 Clip53 WS

Ola, Preciso de uma funçao que me retorne o path atual do aplicativo, com nome longo ou não, inclusive, se for em mapeamento de rede, tipo: x:= PathAtual() x poderá ser: C:\Aplicativo atual ou \\servidor\diretorio compartilhado\aplicativo atual , ou f:\diretorio compartilhado\aplicativo atual ( drive mapeado) Tentei adaptar algumas funções encontradas em Dicas, mas não obtive o resultado esperado. Obrigado Ricardo FW2.4 Clip53 WS

Resolvido com as dicas. Obrigado Ricardo

Gilmer, Já testei o do Fivewin. Pelo menos o meu, FW 2.4, só funciona no Windows 98,ME. Não funciona no XP. Ele é acionado, fica nos processos em uso, mas não aparece na barra de ícones do TRay. talvez tenha que modificar a classe. Ricardo