domingo, 26 de setembro de 2021

video 3423 - SOLUCIONANDO PROBLEMA SILVIO CHAVE AUTOMATIC - ID - HYPERFILE




https://youtu.be/kZCKVU76k70



Esse Video vai estrear as 06:15 do dia 27/09/2021

video 3423 - SOLUCIONANDO PROBLEMA SILVIO CHAVE AUTOMATIC - ID - HYPERFILE



------------------ INDICE HYPERFILE

Blog - HyperFile - Instalar - 1/...
Blog - HyperFile - Configurar - 2/...
Blog - Hyperfile - Conexao - 3/...
Blog - Hyperfile - Conversões - 4/...
Blog - Hyperfile - Liberar Porta 4900 - Acesso Rede - Parte 5/...
Blog - Hyperfile - Log / Automatic Id - parte 6/...
Blog - Hyperfile - Configurar Servidor Txt - parte 7/...  
Blog - Hyperfile - Modificar Estrutura Arquivo Parte 8/...
Blog - Hyperfile - Consideraçoes Wladimir - Parte 9/...
Blog - Hyperfile - Backup/Restore - Parte 10/...
Blog - Hyperfile - Backup Por Programação - Parte 11/..
Blog - Hyperfile - Provider HyperFile Classic - Parte 12/... - Com banco ou sem Banco 
Blog - Hyperfile - /013/... HListFile -> Mostrar Tabelas Analise Programação
Blog - Hyperfile - /014/... HListItem - HListKey - HListLink Mostrar Campos/Chaves
Blog - Hyperfile - /015/ ... Conexao Classic - Mobile 
Blog - HyperFile - /016/ ... HyperFile - Alterar Senha 
Blog - HyperFile - /017/... FireWall - Problema Conexão - Wizard Conexao 
Blog - HyperFile - /018/... Instalcao Linux Por Adriano - Hyperfile 
Blog - HyperFile - /019/... Expaind
Blog - HyperFile - /020/... Criar Pastas analise
Blog - HyperFile - /021/... - Registro - HNbRec - Quantidades Registros
Blog - HyperFile - /022/... - Backup - Programada - Automatica
Blog - HyperFile - /023/... - Quantidade Registros e Progresso - HnbRec/Gauge
Blog - HyperFile - /024/... - Alterado - Ver se Registro foi Alterado - MyWindow..modified
Blog - HyperFile - /025/... - Erro HyperFile - Manta Erro 2
Blog - HyperFile - /026/... - HInfoServer
Copia Programada - WinDev Hyperfile 027/...
HSendMessageToClient - WINDEV HYPERFILE 028/.. AULA 1212
HDisconnectClient - DESCONECTAR BANCO - HYPERFILE 029/... AULA 1213
HServerMaintenance - MANUTENCAO HYPERFILE - HYPERFILE 030 / AULA 1214
Manutençao no Hfsql Control Center - HYPERFILE 031 - AULA 1215
NOVO REGISTRO - NEW RECORD - HYPERFILE 032 - AULA 1235
DICAS 2296 WINDEV WEBDEV MOBILE HYPERFILE 39 Filter
DICAS 2303 WINDEV WEBDEV MOBILE HYPERFILE 40 BACKUP
DICAS 2551 WINDEV WEBDEV MOBILE HYPERFILE 41 COPIA PROGRAMADA
DICAS 2601 WINDEV WEBDEV MOBILE Hyperfile Refazendo aulas
DICAS 2605 WINDEV WEBDEV MOBILE Hyperfile Refazendo aulas parte 2
DICAS 2608 WINDEV WEBDEV MOBILE Hyperfile Refazendo aulas parte3
DICAS 2611 WINDEV WEBDEV MOBILE Hyperfile Refazendo aulas parte 4
DICAS 2614 WINDEV WEBDEV MOBILE Hyperfile Refazendo aulas parte 5
DICAS 2617 WINDEV WEBDEV MOBILE Hyperfile Refazendo aulas parte 6 Final
DICAS 3051 - WINDEV TUTORIAL 74 - HYPERFILE CONCEITO INSTALACAO PARTE A


Podcast XI 11 - Video 3422 - live do amarildo - sabado 25 09 2021 AS 15:00

Podcast XI 11 - Video 3422 - live do amarildo - sabado 25 09 2021 AS 15:00

https://youtu.be/kTMzSjdb8Ss




sábado, 25 de setembro de 2021

video 3421 - revisao aulas da semana com alunos curso windev








Bom Dia Boa Tarde Boa Noite

Mande um email pedido para receber todas notificaçoes dos videos 

==============================================================

Seja Membro do Canal e tenha direito a consultorias com precos diferenciados
https://www.youtube.com/channel/UCQGPHrppG5XKoRbeOIgLJEA/join
Beneficios Membros: 
     Skype Privado
     Sugerir ou pedir Videos
     Valroes de consultorias com precos acesiveis
     Pedir para eu refazer uma exemplo versao inferior
     Quero Refazer meu sistema no windev, onde comecar?
     Como fazer uma proteção on-line do seu sistema ?
     Meu projeto será grande, como devo fazer?

==============================================================


Esse Video vai estrear as 09:00 do dia 25/09/2021

video 3421 - revisao aulas da semana com alunos curso windev




ASSUNTOS













quarta-feira, 22 de setembro de 2021

VIDEO 3419 e 3420 - CURSO WINDEV 5 DE 10 - PRIVADO 22 09 2021 HYPERFILE - ANALISE INICIO





https://youtu.be/qKSJ24ArUz4




revisao aula sabado 


https://youtu.be/h1mEua-ik30




 olhando a analise

https://youtu.be/HBohKF5yvXU





Bom Dia Boa Tarde Boa Noite

==============================================================

Seja Membro do Canal e tenha direito a consultorias com precos diferenciados
https://www.youtube.com/channel/UCQGPHrppG5XKoRbeOIgLJEA/join
Beneficios Membros: 
     Skype Privado
     Sugerir ou pedir Videos
     Valroes de consultorias com precos acesiveis
     Pedir para eu refazer uma exemplo versao inferior
     Quero Refazer meu sistema no windev, onde comecar?
     Como fazer uma proteção on-line do seu sistema ?
     Meu projeto será grande, como devo fazer?

==============================================================


Esse Video vai estrear as 20:00 do dia 22/09/2021

VIDEO 3419 - CURSO WINDEV 5 DE 10 - PRIVADO 22 09 2021 HYPERFILE - ANALISE INICIO




ASSUNTOS















domingo, 19 de setembro de 2021

video 3415 - Curso Windev - Revisao da aula Loop - Privado

Revisao da aula Loop
essa aula nao foi gravada por problema tecnicos

00:49 for 1 to 10
01:07 for 1 to 10 step +2
01:28 for 50 to 1 step -5
01:48 loop 
02:45 while 
03:14 for 1 to 700 Imagen x e y 
03:44 movimentando a imagem por completo 
05:07 Mostrando como acrescentou a barra de tarefas 
05:22 Vamos executar o programa 

https://youtu.be/vn-gN2kc65o



video 3414 - Curso Windev - Revisao da aula 3412 - Privado - condicoes if switch



https://youtu.be/STz01Fuay2I




quinta-feira, 16 de setembro de 2021

Video 3413 - Curso Windev 3 - 10 - Aula - Revisao Variaveis Da aula 3411 - Privado Somente Alunos


Video 3413 - Curso Windev 3 - 10 - Aula - loop - for - while  - Privado

bom dia.. galera..
Sera feito 3 videos de hoje ate segunda.
No primeiro video , sera a revisao da aula de variaveis
No segundo video , sera a revisao da aula de condicoes
No terceiro video, sera a revisao da aula de loop
No Sabado de manha, todos estao convidados, para 
revisao da aulas da semana,sala abre as 9 e fecha as 11.
Para quem ficou com alguma duvida, nessas 3 aulas,
pode postar a duvida aqui, para eu poder ajudar
a esclarecer 

Aula revisao Variaveis 





Link do Blog 






 
 


// FOR - IR DE  1 ATE 10


FOR nNCONTADOR = 1 TO 10

ToastDisplay(nNCONTADOR)

END







//FOR - IR DE  1 ATE 10 STEP +2


FOR nNCONTADOR = 1 TO 10 STEP +2

Info(nNCONTADOR)

END




//FOR - IR DE  1 ATE 10 STEP +2


FOR nNCONTADOR = 1 TO 10 STEP +2

Info(nNCONTADOR)

END








//FOR - IR DE 50 TO 1 STEP -50


FOR nNCONTADOR = 50 TO 1 STEP -5

Trace(nNCONTADOR)

END







// loop

nContador is int=10

LOOP

nContador = nContador - 1

ToastDisplay(nContador)

IF nContador<1 THEN

BREAK 

END

END






// LOOP ( 10 )

LOOP(10)

   Trace(TimeSys())

END




// loop 

nCONTADOR is int=0

WHILE nCONTADOR<10

Trace(nCONTADOR)

nCONTADOR++

END



// FOR  mexe imagen

FOR I = 1 TO 700

IMG_IMAGEN..X++

END

FOR I=1 TO 600

IMG_IMAGEN..Y++

END






//while mexe imagen

WHILE IMG_IMAGEN..X < WinInWidth() - IMG_IMAGEN..Width

    IMG_IMAGEN..X++

END

WHILE IMG_IMAGEN..Y < WinInHeight() - IMG_IMAGEN..Width

IMG_IMAGEN..Y++

END

LOOP 

IMG_IMAGEN..X--

IF IMG_IMAGEN..X<=0 THEN

BREAK

END

END

LOOP 

IMG_IMAGEN..Y--

IF IMG_IMAGEN..Y<=0 THEN

BREAK

END

END




------------------------------------

ANALISE -- A SER DESENVOLVIDA

VER NOME 
CLIENTE JOAO  EMP1  EMP2
     O CLIENTE, VAI TER NAS DUAS EMPRESAS 
 O PRODUTO , VAI TER NAS DUAS EMPRESA 
 O PEDIDO , SERA INDIVUAL POR EMPRESA 
ANALISE
EMPRESA
    ID_EMPRESA 
NOME_EMPRESA 
CLIENTE                       LIGAR O CLIENTE COM O PEDIDO , ELE VAI COLOCAR SOZINHO
    ID CLIENTE
NOME
EMAIL 
ENDERECO_RUA
ENDERECO_CIDADE
ENDERECO_UF 
    DATA_NASCIMENTO
PEDIDO                        LIGAR O PEDIDO COM ITENS 
    ID_PEDIDO
    ID_EMPRESA ( MANUAL ) 
      .. AUTOMATICO
    NUMERO_PEDIDO_EMPRESA 
    DATA_EMISSAO 
VALOR_TOTAL  -> AUTOMATICO  
OBSERVACAO 

PRODUTO 
    ID PRODUTO 
    NOME 
VALOR VENDA 

PEDIDO_ITENS 
ID_PEDIDOS_ITENS 
    .. AUTOMATIC O
    .. AUTOMATICO - TAMBEM ID PRODUTO 
QUANTIDADE
PRECO VENDA 
VALOR TOTAL 
----------------

condicoes:
in








 

quarta-feira, 15 de setembro de 2021

video 3412 - Curso Windev 2 - 10 - Privado - condicoes if switch - 15-09-2021

Aula 02 - 15/09/2021

https://youtu.be/UmPgwzmnYVU



Video REvisao If switch




Links Uteis :



--------------------------------------------------------

Exemplos fontes , na versao 26 e 21

Fonte da aula 02 - Condicoes - no repositorio Windev26

Fonte da aula 02 - Condicoes - no repositorio Windev21

---------------------------------------------------------

Aula 2 
Condicoes - If


Aula 7

1 CLEITON - BUFFERR.
2.. VARIAVEL DENTGO DO EVENTO
3... É OBRIGATORIO E MOTIVO GLOBAL 
4.. DIFERENCA INT, DECIMAL, REAL 
5. array Mais aulas
6. E mascaras, tipo Telefone, CEP, CNPJ, CPF?
    ( jquery )



=================

1. criar janela condicoes











// valor a > valor b 
IF EDT_Valor_a>EDT_Valor_b THEN
EDT_Resposta=EDT_Valor_a+" MAIOR QUE "+EDT_Valor_b
ELSE 
EDT_Resposta=EDT_Valor_a+" MENOR IGUAL QUE "+EDT_Valor_b
END






// else if 
// a = b ,senao a > b , senao menor igual 
IF EDT_Valor_a=EDT_Valor_b THEN
EDT_Resposta=EDT_Valor_a+" é igual "+EDT_Valor_b
ELSE IF EDT_Valor_a>EDT_Valor_b
EDT_Resposta=EDT_Valor_a+" MAIOR QUE "+EDT_Valor_b

ELSE
EDT_Resposta=EDT_Valor_a+" MENOR IGUAL QUE "+EDT_Valor_b

END




dAta is Date=EDT_Data
SWITCH dAta..Month
CASE 1 
EDT_Resposta="janeiro"
CASE 2 
EDT_Resposta="fevereiro"
CASE 3 
EDT_Resposta="marco"
CASE 4 
EDT_Resposta="abril"
CASE 5 
EDT_Resposta="maio"
CASE 6 
EDT_Resposta="junho"
CASE 7 
EDT_Resposta="julho"
CASE 8 
EDT_Resposta="agosto"
CASE 9 
EDT_Resposta="setembro"
CASE 10 
EDT_Resposta="outubro"
CASE 11 
EDT_Resposta="novembro"
CASE 12 
EDT_Resposta="dezembro"
OTHER CASE
EDT_Resposta=""
END






IF CBOX_apareceberbotaofechar=True THEN
BTN_Fechar..Visible=True 
ELSE
BTN_Fechar.Visible=False
END




SWITCH  RADIO_situacao
CASE 1 
Trace("pedido em aberto")
CASE 2 
Trace("fechado")
CASE 3 
Trace("faturado")
OTHER CASE
END

========================

VER NOME 
CLIENTE JOAO  EMP1  EMP2
     O CLIENTE, VAI TER NAS DUAS EMPRESAS 
O PRODUTO , VAI TER NAS DUAS EMPRESA 
O PEDIDO , SERA INDIVUAL POR EMPRESA 
ANALISE
EMPRESA
    ID_EMPRESA 
NOME_EMPRESA
CLIENTE                       LIGAR O CLIENTE COM O PEDIDO , ELE VAI COLOCAR SOZINHO
    ID CLIENTE
NOME
EMAIL 
ENDERECO_RUA
ENDERECO_CIDADE
ENDERECO_UF 
    DATA_NASCIMENTO
PEDIDO                        LIGAR O PEDIDO COM ITENS 
    ID_PEDIDO
    ID_EMPRESA ( MANUAL ) 
      .. AUTOMATICO
    NUMERO_PEDIDO_EMPRESA 
    DATA_EMISSAO
VALOR_TOTAL  -> AUTOMATICO  
OBSERVACAO 

PRODUTO 
    ID PRODUTO 
    NOME 
VALOR VENDA

PEDIDO_ITENS 
ID_PEDIDOS_ITENS 
    .. AUTOMATIC O
    .. AUTOMATICO - TAMBEM ID PRODUTO 
QUANTIDADE
PRECO VENDA 
VALOR TOTAL 
----------------

condicoes:
in


     











terça-feira, 14 de setembro de 2021

video 3411 - Curso Windev 1 - 10 - Privado - Variaveis - 14-09-2021

Aula 01 - 14/09/2021




https://youtu.be/joXSyiRj_pM



Aula Revisao 3413 - Variaveis Somente Alunos

https://youtu.be/cOiYaF-Rk3I




Assuntos Abordados :


====================================================================

Links Uteis :


                   
--------------------------------------------------------

Exemplos fontes , na versao 26 e 22



==============
ASSUNTOS QUE O AMARILDO, VAI VER NO DECORRER DO CURSO

1 CLEITON - BUFFERR.
2.. VARIAVEL DENTGO DO EVENTO
3... É OBRIGATORIO E MOTIVO GLOBAL 
4.. DIFERENCA INT, DECIMAL, REAL 
5. array Mais aulas
6. E mascaras, tipo Telefone, CEP, CNPJ, CPF?
    ( jquery )
----------------------------

CODIGOS DA AULA 001


// BTN VARIAVEL
// EXPLICANDO STRING CURRENCY
// EXPLICANDO TEXTO LONGO AUTOMATICO

cyVALOR_PAGAR is currency=EDT_VALOR_PAGAR
sVALOR_FORMATADO is string=NoSpace(NumToString(cyVALOR_PAGAR,"10,4fS"),sscAll)

sNOME is string=EDT_NOME
sTEXTO_LONGO_AUTOMATICO is string=[
RECEBE DE [%sNOME%]
O VALOR DE [%sVALOR_FORMATADO%] REAIS
OK
]

EDT_RESPOSTA=sTEXTO_LONGO_AUTOMATICO

=======================

// EXPLICANDO TEXTO LONGO MANUAL


sTEXTO_LONGO is string=[
RECEBE DE #sNOME#
O VALOR DE #sVALOR_FORMATADO# REAIS
OK
]

sTEXTO_LONGO=Replace(sTEXTO_LONGO,"#sNOME#",EDT_NOME)
sTEXTO_LONGO=Replace(sTEXTO_LONGO,"#sVALOR_FORMATADO#",EDT_VALOR_PAGAR)


EDT_RESPOSTA=sTEXTO_LONGO

=======================

// BTN VARIAVEL
// EXPLICANDO STRING CURRENCY
// EXPLICANDO TEXTO LONGO AUTOMATICO,MANUAL
// EXPLICANDO TEXTO LONGO COM XML

// EXPLICANCO XML STRING

sDIVISAO_NSU is string=[
<distNSU>
<ultNSU>[%EDT_ULTIMO_NSU%]</ultNSU>
</distNSU>
]
IF EDT_ULTIMO_NSU=0 OR EDT_ULTIMO_NSU="" THEN
sDIVISAO_NSU=""
END
sTEXTO_XML is string=[
<distDFeInt xmlns="http://www.portalfiscal.inf.br/nfe" versao="1.01">
<tpAmb>1</tpAmb>
<CNPJ>[%EDT_CNPJ%]</CNPJ>
[%sDIVISAO_NSU%]
</distDFeInt>
]

EDT_RESPOSTA=sTEXTO_XML
//fMakeDir()
fSaveText("c:\TEMP\XML.XML",EDT_RESPOSTA)
ShellExecute("c:\TEMP\XML.XML")

=======================

// BTN VARIAVEL
// EXPLICANDO STRING CURRENCY
// EXPLICANDO TEXTO LONGO AUTOMATICO,MANUAL
// EXPLICANDO TEXTO LONGO COM XML

// EXPLICANCO XML STRING

sDIVISAO_NSU is string=[
<distNSU>
<ultNSU>[%EDT_ULTIMO_NSU%]</ultNSU>
</distNSU>
]
IF EDT_ULTIMO_NSU=0 OR EDT_ULTIMO_NSU="" THEN
sDIVISAO_NSU=""
END
sTEXTO_XML is string=[
<distDFeInt xmlns="http://www.portalfiscal.inf.br/nfe" versao="1.01">
<tpAmb>1</tpAmb>
<CNPJ>[%EDT_CNPJ%]</CNPJ>
[%sDIVISAO_NSU%]
</distDFeInt>
]

EDT_RESPOSTA=sTEXTO_XML
//fMakeDir()
fSaveText("c:\TEMP\XML.XML",EDT_RESPOSTA)
ShellExecute("c:\TEMP\XML.XML")

=======================

// VARIAVEL BOOLEAN

bPROGRAMADOR is boolean=True
CBOX_PROGRAMADOR=bPROGRAMADOR
=======================

// OPERADORES

cyVALOR1 is currency=10
cyVALOR2 is currency=20
//SOMA
cyVALOR3 is currency=cyVALOR1+cyVALOR2
//ACRESCENTAR 1
cyVALOR3+=1
cyVALOR3++
cyVALOR3=cyVALOR3+1
//------DIMINUINDO
cyVALOR3-=1
cyVALOR3--
cyVALOR3=cyVALOR3-1
//------DIVIDINDO
cyVALOR3=cyVALOR3/10
//-MULTIPLICAR
cyVALOR3=cyVALOR3*4

=======================

// JUNTAR NOMES

sNOME is string="AMARILDO"
sSOBRENOME is string="DE MATOS"

EDT_RESPOSTA=sNOME+" "+sSOBRENOME

=======================

// PEGAR POSICAO , ESQUERDA,DIREITA , QUALQUER

sNOME is string="AMARILDO"
EDT_RESPOSTA+=Left(sNOME,3)+CR 
EDT_RESPOSTA+=Right(sNOME,3)+CR 
EDT_RESPOSTA+=sNOME[2 TO 3]


=======================

// VER SE CONTEM E PEGAR POSICAO

sNOME is string="AMARILDO DE MATOS"
nPosicao_final is int=Length(sNOME)

nPOSICAO is int=Position(sNOME,"DE")
EDT_RESPOSTA=nPOSICAO
EDT_RESPOSTA=sNOME[nPOSICAO TO nPosicao_final]

=======================

// VER SE CONTEM 

sNOME is string="AMARILDO DE MATOS"

IF Contains(sNOME,"MATOS")=True THEN
    Info("EXISTE")
ELSE
Info("NAO EXISTE")
 
END

=======================


// ARRAY

arrStringArray is array of strings 
arrInteiroarray is array of int 

Add(arrStringArray,"amarildo")
Add(arrStringArray,"cleiton")

Add(arrInteiroarray,2)
Add(arrInteiroarray,3)
Add(arrInteiroarray,5)

EDT_RESPOSTA=arrStringArray[1]+" "+arrStringArray[2]
EDT_RESPOSTA+=CR
EDT_RESPOSTA+=arrInteiroarray[1]+" "+arrInteiroarray[2]+" "+arrInteiroarray[3]



TEMA ESCURO





MUDAR AMBIENTE INGLES FRANCES 




TROCAR CODIGO INGLES PARA FRANCES OU AO CONTRARIO





aula 3410 - live ao vivo

v

Teste

Teste
teste