Curso WinDev - Combox - 001 - Preencher Manualmente e Eliminar

---

---

---

Video

---

---

http://doc.windev.com/en-US/?3049004&name=ListAdd
http://doc.pcsoft.fr/fr-FR/?3049004&name=listeajoute_fonction

http://doc.windev.com/en-US/?3049013&name=listdeleteall_function
http://doc.pcsoft.fr/fr-FR/?3049013&name=listesupprimetout_fonction

http://doc.windev.com/en-US/?1013023&name=ComboBox_Control
http://doc.pcsoft.fr/fr-FR/?1013023&name=champ_combo

---

Nessa aula vou ensinar como preencher uma combox Manualmente
WinDev

---

ListDeleteAll(COMBO_meses)
ListAdd(COMBO_meses,"marco")
ListAdd(COMBO_meses,"janeiro")
ListAdd(COMBO_meses,"fevereiro")
ListAdd(COMBO_meses,"abril")
ListAdd(COMBO_meses,"maio")
ListAdd(COMBO_meses,"junho")
ListAdd(COMBO_meses,"julho")
ListAdd(COMBO_meses,"agosto")
ListAdd(COMBO_meses,"setembro")
ListAdd(COMBO_meses,"outubro")
ListAdd(COMBO_meses,"novembro")
ListAdd(COMBO_meses,"dezembro")

---

---

---

---

---

WinDev - Combox - 001/... Preencher Manualmente e Eliminar
WinDev - Combox - 002/... Selecionar Combox
WinDev - Combox - 003/... Combox Editavel
WinDev - Combox - 004/... Combox - Ordem/Sort
WinDev - Combox - 005/... Combox Glink
WinDev - Combox - 006/... Selecione Linha Automatico - custom row
WinDev - Combox - 007/... ComboOpen e ComboClose
Adiciona Combox Manualmente - Combox 008 AULA 1258

query e combox - DICAS 1856- PUBLICA - WINDEV_23 - CURSO combox 9 - 

DICAS 2065 - WINDEV WEBDEV MOBILE - COMBOX 10 - LISTDISPLAY

---

---

Curso WinDev - Tabela - 007 - Alterar Ordem das Colunas da Tabela Por Programação

---

Video

---

Nessa aula vou mostrar como alterar a ordem das colunas por Programação
WinDev

---

http://doc.pcsoft.fr/fr-FR/?3044085&name=hdesactivefiltre_fonction

http://doc.windev.com/en-US/?3044085&name=HDeactivateFilter

---

HDeactivateFilter(cliente)
SWITCH COMBO_ESCOLHA
    CASE 1
        TABLE_cliente..BrowsedItem = cliente.clienteID..Name
    CASE 2
        TABLE_cliente..BrowsedItem = cliente.nome..Name
    CASE 3
        TABLE_cliente..BrowsedItem = cliente.email..Name
    OTHER CASE       
END
TableDisplay(TABLE_cliente,taStart)

---

---

---

WinDev - Tabela - 001/... Ancorar Tabela e coluna
WinDev - Tabela - 002/... Esconder ou Mostrar Coluna Tabela 
WinDev - Tabela - 003/... Mudar Cor e Fundo da Coluna da Tabela 
WinDev - Tabela - 004/... Mudar Largura e Fonte da Coluna da Tabela 
WinDev - Tabela - 005/... Coluna de valor Deixar em Branco 
WinDev - Tabela - 006/... Alterar Nome,Cor,Cor de Fundo da Coluna da Tabela 
WinDev - Tabela - 007/... Alterar ordem das Colunas por Programacao
WinDev - Tabela - 008/... TableSeek Pesquizar se Existe
WinDev - Tabela - 009/... TableSelectPlus - Seleciona Iten tabela
WinDev - Tabela - 010/... TableSort - Classifica Coluna
WinDev - Tabela - 011/... Zoom

Curso WinDev - Excel - 002 - Ler Tabela e Exportar Para Excel

---

---

---

---

---

Video

---

Nessa Aula vou mostrar como pegar os dados de uma tabela e gravar no Excel
WinDev

http://doc.windev.com/en-US/?3074033&name=TableToExcel

http://doc.pcsoft.fr/fr-FR/?3074033&name=tableversexcel_fonction 

---

This lesson will show you how to take data from a table and write to Excel

---

Cette leçon va vous montrer comment prendre les données d'une table et écrire à Excel

---

s_path is string=CompleteDir(fExeDir())
// s_path=ComplèteRep(fRepExe()) // Em frances
TableToExcel(TABLE_pedido,s_path+"nome_excel.xls")
//TableVersExcel(TABLE_pedido,s_path+"nome_excel.xls") // em frances
ShellExecute(s_path+"nome_excel.xls")

---

---

---

WinDev - Excel - 001/... Ler Planilha Excel e Gravar Arquivo
WinDev - Excel - 002/... Ler Tabela e Exportar Para Excel 
WinDev - Excel - 003/... Criar Excel e Listar
GERAR UM ARQUIVO EXCEL - DICAS 1748 - PUBLICA - WINDEV EXCEL 004 - 

Curso WinDev - Excel - 001 - Ler Planilha Excel e Gravar Arquivo

---

---

---

---

Video

---

Nessa Aula hoje, Vou Mostrar como Ler uma Planilha Excel e Gravar na Tabela do Banco
WinDev

http://doc.windev.com/en-US/?3080011&name=xlsNbRow 

http://doc.pcsoft.fr/fr-FR/?3080011&name=xlsnbligne_fonction 

http://doc.windev.com/en-US/?3080017&name=xlsOpen 

http://doc.pcsoft.fr/fr-FR/?3080017&name=xlsouvre_fonction 

http://doc.windev.com/en-US/?3080021&name=xlsdata_function 

http://doc.pcsoft.fr/fr-FR/?3080021&name=xlsDonnee 

---

In this hall today, I will show how Read and write an Excel worksheet in Table Bank

---

Dans cette salle aujourd'hui, je vais vous montrer comment lire et écrire une feuille de calcul Excel dans le tableau de la Banque

---

PROCEDURE importa_excel_ler_grava()

n_abre_excel is int=xlsOpen(EDT_Excel)
n_numero_linhas is int=xlsNbRow(n_abre_excel)
n_contador is int=0
FOR n_contador = 2 TO n_numero_linhas
    HReset(nota_rps_servico)
    s_codigo_municipio is string=xlsData(n_abre_excel,n_contador,3)  
    s_codigo_grupo is string=xlsData(n_abre_excel,n_contador,4)   
       
    nota_rps_servico.codigo_municipio=s_codigo_municipio
       
    HAdd(nota_rps_servico)
    Trace(n_contador)       
END

TraceEnd()
Info("Final da Gravacao")
EDT_Excel=""
ReturnToCapture(EDT_Excel)

---

---

---

---

---

---

---

---

WinDev - Excel - 001/... Ler Planilha Excel e Gravar Arquivo
WinDev - Excel - 002/... Ler Tabela e Exportar Para Excel 
WinDev - Excel - 003/... Criar Excel e Listar
GERAR UM ARQUIVO EXCEL - DICAS 1748 - PUBLICA - WINDEV EXCEL 004 - 
INICIO - DICAS 1836- PUBLICA - WINDEV 23 -Spreadsheet_Excel 5

xlsOpen PARTE 1 - DICAS 1945 - PRIVADA - WINDEV - EXCEL 6 - 

xlsNbRow PARTE 2 - DICAS 1946 - PRIVADA - WINDEV - EXCEL 7 - 
xlsData PARTE 3 - DICAS 1947 - PRIVADA - WINDEV - EXCEL 8 - 

---

---

---

WinDev - Função para saber si o Ano é Bissexto ou não

---

---

---

Link Funcao

---

Procedure Bissexto(ano is int)
IF (Modulo(ano,4)=0 AND Modulo(ano,100)<>0) OR (Modulo(ano,400)=0) THEN
RESULT True
ELSE
RESULT False
END


//Ou Pode ser utilizado deste outro modo
Procedure Bissexto(ano is int)

d_data_verifica is Date
d_data_verifica = DateSys()//Data Atual do Sistema
d_data_verifica..Year = ano//Trocamos o ano pelo ano passado por parámetro
d_ultimo_dia_mes is Date
d_ultimo_dia_mes = LastDayOfMonth(d_data_verifica..Year,2) //Verifica ultima dia do Mes de Fevereiro
IF d_ultimo_dia_mes..Day = 28 THEN
RESULT False
ELSE
RESULT True
END

---

---

---

---