microfly
-
Posts
119 -
Joined
-
Last visited
-
Days Won
8
Posts posted by microfly
-
-
Pessoal.. alguem usa ACBR na nota de serviço eletronica ?
pode me ajudar. ?
Whats: (11) 9-7414-4341
skype: wfinan
Vitor (sbc)
eu desenvolvi um modulo completo somente para NFS-E TANTO incluir dados auomático como buscar a XML
veja em https://www.amasystem.com.br/ tem o resumo do que faz e um video de procedimentos
Obs: vc pode selecionar na pasta Schemas\Abrasf, Schemas\Ginfes e assim por diante tem todos para território brasileiro
Desenvolvido em Fivewin1011 + Xharbour + Mysql 6.0 + sqlrdd
(19) 3833-4521
Luiz Carlos - Paulinia
Fico no Aguardo - Vendo com Fontes
-
Um amigo me pediu um exemplo para gerar QRCODE em xHarbour/Fivewin. Procurei no forum achei alguns exemplos mas faltava a DLL, em outros exemplos tinha um codigo fonte gigante, enfim, achei bem complicado. Então consegui a DLL (vlw Luis Batata - MicroFly) analisando alguns fontes montei um exemplo bem prático que gera o QRCODE em bitmap e até exibe ele. Espero que ajude outros
obs: neste link tem o codigo fonte e a dll
#include "fivewin.ch" Function u_Teste() Local cStr := "AQUI DEVE SER COLOCADO O CONTEUDO DO QRCODE" Local cFile := "arq.bmp" Local oDlg Local oBmp1 QRCode(cStr,cFile) // aqui vc chama a funcao passando como parametro o conteudo do QRCODE e o arquivo BMP que será gerado DEFINE DIALOG oDlg FROM 0,0 TO 300,300 TITLE "Exibir QRCODE" PIXEL @ 10,10 BITMAP oBmp1 FILE cFile OF oDlg Size 200,200 Pixel NOBORDER ACTIVATE DIALOG oDlg CENTERED Return DLL32 STATIC FUNCTION QRCode(cStr As STRING, cFile As STRING) AS LONG PASCAL FROM "FastQRCode" LIB "QRCodelib.Dll"Eduardo Motta quando precisar e eu puder ajuda-lo conte sempre comigo
-
Este problema foi resolvido, na verdade existiam dois erros. O primeiro era um espaço logo no começo da instrução SQL
cComm_Itens:= " select itens.*, "
O correto é:
cComm_Itens:= "select itens.*, "O outro problema era dentro da função EXECUTA_SQL. Dentro dela eram executados os comandos de "parse" e isso estragava a instrução SQL neste caso. Então foi criado um 3o parametro que determinava se dentro da função EXECUTA_SQL deveria executar ou não as funções de PARSE. Neste caso se passa .F. para não executar o parse. Então deu tudo certo.
Ficou pendente só o motivo do PARSE estragar a instrução, isso não deu tempo de ver.
Fica então a solução para esta situação, caso alguem passe por este problema. Não pode ter espaço no inicio da instrução e também verificar se as funcoes de PARSE estão estragando a instrução. Eu nunca uso as funções de PARSE nas minhas.
Boa tarde quero agradecer a todos que tentaram me ajudar em especial ao meu amigo Eduardo Motta que entrou aqui na minha maquina e perdeu algum tempo para me ajudar , que DEUS abencoe a todos. Muito Obrigado
-
Olá,
Isto costuma ser igual a um mágico. Chama a atenção para uma coisa mas o problema está em outra coisa bem diferente.
Dá algum erro? Qual? Salve o conteúdo da variável cComm_Itens em um arquivo ( via memowrit() ) para ver o que está realmente sendo enviado.
boa tarde Evandro ja fiz tudo isso , nao da erro na compilacao, ja foi feito isso tb via memowrit()
-
Olá a todos,
Amigos boa noite, estou com um problema para executar o seguinte comando SQL usando SQLRDD.
Se executo em uma Ferramenta Case Tipo o Phpmyadmin, HeidSql, MysqlFront, etc. é exibido o Resultado, mas no código PRG compilado, não executa
FUNCTION Imprime_DAV(v_Numero_Orcamento)
********************************************************************************
RepDir := CurDrive() +":\"+ CurDir() + '\RELS\'
TITULO := 'DAV - DOCUMENTO AUXILIAR DE VENDA'
RELATORIO_FAST := 'EMISSAO_DAV.fr3'
*----------------------------------------------------------------------------
IF FILE( (CurDrive() +":\"+ CurDir() + '\RELS\'+RELATORIO_FAST))
cComm_Cabecalho:= "select * from orcamento WHERE orcamento = " + SR_cDBValue( v_Numero_Orcamento ) + " ORDER BY orcamento DESC"
EXECUTA_SQL(cComm_Cabecalho,"tmp_orcamento")
*-------------------------------------------------------------------------
cComm_Cliente:= "select * from cliente WHERE codcli = " + SR_cDBValue( tmp_orcamento->codcli )
EXECUTA_SQL(cComm_Cliente,"tmp_cliente")
*-------------------------------------------------------------------------
cComm_Itens:= " select itens.*, "
cComm_Itens:= cComm_Itens + " pro.codbar AS c_barras, pro.nompro AS pro_nompro, pro.und AS pro_und "
cComm_Itens:= cComm_Itens + " from itemorca as itens "
cComm_Itens:= cComm_Itens + " LEFT JOIN produtos AS pro ON itens.codbar = pro.codbar "
cComm_Itens:= cComm_Itens + " WHERE itens.orcamento = " + SR_cDBValue( v_Numero_Orcamento ) + " ORDER BY itens.orcamento DESC "
EXECUTA_SQL(cComm_Itens,"tmp_Itens")
*-------------------------------------------------------------------------
oFrPrn := frReportManager():new()
oFrPrn:SetIcon(1) // ícone da janela do FRH
oFrPrn:SetTitle( 'Relatorio ' + TITULO ) // título da janela do FRH
oFrPrn:LoadLangRes( (CurDrive() +":\"+ CurDir() + '\RELS\' + 'brazil.xml' )) // arquivo de idioma
oFrPrn:SetWorkArea("tmp_orcamento", select("tmp_orcamento"))
oFrPrn:SetWorkArea("tmp_cliente", select("tmp_cliente"))
oFrPrn:SetWorkArea("tmp_Itens", select("tmp_Itens"))
oFrPrn:LoadFromFile(RepDir+RELATORIO_FAST) // para leitura direta de arquivo FR3
oFrPrn:PreviewOptions:SetAllowEdit( .F. )
*-------------------------------------------------------------------------
M->RELATORIO_DESINER = (.T.)
IF M->RELATORIO_DESINER = (.T.)
oFrPrn:DesignReport() // aqui para "desenhar" o relatório
endif
oFrPrn:PreviewOptions:SetZoomMode(2)
oFrPrn:ShowReport() // aqui para gerar o preview do relatório.
oFrPrn:DestroyFR()
ELSE
MsgStop('Está Faltando o Arquivo' + RepDir+(ARQUIVO_FR3))
ENDIFRETURN(.T.)
*-----------------------------------------------------------------------------------------------------------------------------------------------------
já o mesmo comando em Ferramenta case
select itens.*,
pro.codbar AS c_barras, pro.nompro AS pro_nompro, pro.und AS pro_und
from itemorca as itens
LEFT JOIN produtos AS pro ON itens.codbar = pro.codbar
WHERE itens.orcamento = 1 ORDER BY itens.orcamento DESC
EXECUTA_SQL(cComm_Itens,"tmp_Itens")Será que está correto ?
Veja a imagem
-
Eu comecei a programar em 1975 iniciei com o Cobol, Foltran, Assembler, Mumps, Basic , Dbase I II III , Clarion depois que conheci CLIPPER me apachonei por ele e hoje estou com Fivein + xharbour
-
bom dia Obrigados a todos que me responderam para arrumar uma solução, mais funcionou como &Condicao eu tinha errado na matriz que compunha a condicao:={"?????" }.
agradeço a todos muito obrigado
Luiz Carlos Nogueira (Batata)
skype suporte.microfly
zap (11) 96969-3667
(19) 3844-8556 - Paulínia - SP
-
pelo que entendi do problema do afill é que está errado a forma de passar os parâmetros. se mostrares como estás fazendo ficaria mais fácil de ajudar.
quanto ao uso de macro. "mas há muito" olha, põem muito tempo nisso, acredito que no clipper 5,2 era o problema com macros, além de outros(rsrsrs como tinha essa versão). no (x)harbour nunca tive algum problema sobre essa questão.vlw meu amigo , mais eu ja resolvi sua ideia foi muito boa obrigado
-
Amigo, mesmo sabendo que a solução já foi dada pelo Alessandro, mas há muito, li que macro não deve ser usada num laço de WHILE, embora depois da evolução das ferramentas, não sei se acharam uma solução.
[]s,
vlw vou procurar algo a respeito mais estou com problema com o AFILL
Application
===========
Path and name: C:\FOLHAFWH\Folhafwh.Exe (32 bits)
Size: 4,422,656 bytes
Time from start: 0 hours 0 mins 15 secs
Error occurred at: 20/11/2017, 19:39:43
Error description: Error BASE/9999 Argument error: AFILL
Args:
[ 1] = U
[ 2] = N 0
abraços e obrigadoLuiz Carlos Nogueira(Batata)
-
eu faria desta maneia
condicao:="Str(folfun->Fun_Codemp,4)+Str(folfun->fun_alocac,8) >= Str(M->vCodemp,4)+Str(Codigo1,8) .and. Str(folfun->Fun_Codemp,4)+Str(folfun->fun_alocac,8)<=Str(M->vCodemp,4)+Str(Codigo2,8)"
Do while !folfun->(eof())
IF &(Condicao)
Apagar()ENDIF
skip
enddo
obrigado pela força , abs
-
Bom dia a todos tenho que usar do while com macro pois tenho 3 opcoes e cada opcao tem uma condicao diferente exemplo da opcao 2
If T_Escolha_Forma_Calculo = 2
Folfun->(OrdSetFocus("arqfun16"))
condicao:="Str(folfun->Fun_Codemp,4)+Str(folfun->fun_alocac,8) >= Str(M->vCodemp,4)+Str(Codigo1,8) .and. Str(folfun->Fun_Codemp,4)+Str(folfun->fun_alocac,8)<=Str(M->vCodemp,4)+Str(Codigo2,8) .and. !folfun->(eof())"
? condicao
_reg:=folfun->(recno())
Do while &Condicao // da erro aqui alquem poderia me ajudar solucionar esse problema ou estou fazendo algo errado ?
Apagar()
Folfun->(Dbskip())
Enddo
folfun->(Dbgoto(_reg))
Endif
Do while &condicao
Apagar()
T_TXT_001 := Str(FolFun->Fun_Matric,5)
T_TXT_002 := ALLTRIM(FolFun->Fun_Nome)
oT_TXT_001 : Refresh()
oT_TXT_002 : Refresh()
Folfun->(Dbskip())
Enddo
folfun->(Dbgoto(_reg))
ALERT('Calculo Por Setor' )
*--------------------------------------------------------------------------------------------------------------------------------------------*
Desde de já muito obrigado atodosLuiz Carlos Nogueira (Batata)
Paulinia - SP
zap (11) 96969-3667
-
Veja se entende como compila a TSBROWSE 9.0 junto ao seu projeto.
@Echo On Cls ECHO ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ ECHO ³ FiveWin for xHarbour 17.01 - Jan. 2017 xHarbour development power ³Ü ECHO ³ (c) FiveTech 1993-2016 for Microsoft Windows 9X/NT/200X/ME/XP/Vista/7/8/10 ³Û ECHO ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙÛ ECHO ÿ ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß Echo ÚÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄ¿ Echo ³ FiveWin For xHarbour 17.01 Jan. 2017 Contato Sistemas Ltda. ³Ü Echo ³ Aguarde um Momento, Compilando Aplica‡Æo 32 Bits, Processamento Demorado ³Û Echo ³ CopyRight(c) JoÆo@2007 - Todos os Direitos Reservados. AGENDA 32 Bits. ³Û Echo ³ Agradecimentos Especiais - Gilmer Tavares - Virtual Objects Informatica ³Û Echo ³ vendas@fivewin.com.br - suporte@fivewin.com.br - gilmer@fivewin.com.br ³Û Echo ÀÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÄÙÛ Echo ÿ ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß Echo . Echo Aguarde... Compilando os Modulos do Programa... Processamento Demorado Echo Gerando o Arquivo ERRO.LOG, em Caso de Duvidas, Consulte-o. Borland C. Rem Localizacao dos Paths Set hdir=C:\XHBBCC72 Set bcdir=C:\bcc72 Set fwhdir=C:\FwH1701 Set GT=gtgui @If Exist *.Bak Del *.Bak @If Exist *.Obj Del *.Obj @If Exist *.Log Del *.Log @If Exist *.Map Del *.Map @If Exist *.PPO Del *.Ppo @If Exist *.TDS Del *.TDS @If Exist *.C Del *.C If Exist AGENDA.Exe Del AGENDA.Exe REM -> PROGRAMAS DA TSBROWSE 9.0 REM Pasta de C:\tsbrowse\SOURCE\CLASSES REM 02/04/2010 10:07 379.992 TSBROWSE.PRG - USADO REM 19/11/2009 00:49 17.493 TSBTNGET.PRG - USADO REM 26/12/2009 08:14 31.024 TSCOLUMN.PRG - USADO REM 27/11/2009 01:38 4.258 TSCOMBO.PRG - USADO REM 27/11/2009 01:31 3.321 TSFGET.PRG - USADO REM 27/11/2009 01:39 12.678 TSGET.PRG - USADO REM 27/11/2009 01:37 2.611 TSMULTI.PRG - USADO REM 27/11/2009 01:36 6.080 TSPOINT.PRG - USADO REM Pasta de C:\tsbrowse\SOURCE\FUNCTION REM 14/10/2009 11:05 11.383 DEBUG.PRG - NAO USADO REM 14/10/2009 17:12 24.518 FWCALEN.PRG - USADO REM 20/11/2009 13:07 25.383 TSBFUNCS.C - USADO REM -> Como NÆo Quero Usar a LIB da BtnGet, Vou Incorporar os Arquivos.C REM -> Vou Copiar Arquivos.C Para Usar no Programa - BtnGet.Prg, Precisa. Copy C:\PIZZAS\Tsb\GetBtn.C /Y REM // <<- estes ‚ .c Para TsBrowse ->> REM Copy C:\PIZZAS\Tsb\TSBFuncs.C /Y Copy C:\TSBROWSE\SOURCE\FUNCTION\TSBFuncs.C /Y REM // <<- estes ‚ .c Para TsBrowse ->> REM Copy C:\PIZZAS\Tsb\Scroll.C /Y // NAO + USADO NA TSBROWSE 9.0 REM // <<- ESTES ‚ .C PARA TSBUTTON - nao estava aqui 12/08/2012 COPY C:\PIZZAS\TSB\BPAINT.C /Y REM // <<- ESTES ‚ .C PARA TSBUTTON COPY C:\PIZZAS\TSB\ROUNDREC.C /Y %hdir%\bin\harbour AGENDA /m/n/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p > Erro.log %hdir%\bin\harbour AGENCOMP /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour AGENDTEL /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour AGENDDOC /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour AGENDGRP /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour CRIARDBF /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour REINDEXA /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour ANIMABMP /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour DBMANT /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour REDE /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour UTIL /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour FUNCOES /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour CALEND /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour TCALENDA /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour CALCULAD /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour RELOGIO /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour TECLADO /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour CONFIGAG /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour FERIADO /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log REM -> CLASSES %hdir%\bin\harbour MSGMETER /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour DSAY /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour TGET /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour ERRSYSW /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour CONTROL /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour WINDOW /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour MSGBAR /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour BMPVIEW /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour RPREVIEW /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log REM -> PARA TODAS AS TELAS FICAREM IGUAIS - NAO FUNCIONOU %hdir%\bin\harbour DISPLAY /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour XBLITE /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour BOXGET /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour SSAY /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour FOLDER /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log REM -> CLASSES DA TSBROWSE -> PRECISA REM -> CLASSES DA TSBROWSE %hdir%\bin\harbour TSBrowse /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour SBMsgPor /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour TSColumn /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour TSBtnGet /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour TSFGet /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour TSGet /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour TSCombo /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour TSMulti /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour TSPoint /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour FwCalen /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log REM NAO SE USA MAIS NAS NOVAS VERSOES REM %hdir%\bin\harbour ScrllBar /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include /w /p ScrllBar.C >> Erro.log %hdir%\bin\harbour TMetafil /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log REM -> FIM DA TSBROWSE REM -> CLASSES DA TSBUTTON %hdir%\bin\harbour TSBUTTON /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour TSBAR /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour TSLINES /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log REM -> FIM DA TSBUTTON %hdir%\bin\harbour RADIO /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour HELP /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log %hdir%\bin\harbour HELP32 /m/n/w/es1/gc1/w/es1/gc1 /i%fwhdir%\include;%hdir%\include;%bcdir%\include /w0 /p >> Erro.log REM -> Area dos Arquivos Gerados na Linguagem C Pelo [x]Harbour %bcdir%\bin\bcc32 -M -c -v -O2 -eAGENDA.exe -I%hdir%\include -I%bcdir%\include AGENDA.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eAGENCOMP.exe -I%hdir%\include -I%bcdir%\include AGENCOMP.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eAGENDTEL.exe -I%hdir%\include -I%bcdir%\include AGENDTEL.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eAGENDDOC.exe -I%hdir%\include -I%bcdir%\include AGENDDOC.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eAGENDGRP.exe -I%hdir%\include -I%bcdir%\include AGENDGRP.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eCRIARDBF.exe -I%hdir%\include -I%bcdir%\include CRIARDBF.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eREINDEXA.exe -I%hdir%\include -I%bcdir%\include REINDEXA.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eANIMABMP.exe -I%hdir%\include -I%bcdir%\include ANIMABMP.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eDBMANT.exe -I%hdir%\include -I%bcdir%\include DBMANT.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eREDE.exe -I%hdir%\include -I%bcdir%\include REDE.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eUTIL.exe -I%hdir%\include -I%bcdir%\include UTIL.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eFUNCOES.exe -I%hdir%\include -I%bcdir%\include FUNCOES.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eCALEND.exe -I%hdir%\include -I%bcdir%\include CALEND.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eTCALENDA.exe -I%hdir%\include -I%bcdir%\include TCALENDA.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eCALCULAD.exe -I%hdir%\include -I%bcdir%\include CALCULAD.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eRELOGIO.exe -I%hdir%\include -I%bcdir%\include RELOGIO.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eTECLADO.exe -I%hdir%\include -I%bcdir%\include TECLADO.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eCONFIGAG.exe -I%hdir%\include -I%bcdir%\include CONFIGAG.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eFERIADO.exe -I%hdir%\include -I%bcdir%\include FERIADO.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eMSGMETER.exe -I%hdir%\include -I%bcdir%\include MSGMETER.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eDSAY.exe -I%hdir%\include -I%bcdir%\include DSAY.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eTGET.exe -I%hdir%\include -I%bcdir%\include TGET.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eSSAY.exe -I%hdir%\include -I%bcdir%\include SSAY.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eWINDOW.exe -I%hdir%\include -I%bcdir%\include WINDOW.C >> Erro.log REM BUG NA MSGBAR.PRG Reportado no forum internacional pelo TiaoFw %bcdir%\bin\bcc32 -M -c -v -O2 -eMSGBAR.exe -I%hdir%\include -I%bcdir%\include MSGBAR.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eRPREVIEW.exe -I%hdir%\include -I%bcdir%\include RPREVIEW.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eBMPVIEW.exe -I%hdir%\include -I%bcdir%\include BMPVIEW.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eERRSYSW.exe -I%hdir%\include -I%bcdir%\include ERRSYSW.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eDISPLAY.exe -I%hdir%\include -I%bcdir%\include DISPLAY.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eXBLITE.exe -I%hdir%\include -I%bcdir%\include XBLITE.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eBOXGET.exe -I%hdir%\include -I%bcdir%\include BOXGET.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eFOLDER.exe -I%hdir%\include -I%bcdir%\include FOLDER.C >> Erro.log REM -> CLASSES DA TSBROWSE -> PRECISA %bcdir%\bin\bcc32 -M -c -v -O2 -eTSBrowse.exe -I%hdir%\include -I%bcdir%\include TSBrowse.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eSBMsgPor.exe -I%hdir%\include -I%bcdir%\include SBMsgPor.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eTSColumn.exe -I%hdir%\include -I%bcdir%\include TSColumn.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eTSBtnGet.exe -I%hdir%\include -I%bcdir%\include TSBtnGet.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eTSFGet.exe -I%hdir%\include -I%bcdir%\include TSFGet.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eTSGet.exe -I%hdir%\include -I%bcdir%\include TSGet.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eTSPoint.exe -I%hdir%\include -I%bcdir%\include TSPoint.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eFwCalen.exe -I%hdir%\include -I%bcdir%\include FwCalen.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eTSCombo.exe -I%hdir%\include -I%bcdir%\include TSCombo.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eTSMulti.exe -I%hdir%\include -I%bcdir%\include TSMulti.C >> Erro.log REM %bcdir%\bin\bcc32 -O2 -M -c -D__HARBOUR__ -I%hdir%\include ScrllBar.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eTMetafil.exe -I%hdir%\include -I%bcdir%\include TMetafil.C >> Erro.log REM - FIM DAS CLASSES REM -> CLASSES DA TSBUTTON %bcdir%\bin\bcc32 -M -c -v -O2 -eTSBUTTON.exe -I%hdir%\include -I%bcdir%\include TSBUTTON.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eTSBAR.exe -I%hdir%\include -I%bcdir%\include TSBAR.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eTSLINES.exe -I%hdir%\include -I%bcdir%\include TSLINES.C >> Erro.log REM - FIM DAS CLASSES TSBUTTON %bcdir%\bin\bcc32 -M -c -v -O2 -eRADIO.exe -I%hdir%\include -I%bcdir%\include RADIO.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eCONTROL.exe -I%hdir%\include -I%bcdir%\include CONTROL.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eHELP.exe -I%hdir%\include -I%bcdir%\include HELP.C >> Erro.log %bcdir%\bin\bcc32 -M -c -v -O2 -eHELP32.exe -I%hdir%\include -I%bcdir%\include HELP32.C >> Erro.log REM -> Vou Transformar Arquivos.C em Arquivos.Obj Para Usar no Programa %FwhDir%\Tools\Clp2Harb GetBtn.C GetBtn.HC %FwhDir%\Tools\Clp2Harb TSBFuncs.C TSBFuncs.HC REM %FwhDir%\Tools\Clp2Harb Scroll.C Scroll.HC REM -> Vou Transformar em Arquivos.Obj Para Usar no Programa Com a BtnGet.Prg %Bcdir%\Bin\Bcc32 -c -D__HARBOUR__;HB_API_MACROS -I%FwhDir%\Include;%hDir%\Include -tW GetBtn.HC %Bcdir%\Bin\bcc32 -c -D__HARBOUR__;HB_API_MACROS -I%FwhDir%\Include;%hDir%\Include -tW TSBFuncs.HC REM NAO + USADO REM %Bcdir%\Bin\bcc32 -c -D__HARBOUR__;HB_API_MACROS -I%FwhDir%\Include;%hDir%\Include -tW Scroll.HC REM -> Incorporando arquivo.c diretamente via xharbour %bcdir%\bin\bcc32 -M -c -D__HARBOUR__ -I%fwhdir%\include;%hdir%\include GetBtn.C >> Erro.log %bcdir%\bin\bcc32 -M -c -D__HARBOUR__ -I%fwhdir%\include;%hdir%\include TSBFuncs.C >> Erro.log REM %bcdir%\bin\bcc32 -M -c -D__HARBOUR__ -I%fwhdir%\include;%hdir%\include Scroll.C >> Erro.log If ErrorLevel 1 Type Erro.log | More If ErrorLevel 1 Goto Exit REM %bcdir%\bin\bcc32 -M -c -O2 -eAGENDA.exe -I%hdir%\include AGENDA.c :ENDCOMPILE %bcdir%\bin\ilink32 -Gn -aa -Tpe -s @Cx.Lnk Echo . Echo * Applicacao Foi Desenvolvida com sucesso Echo . Echo . Echo * Aguarde um Momento, Compactando Aplicacao, Usando o PEC2.EXE Echo . REM \UPX\UPX.EXE -9 AGENDA.EXE REM AVG ESTA DIZENDO QUE TEM ALGO ERRADO. REM C:\PECOMPACT\PEC2 /NB /EMP:Y /TM:Y /CR:N /MC AGENDA.EXE Echo . Echo * Aplicativo Foi Compactado Com Sucesso - Aguarde Execucao. Echo . Echo * Aguarde, Executando o Aplicativo, Gerado Com Sucesso Absoluto * REM AGENDA Goto Exit Echo cls :EXIT
Vlq mano vc nunca me deixa na mão
obrigado
Luiz Carlos Nogueira (Batata)
-
Alguém tem as LIB TSBROWSE 8 ou 9 TSBUTTON 7 compilada para a versão FWH17.01
se alguém tiver pode me enviar no email suporte@microfly.com.br
já pedi ajuda ao criador das libs Manuel Mercado já faz 15 dias e ele não responde
por isso decidi nos próximos projetos não utilizar mais nada de terceiros e só dor de cabeça qdo muda a versão do FWH
Luiz Carlos Nogueira
(19) 3844-8556 / zap (11) 9 6969-3667
Obrigado desde já
-
Obrigado mano João
-
Boma Dia a todos
Alguem poderia me passar algum exemplo de como utilizar a webcam32 pois a minha eu não consigo tirar foto e gravar
fiz um sistema escolar e funcionava muito bem na versão fivewin2.8 e na versãoo 18.01 agora na versão fivewin 17.01inão funciona mais
agora estou migrando todo meus sistemas para mysql.
Obrigado alquem poder rme ajudar
Estou alterando meus sistemas para mysql e utilizando o FastReport com ajuda do meu amigo Marcio (da informais) para ver se volto no mercado de trabalho.
meus sistemas são todos em 32 bits
-
Agradeço a todos amigos que me ajudaram, Especialmente ao João Santos e ao Luiz Augusto Martins (Gunafe) que me deu a maior força dando referencias da minha pessoa.
Agradeço ao Leonardo da Sygecom pela força e pelos conselhos que me deu.
Agradeço especialmente ao Marcio (da empresa Informais ) que esta se dicando o seu tempo em me ensinar MYSQL uma pessoa de bom coração
e todos dia depois do expediente fica horas conectado comigo me ensinando o MYSQL até aos sabados. me aconselhando e me fazendo CRITICAS CONSTRUTIVAS
que esta me ajudando E MUITO.
Agradeco ao Eduardo Mota que me ajudou muito .
Agradeço tb ao Wanderson pela confiança no meu trabalho e na minha pessoa.
Enfim quero agradecer a todos que nao foram poucos nao, que DEUS de muita PAZ E SAÚDE a TODOS desse grupo e aos seu familiares MUITO OBRIGADO POR TUDO.
Luiz Carlos Nogueira
(19) 3844-8556 - Paulínia - João Aranha
zap (11) 9 6969-3667
Obs: aqueles que precisarem de ajuda profissional pode contar comigo, ajudarei com o maior prazer , inclusive aos iniciantes. trabalho com Fivewin desde 1999.
-
quero agradecer a todos que me ajudaram sem exceção sanar meu problema graças a DEUS e a todos amigos aqui do forum consegui.
todos que contribuirão me pediram para eu não mencionar seus nomes eu vou respeitar
Mais um eu quero fazer questão de agradecer ao meu amigo irmão JOÃO SANTOS pelo empenho em me ajudar.
MUITO OBRIGADO JOÃO SANTOS que DEUS.lhe de muita saúde e sorte a você e toda sua família
MUITO OBRIGADO A TODOS DO GRUPO SEM EXCEÇÃO QUE DEUS DE MUITA SAUDE E SORTE A VCS E TODA A SUAS FAMILIAS.
e vou deixar aqui a quem interessar o sistema o mesmo valor 100,00 reais eu mando o sistema de bar completo (com os fontes)
zap 11 96969-3667
(19) 3844-8556 - Paulinia
suporte@microfly.com.br
skype suporte.microfly
agradeço a todos
-
-
-
quero agradecer a todos que me ajudaram sem exceção sanar meu problema graças a DEUS e a todos amigos aqui do forum consegui.
todos que contribuirão me pediram para eu não mencionar seus nomes eu vou respeitar
Mais um eu quero fazer questão de agradecer ao meu amigo irmão JOÃO SANTOS pelo empenho em me ajudar.
MUITO OBRIGADO JOÃO SANTOS que DEUS.lhe de muita saúde e sorte a você e toda sua família
MUITO OBRIGADO A TODOS DO GRUPO SEM EXCEÇÃO QUE DEUS DE MUITA SAUDE E SORTE A VCS E TODA A SUAS FAMILIAS.
e vou deixar aqui a quem interessar o sistema o mesmo valor 100,00 reais eu mando o sistema de bar completo (com os fontes)
Peço desculpas aos amigos do forun pois eu disse que iria colocar o setup do sistema de tecidos a disposicao mais tive muita dor essa semana e me atrasei um pouco mais estou mudando ele para ribonbar e colocarei a disposicao ate domingo
zap 11 96969-3667
(19) 3844-8556 - Paulinia
suporte@microfly.com.br
skype suporte.microfly
agradeço a todos
-
Cara, Estou em Oração mesmo por Você... Que Deus lhe dê muita força mesmo para superar... Não posso contribuir muito, mas fiz uma transferencia hoje... assim que puder ajudarei mais... fk com Deus!!!!
Muito obrigado meu amigo sua oração ja é uma bela contribuição fique com DEUS vc e toda sua familia tenha bastante saude paz e harmonia
-
Bom dia, acabei de receber a seguinte mensagem do Luiz:
Já depositei em juízo 3600 reais falta 1200 reais tenho que arrumar este valor ate em 8 dias senão tenho 90 dias para deixar o imóvel
Ta batendo o desespero pois não consegui ainda
Pessoal, quem puder ajudar um amigo que tanto colaborou aqui, veja a situação que está passando por motivo de doença.
Desculpa Luiz por postar sua mensagem, mas aqui sei que terá uma chance de poder continuar com sua luta.
Abraços e boa sorte.
Muito obrigado que DEUS de bastante SAUDE E SUCESSO A TODOS , nao vou desistir de lutar pela minha vida
-
Olá,
Para se fazer o depósito se faz necessário:
Banco:
Agência:
Conta:
Nome:
CPF:ja lhe enviei os dados que pediu obrigado
-
SLQLIB PARA FW 13.03 E XHARBOUR 1.2.3
in Programação
Posted
boa tarde se possível poderia me enviar no meu email suporte@microfly.com.br
Obrigado
(19) 3833-4521 - Paulínia - João Aranha
Luiz Carlos Nogueira
http://www.amasystem.com.br