segunda-feira, 31 de maio de 2021

DICAS 3345 - WINDEV WEBDEV MOBILE - Como Fazer tela Mdi - Curso Mdi 2




https://youtu.be/VeBSVmXatSE






---------------- Indice Curso Mdi


Bom Dia Boa Tarde Boa Noite

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


Seja Membro do Canal


Esse Video vai estrear as 10:00 do dia 08/06/2021

DICAS 3345 - WINDEV WEBDEV MOBILE - Como Fazer tela Mdi - Curso Mdi 2


Fazer exemplo no pdf_windev_26_Amarildo 


ASSUNTOS

Vamos entrar no exemplo no pdf_windev_26_Amarildo 
Vamos entrar na janela menu 
Vamos entrar nas propriedades da janela 
    - Gui - Na largura coloquei 1086 e Altera 725 
Agora no Menu ribbon , botao direito , gui -  Largura 1084 e altuura 86
Agora no botao de cada menu , vamos entrar gui, e alterar largura para 60 e altura 52
Agora detalhe bem importante
botao direito description, Detailhs, Mdi parent 
Baixar para baixo para enquadrar a janela mdi 
Agora vamos entrar em cada janela, details, mdi child, e vamos marcar Indepdendt hfsql context 
Vamos agora entrar no menu, onde chama as telas 

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

//open(WIN_Pdf)
// vamos perguntar se a janela ainda nao esta aberta 

IF WinStatus(WIN_Pdf)=NotFound THEN
OpenChild(WIN_Pdf)
ELSE
Restore(WIN_Pdf)
END

















DICAS 3344 - WINDEV WEBDEV MOBILE - ArraySeek - FOR EACH- Consultar um array com varias colunas e ver seus dados - CURSO ARRAY 26





https://youtu.be/1xL6Q49gs6A


E:\_exemplos_windev_web_mob\windev_amarildo_aula\array_exemplo_windev_Amarildo

DICAS_3344_WINDEV_WEBDEV_MOBILE_ArraySeek_FOR_EACH_Consultar_um_array_com_varias_colunas_e_ver_seus_dados_CURSO_ARRAY_26

Bom Dia Boa Tarde Boa Noite

Mande um email pedido para receber todas notificaçoes dos videos 
email : amarildo.matos@gmail.com


Seja Membro do Canal

Esse Video vai estrear as 10:00 do dia 07/06/2021

DICAS 3344 - WINDEV WEBDEV MOBILE - ArraySeek - FOR EACH- Consultar um array com varias colunas e ver seus dados  - CURSO ARRAY 26


https://help.windev.com/en-US/?1510016
https://help.windev.com/?3075002&lang=en-US&productversion=xxF260100j

E:\_exemplos_windev_web_mob\windev_amarildo_aula\array_exemplo_windev_Amarildo

ASSUNTOS
ArraySeek - FOR EACH- Consultar um array com varias colunas e ver seus dados 
Vamos criar uma estrutura cliente , com codigo,nome e data 
Vamos criar um array em cima da estrutura 
Vamos preencher manualmente os dados 
Vamos crirar uma listBox para mostrar os dados do array 
Vamos criar uma data para procura 
Vamos fazer procura por ArraySeek
Vamos fazer procura por for each 
Vamos mostrar os dados 


--------------- Codigo

// Global declarations
STCliente_estrutura is Structure // Criando uma Estrutura - Chamada cliente
nCodigo is int
sNome is string   
dAta_Dia is Date  
END
gstCliente_dados is STCliente_estrutura  // cliente cliente dados e cliente array
garrCliente_array is array of STCliente_estrutura 
informa_dados()
// vamos limpar o listbox e preencher com os dados do array 
LIST_array.DeleteAll()
FOR EACH ELEMENT stLinha OF garrCliente_array
LIST_array.Add(stLinha.nCodigo+"|"+stLinha.sNome+"|"+stLinha.dAta_Dia)
END


INTERNAL PROCEDURE informa_dados()
gstCliente_dados.nCodigo = 1 // preenchendo dados - primeiro registro
gstCliente_dados.sNome = "Amarildo"
gstCliente_dados.dAta_Dia = Today()  
ArrayAdd(garrCliente_array,gstCliente_dados)
gstCliente_dados.nCodigo = 2 // preenchendo dados - segundo registro
gstCliente_dados.sNome = "Michele"
gstCliente_dados.dAta_Dia = Today()  
ArrayAdd(garrCliente_array,gstCliente_dados)
gstCliente_dados.nCodigo = 3 // preenchendo dados - terceiro registro
gstCliente_dados.sNome = "Matos"
gdAta_gera is Date=Today()
gdAta_gera.Day+=1
gstCliente_dados.dAta_Dia = gdAta_gera
ArrayAdd(garrCliente_array,gstCliente_dados)
END
END

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

// botao consulta array com arrayseek
dAta is Date=EDT_data_procura
nRetorno is int=ArraySeek(garrCliente_array,asLinear,"dAta_Dia",dAta)
IF nRetorno=-1 THEN
Info("nao encontrado")
ELSE 
gstCliente_dados=garrCliente_array[nRetorno]
Info(gstCliente_dados.nCodigo+CR+gstCliente_dados.sNome+CR+gstCliente_dados.dAta_Dia+CR)
END
--------
//  consulta array com for each 
dAta is Date=EDT_data_procura
FOR EACH ELEMENT stLinha OF garrCliente_array where stLinha.dAta_Dia=dAta 

    Info(stLinha.nCodigo+CR+stLinha.sNome+CR+stLinha.dAta_Dia)
END


------------------ INDICE DO CURSO DE ARRAY e ESTRUTURA


WinDev - Array - 001/... Adiciona/Classifica Ordem/Mostra
WinDev - Array - 002/... Quantas Ocorrencias Array
WinDev - Array - 003/... ArrayDeleteLine - Eliminha uma Linha do Array
WinDev - Array - 004/... ArrayToString - Leva Array Para String
WinDev - Array - 005/... Seek - Procura Por Valor
WinDev - Array - 006/... ArrayDeleteDuplicate - Elimina itens duplos
WinDev - Array - 007/... Delete - Elimina Uma Linha
WinDev - Array - 008/... DeleteAll - Limpa Array
WinDev - Array - 009/... SwapLine - Mover de Lugar
WinDev - Array - 010/... Sum - Somar Array
ARRAYREVERSE - ARRAY - 011/ ... AULA 1185 
ARRAY INICIO - ARRAY 012 / AULA 1229

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

Bom Dia Boa Tarde Boa Noite

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


Seja Membro do Canal


Esse Video vai estrear as 10:00 do dia 07/06/2021

DICAS 3344 - WINDEV WEBDEV MOBILE - ArraySeek - FOR EACH- Consultar um array com varias colunas e ver seus dados  - CURSO ARRAY 26




ASSUNTOS

ArraySeek - FOR EACH- Consultar um array com varias colunas e ver seus dados 
Vamos criar uma estrutura cliente , com codigo,nome e data 
Vamos criar um array em cima da estrutura 
Vamos preencher manualmente os dados 
Vamos crirar uma listBox para mostrar os dados do array 
Vamos criar uma data para procura 
Vamos fazer procura por ArraySeek
Vamos fazer procura por for each 
Vamos mostrar os dados 

------------------------ Codigo 


// Global declarations
cliente_estrutura is Structure  // Criando uma Estrutura - Chamada cliente
codigo is int
nome is string
data_dia is Date 
END
stCliente_dados is cliente_estrutura // cliente cliente dados e cliente array
cliente_array is array of cliente_estrutura
stCliente_dados.codigo = 1 // preenchendo dados - primeiro registro
stCliente_dados.nome = "amarildo"
stCliente_dados.data_dia = Today()
ArrayAdd(cliente_array,stCliente_dados)
stCliente_dados.codigo = 2 // preenchendo dados - segundo registro
stCliente_dados.nome = "joao"
stCliente_dados.data_dia = Today()
ArrayAdd(cliente_array,stCliente_dados)
stCliente_dados.codigo = 3 // preenchendo dados - segundo registro
stCliente_dados.nome = "jxxxxoao"
gdAta_gera is Date=Today()
gdAta_gera.Day+=1
stCliente_dados.data_dia = gdAta_gera
ArrayAdd(cliente_array,stCliente_dados)
LIST_conteudo_array.DeleteAll()
FOR EACH ELEMENT stLinha OF cliente_array
LIST_conteudo_array.Add(stLinha.codigo+"|"+stLinha.nome+"|"+stLinha.data_dia+"|")
END


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

// botao consulta array com arrayseek

data is Date = EDT_data_procura
retorno is int = ArraySeek(cliente_array,asLinear,"data_dia",data)
IF retorno=-1 THEN
Info("Nao encontrato")
ELSE
stCliente_dados=cliente_array[retorno]
Info(stCliente_dados.codigo+CR+stCliente_dados.nome+CR+stCliente_dados.data_dia+CR)
END


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

//  consulta array com for each 
data is Date = EDT_data_procura
FOR EACH ELEMENT stLinha OF cliente_array
IF stLinha.data_dia=data THEN
    Info(stLinha.codigo+CR+stLinha.nome+CR+stLinha.data_dia+CR)
    BREAK
    END     
END















sábado, 29 de maio de 2021

DICAS 3343 - WINDEV WEBDEV MOBILE - JSProperty - Remover historico dos campos via programação - Dica paulo Viana - CURSO WEBDEV 89






https://youtu.be/xfi-BCjwCSw



Bom Dia Boa Tarde Boa Noite

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


Seja Membro do Canal


Esse Video vai estrear as 10:00 do dia 04/06/2021

DICAS 3343 - WINDEV WEBDEV MOBILE - JSProperty - Remover historico dos campos via programação - Dica paulo Viana - CURSO WEBDEV 89



Fonte no repositorio, endereco abaixo




ASSUNTOS

JSProperty - Remover historico dos campos via programação - Dica paulo Viana


//limpar historicos  


//------------------------------------ Codigo

// global decalration of page_historico_Edicao_elimina (server)
// gsCampos is string=glo_campos_form(MyPage..Name)

gscampos is string=glo_campos_form(MyPage..Name)

//------------------------------------

// Load Page_Pagina_Normal (onload browser event)
//FOR EACH STRING sResultado IN gsCampos SEPARATED BY CR
// JSProperty(sResultado,"autocomplete") ="off"
//END

FOR EACH STRING sResultado IN gscampos SEPARATED BY CR 
Info(sResultado)
JSProperty(sResultado,"autocomplete")="off"
END
//----------------------------

// Global procedure server - nas Procedures serverprocedures globais
//PROCEDURE glo_campos_form(recebe_nome_pagina)
sRetorno is string
controles is string
i is 8-byte int = 1
scampo is string
controles = EnumControl(recebe_nome_pagina,i)
WHILE controles <> ""
IF {controles, indControl}..Type IN (typPager,typPopup,typTab,typCell,typCellPageLayout) THEN 
scampo=glo_campos_form(controles)
IF scampo <> "" THEN
IF sRetorno <> "" THEN
sRetorno+=CR
END
sRetorno+=scampo
END
ELSE
IF  {controles, indControl}..Type = typText THEN
IF sRetorno <> "" THEN
sRetorno+=CR
END
sRetorno+={controles}..Alias
END
END
i ++
controles = EnumControl(recebe_nome_pagina,i)
END
RESULT(sRetorno)

---------------- INDICE WEBDEV

DICAS 3067 -WEBDEV TUTORIAL 1-Licao 1.1-14-09-2020 11hrs-DESCUBRA WEBDEV
DICAS 3068 -WEBDEV TUTORIAL 1-Licao 1.2-14-09-2020 15hrs-Web development and WEBDEV - PARTE A
DICAS 3069 -WEBDEV TUTORIAL 3-Licao 1.2-14-09-2020 16hrs-Web development and WEBDEV - PARTE B


PlayList WebDev tutorial Amarildo Webdev
Playlist Windev Tutorial Amarildo Windev
PlayList Windev Mobile 
Amarildo
Donwloads Windev
Windev
WxSolucoes
Matos Informatica
Repositorio Windev
Inscricao Evento Pcsof
Site forum Google 
Video sobre 3 Mil Videos Windev 
Video sobre Alfaserver servidor 













sexta-feira, 28 de maio de 2021

DICAS 3342 - WINDEV WEBDEV MOBILE - Fazer um Relatorio com traço entre Cabecalho e final pagina - header e footer - Curso Relatorio 76



https://youtu.be/tuQvA7M2YU0



Bom Dia Boa Tarde Boa Noite

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



Seja Membro do Canal

Esse Video vai estrear as 10:00 do dia 03/06/2021

DICAS 3342 - WINDEV WEBDEV MOBILE - Fazer um Relatorio com traço entre Cabecalho e final pagina - header e footer  - Curso Relatorio 76

https://windevdesenvolvimento.blogspot.com/2021/05/dicas-3342-windev-webdev-mobile-fazer.html
https://repository.windev.com/

ASSUNTOS

Fazer um Relatorio com traço entre Cabecalho e final pagina - header e footer 
Primeiro vamos criar um relatorio , 
Vamos entrar no codigo da pagina e criar uma variavel global altura 
Vamos entrar em cada bloco e somar a altura 
Vamos fazer a linha do relatorio

----------- Codigo

//PROCEDURE MyReport()
// na procedure myreport - criar uma variavel altura

gn_altura is int=0

//------------- Em cada bloco somar a altura 

// after printing start of document 
gn_altura+=START_OF_DOCUMENT.Height

// after printing page_header
gn_altura+=PAGE_HEADER.Height

//after printing body
gn_altura+=BODY.Height

// after printing page_footer
gn_altura+=PAGE_FOOTER.Height

// closing rpt_cliente_rte

iLine(1,gn_altura,iPageWidth(),iPageHeight()-(END_OF_DOCUMENT..Height+10),1,Black)




=============== INDICE CURSO DE RELATORIOS

Blog - WinDev - Relatorio - 001/... Configura e Filtro
Blog - WinDev - Relatorio - 002/... IParameterReport
Blog - WinDev - Relatório - 003/... Marca D´Agua
Blog - WinDev - Relatorio - 004/... Layout 
Blog - WinDev - Relatorio - 005/... Campo Vertical - Angle 
Blog - WinDev - Relatorio - 006/... Como fazer quando sai duas paginas? 
Blog - WinDev - Relatorio - 007/... Imprimir Linha Multi Line
Blog - WinDev - Relatorio - 008/... Relatorio Valor Zero deixar Branco
Blog - WinDev - Relatorio - 009/... Relatorio Alinhar Texto 
Blog - WinDev - Relatorio - 010/... Colocar Totalizador
Blog - WinDev - Relatorio - 011/... Imprime Somente os Selecionados ou Todos da Tabela 
Blog - WinDev - Relatorio - 012/... Break e totalizadores de valores
Blog - WinDev - Relatorio - 013/... Retorno de Relatorio - Result 
Blog - WinDev - Relatorio - 014/... Zerar Totalizador  
Blog - WinDev - Relatorio - 015/... Relatorio - Totalmente Manual
Blog - WinDev - Relatorio - 016/... Linha Zebrada
Blog - WinDev - Relatorio - 017/... Posicoes do Relatorio Alterar
Blog - WinDev - Relatorio - 018/... Alterar Fonte
Blog - WinDev - Relatorio - 019/... Linha Acrescentar
Blog - WinDev - Relatorio - 020/... Relatorio - Gerar Pdf
Blog - WinDev - Relatorio - 021/... Filtro
Blog - WinDev - Relatorio - 022/... Pagina Inicial/Final - Data Hora
Blog - WinDev - Relatorio - 023/... Pular Página Break - IpageEnd()
Blog - WinDev - Relatorio - 024/... Imprimir Tabela com TablePrint
Blog - WinDev - Relatorio - 025/... Relatorio Mudar Orientação
Blog - WinDev - Relatorio - 026/... Mostrar impressoras/Selecionar e Imprimir
Blog - WinDev - Relatorio - 027/... IDestination - Destino do Relatorio
Blog - WinDev - Relatorio - 028/... Iprint - Relatorio Manual
Blog - WinDev - Relatorio - 029/... Dica Tabela e print
Blog - WinDev - Relatorio - 030/... Totalizadores
Blog - WinDev - Relatorio - 031/... Caption Mudar
Blog - WinDev - Relatorio - 032/... Intervalo Bancos
Blog - WinDev - Relatorio - 033/... Manual Linha - IHLine
Blog - WinDev - Relatorio - 034/... Borda - Iborder
Blog - WinDev - Relatorio - 035/... IPageNum
Blog - WinDev - Relatorio - 036/... Numero Com Espaco
Blog - WinDev - Relatorio - 037/... Fonte Seleciona - ISelectFont -
Blog - WinDev - Relatorio - 038/... Linha Mais de 2 - Mais informacoes no Campo
Blog - WinDev - Relatorio - 039/... Copias - IParameter - Icopies
Blog - WinDev - Relatorio - 040/... Pdf - Ler e Extrair Texto
Blog - WinDev - Relatorio - 041/... Imprimir Numero 000.001.500
Blog - WinDev - Relatorio - 042/... IListPrinter - Mostra Impressoras e Lista
Relatorio Inventario com Query - Relatorio 043/...
Relatorio - Sem Template - Dica Pedrosão - Relatorio - 044
Titulo Cabecalho - Alterar - WinDev - Relatorio - 045
Totais - Colocar Totais Abaixo ultima Linha Detalhe - WinDev - Relatorio - 046
Relatorio String Angulo 90% - WinDev - Relatorio - 047/...
Links Pagina e Email no Relatorio - WinDev - Relatorio - 048
PREVIEW TRADUZIR - WINDEV - RELATORIO - 049 - AULA 1211
TABELA E RELATORIO - COMO FAZER - RELATORIO 050 - AULA 1223
MANUAL - RELATORIO TOTALMENTE MANUAL - WINDEV RELATORIO 051 - AULA 1224
MEMORIA RELATORIO - AULA 1257 relatorio 052 tabela memoria
TOTAL BREAK - DICAS 1711 - PUBLICA - WINDEV RELATORIO 053 
GERAR PDF - DICAS 1889 - PUBLICA - WINDEV_23 - RELATORIO 54 - 
DICA 2150 - HANGOUT AO VIVO 10 06 2019 AS 19:00 - MOSTRAR CONSULTORIA COm joao sobre relatorios de como criar
DICAS 2151 WINDEV WEBDEV MOBILE RELATORIOS 59 CONSULTORIA JOAO 08062019
DICAS 2152 WINDEV WEBDEV MOBILE RELATORIOS 60 TOTAL RELATORIO
DICAS 2193 WINDEV WEBDEV MOBILE RELATORIO 61 IPREVIEW iMiniPreview
DICAS 2597 - WINDEV WEBDEV MOBILE - Relatorio 62 - Como eu Fiz Danf no Windev.
AO VIVO FACEBOOK - 2882 20:00 - 06/05/2020 - RELATORIOS COM TABELAS WINDEV
2885 RELATORIO SQL WINDEV TRASMITIDO FACEBOOK ERPAMARILDO
DICA 2912 PREVIEW PORTUGUES WINDEV

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


PlayList WebDev tutorial Amarildo Webdev
Playlist Windev Tutorial Amarildo Windev
PlayList Windev Mobile 
Amarildo
Donwloads Windev
Windev
WxSolucoes
Matos Informatica
Repositorio Windev
Inscricao Evento Pcsof
Site forum Google 
Video sobre 3 Mil Videos Windev 
Video sobre Alfaserver servidor 




















Teste

Teste
teste