sábado, 10 de setembro de 2016

Curso WinDev - Arquivos - 017 - Arquivos - fListDirectory










video Youtube - Se gostou do Video Clique Aqui para Dar Um Joinha


Nessa aula vou mostrar como mostrar um diretorio

This lesson will show how to show a directory

Cette leçon va vous montrer comment afficher un répertoire
 


http://doc.windev.com/en-US/?3036062&name=fListDirectory
http://doc.pcsoft.fr/fr-FR/?3036062&name=flisterepertoire_fonction



WinDev - Arquivos - 001/... Lista Arquivos - fListFile
WinDev - Arquivos - 002/... Existe Diretório - Verificar Se Existe - fDirectoryExist
WinDev - Arquivos - 003/... Criar Diretorio - FmakeDir
WinDev - Arquivos - 004/... Extrair Dados Arquivos - Extrair Dados - Fextractpath
WinDev - Arquivos - 005/... Renomear Arquivos - FRename
WinDev - Arquivos - 006/... Existe Diretório - Verificar Se Existe - FDirExist
WinDev - Arquivos - 007/... Existe Arquivo - FFileExist
WinDev - Arquivos - 008/... Copiar Arquivos - FcopyFile - >
WinDev - Arquivos - 009/... Adicona Texto num arquivo - FAddText ( )
WinDev - Arquivos - 010/... Espaco Diretorio - FDirSize/ LengthtoString
WinDev - Arquivos - 011/... Informações hd - FDriveInfo -
WinDev - Arquivos - 012/... Elimina Arquivos - FDelete -
WinDev - Arquivos - 013/... Drive está Ok - FDriveReady -
WinDev - Arquivos - 014/... Imagen Procura - FImageSelect
WinDev - Arquivos - 015/... Abrir-Modificar-Gravar-Fechar fOpen/fReadLine/fClose/fSaveText
WinDev - Arquivos - 016/... Lista Discos - FListDisk
WinDev - Arquivos - 017/... Lista Diretorio - FListDirectory 

Menu Ordem Alfabética

WinDev - Arquivos - 015/... Abrir-Modificar-Gravar-Fechar fOpen/fReadLine/fClose/fSaveText
WinDev - Arquivos - 009/... Adicona Texto num arquivo - FAddText ( )
WinDev - Arquivos - 008/... Copiar Arquivos - FcopyFile - >
WinDev - Arquivos - 003/... Criar Diretorio - FmakeDir
WinDev - Arquivos - 013/... Drive está Ok - FDriveReady -
WinDev - Arquivos - 012/... Elimina Arquivos - FDelete -
WinDev - Arquivos - 010/... Espaco Diretorio - FDirSize/ LengthtoString
WinDev - Arquivos - 007/... Existe Arquivo - FFileExist
WinDev - Arquivos - 002/... Existe Diretório - Verificar Se Existe - fDirectoryExist
WinDev - Arquivos - 006/... Existe Diretório - Verificar Se Existe - FDirExist
WinDev - Arquivos - 004/... Extrair Dados Arquivos - Extrair Dados - Fextractpath
WinDev - Arquivos - 014/... Imagen Procura - FImageSelect
WinDev - Arquivos - 011/... Informações hd - FDriveInfo -
WinDev - Arquivos - 001/... Lista Arquivos - fListFile
WinDev - Arquivos - 017/... Lista Diretorio - FListDirectory  
WinDev - Arquivos - 016/... Lista Discos - FListDisk  
WinDev - Arquivos - 005/... Renomear Arquivos - FRename



_nome_diretorio, _lista_diretorios are strings
IF YesNo("Somente Diretorios") THEN
    _lista_diretorios=fListDirectory("D:\amarildo",frNotRecursive)
ELSE
    _lista_diretorios=fListDirectory("D:\amarildo")   
END
TableDeleteAll(TABLE_Diretorio)
FOR EACH STRING _nome_diretorio OF _lista_diretorios SEPARATED BY CR
    TableAdd(TABLE_Diretorio,_nome_diretorio)
END


//Frances
s_nome_diretorio_f, s_lista_diretorios_f are strings
IF YesNo("Somente Diretorios") THEN
    s_lista_diretorios_f=fListDirectory("D:\amarildo",frNotRecursive)
ELSE
    s_lista_diretorios_f=fListDirectory("D:\amarildo")   
END
TableDeleteAll(TABLE_Diretorio)
FOR EACH STRING s_nome_diretorio_f OF s_lista_diretorios_f SEPARATED BY CR
    TableAdd(TABLE_Diretorio,s_nome_diretorio_f)
END




























sexta-feira, 9 de setembro de 2016

Curso WinDev - Arquivos - 016 - Arquivos - FListDisk










Video Youtube - Se Gostou do Video Clique Aqui e De Joinha


Nessa aula vou mostrar como mostrar os discos instalados

This lesson will show how to display the disks installed

Cette leçon va vous montrer comment afficher les disques installés
 

http://doc.windev.com/en-US/?1000019913&name=flistdisk_function
http://doc.pcsoft.fr/fr-FR/?1000019913&name=flistedisque_fonction



WinDev - Arquivos - 001/... Lista Arquivos - fListFile
WinDev - Arquivos - 002/... Existe Diretório - Verificar Se Existe - fDirectoryExist
WinDev - Arquivos - 003/... Criar Diretorio - FmakeDir
WinDev - Arquivos - 004/... Extrair Dados Arquivos - Extrair Dados - Fextractpath
WinDev - Arquivos - 005/... Renomear Arquivos - FRename
WinDev - Arquivos - 006/... Existe Diretório - Verificar Se Existe - FDirExist
WinDev - Arquivos - 007/... Existe Arquivo - FFileExist
WinDev - Arquivos - 008/... Copiar Arquivos - FcopyFile - >
WinDev - Arquivos - 009/... Adicona Texto num arquivo - FAddText ( )
WinDev - Arquivos - 010/... Diretorio -Espaco - FDirSize/ LengthtoString
WinDev - Arquivos - 011/... Informações hd - FDriveInfo -
WinDev - Arquivos - 012/... Elimina Arquivos - FDelete -
WinDev - Arquivos - 013/... Drive está Ok - FDriveReady -
WinDev - Arquivos - 014/... Imagen Procura - FImageSelect
WinDev - Arquivos - 015/... Abrir-Modificar-Gravar-Fechar fOpen/fReadLine/fClose/fSaveText
WinDev - Arquivos - 016/... Lista Discos - FListDisk
WinDev - Arquivos - 017/... Lista Diretorio - FListDirectory  

Menu Ordem Alfabética

WinDev - Arquivos - 015/... Abrir-Modificar-Gravar-Fechar fOpen/fReadLine/fClose/fSaveText
WinDev - Arquivos - 009/... Adicona Texto num arquivo - FAddText ( )
WinDev - Arquivos - 008/... Copiar Arquivos - FcopyFile - >
WinDev - Arquivos - 003/... Criar Diretorio - FmakeDir
WinDev - Arquivos - 013/... Drive está Ok - FDriveReady -
WinDev - Arquivos - 012/... Elimina Arquivos - FDelete -
WinDev - Arquivos - 010/... Diretorio -Espaco - FDirSize/ LengthtoString
WinDev - Arquivos - 007/... Existe Arquivo - FFileExist
WinDev - Arquivos - 002/... Existe Diretório - Verificar Se Existe - fDirectoryExist
WinDev - Arquivos - 006/... Existe Diretório - Verificar Se Existe - FDirExist
WinDev - Arquivos - 004/... Extrair Dados Arquivos - Extrair Dados - Fextractpath
WinDev - Arquivos - 014/... Imagen Procura - FImageSelect
WinDev - Arquivos - 011/... Informações hd - FDriveInfo -
WinDev - Arquivos - 001/... Lista Arquivos - fListFile
WinDev - Arquivos - 017/... Lista Diretorio - FListDirectory  
WinDev - Arquivos - 016/... Lista Discos - FListDisk  
WinDev - Arquivos - 005/... Renomear Arquivos - FRename


sLista_discos is string=fListDisk()
ListDeleteAll(COMBO_discos)
ListAdd(COMBO_discos,sLista_discos)


//Frances
sLista_discos_f est chaîne=fListeDisque()
ListeSupprimeTout(COMBO_discos)
ListeAjoute(COMBO_discos,sLista_discos_f)



























http://doc.pcsoft.fr/fr-FR/?1000019913&name=flistedisque_fonction
Exemplo fListeDisque

//Frances
sLista_discos_f est chaîne=fListeDisque()
ListeSupprimeTout(COMBO_discos)
ListeAjoute(COMBO_discos,sLista_discos_f)

//Blog com Video e Exemplo
http://windevdesenvolvimento.blogspot.com.br/2016/09/curso-windev-arquivos-016-arquivos.html
https://www.youtube.com/watch?v=G6ulmcXwsN0



quinta-feira, 8 de setembro de 2016

Webinaire : Jeudi 8 Septembre 11h



Webinaire : Jeudi 8 Septembre 11h
Comment assurer l'intégrité d'une suite de transactions dans une base de données
Sur YouTube :
https://www.youtube.com/watch?v=1OkyMlcRbg8
... Ver mais

Dans cette session de 20 minutes, vous découvrirez comment valider l'intégrité d'une ligne ou d'un…
youtube.com

Curso WinDev - Arquivos - 015 - Arquivos - fOpen/fReadLine/fClose/fSaveText










Video Youtube - Se gostou Clique Aqui para dar Joinha

 


Nessa aula vou mostrar como abrir,modificar,gravar e Fechar Texto

In this lecture I will show how to open, modify, save and Close Text

Dans cette conférence, je vais vous montrer comment ouvrir, modifier, enregistrer et fermer Texte
 

http://doc.windev.com/en-US/?3036046&name=fSaveText
http://doc.pcsoft.fr/fr-FR/?3036046&name=fsauvetexte_fonction



WinDev - Arquivos - 001/... Listar Arquivos - de um Diretório e Mostrar Tabela
WinDev - Arquivos - 002/... Existe Diretório - Verificar Se Existe - fDirectoryExist
WinDev - Arquivos - 003/... Criar Diretorio - FmakeDir
WinDev - Arquivos - 004/... Extrair Dados Arquivos - Extrair Dados - Fextractpath
WinDev - Arquivos - 005/... Renomear Arquivos - FRename
WinDev - Arquivos - 006/... Existe Diretório - Verificar Se Existe - FDirExist
WinDev - Arquivos - 007/... Existe Arquivo - FFileExist
WinDev - Arquivos - 008/... Copiar Arquivos - FcopyFile - >
WinDev - Arquivos - 009/... Adicona Texto num arquivo - FAddText ( )
WinDev - Arquivos - 010/... Espaco Diretorio - FDirSize/ LengthtoString
WinDev - Arquivos - 011/... Informações hd - FDriveInfo -
WinDev - Arquivos - 012/... Elimina Arquivos - FDelete -
WinDev - Arquivos - 013/... Drive está Ok - FDriveReady -
WinDev - Arquivos - 014/... Imagen Procura - FImageSelect
WinDev - Arquivos - 015/... Abrir-Modificar-Gravar-Fechar fOpen/fReadLine/fClose/fSaveText
WinDev - Arquivos - 016/... Lista Discos - FListDisk   

Menu Ordem Alfabética

WinDev - Arquivos - 015/... Abrir-Modificar-Gravar-Fechar fOpen/fReadLine/fClose/fSaveText
WinDev - Arquivos - 009/... Adicona Texto num arquivo - FAddText ( )
WinDev - Arquivos - 008/... Copiar Arquivos - FcopyFile - >
WinDev - Arquivos - 003/... Criar Diretorio - FmakeDir
WinDev - Arquivos - 013/... Drive está Ok - FDriveReady -
WinDev - Arquivos - 012/... Elimina Arquivos - FDelete -
WinDev - Arquivos - 010/... Espaco Diretorio - FDirSize/ LengthtoString
WinDev - Arquivos - 007/... Existe Arquivo - FFileExist
WinDev - Arquivos - 002/... Existe Diretório - Verificar Se Existe - fDirectoryExist
WinDev - Arquivos - 006/... Existe Diretório - Verificar Se Existe - FDirExist
WinDev - Arquivos - 004/... Extrair Dados Arquivos - Extrair Dados - Fextractpath
WinDev - Arquivos - 014/... Imagen Procura - FImageSelect
WinDev - Arquivos - 011/... Informações hd - FDriveInfo -
WinDev - Arquivos - 001/... Listar Arquivos - de um Diretório e Mostrar Tabela
WinDev - Arquivos - 017/... Lista Diretorio - FListDirectory  
WinDev - Arquivos - 016/... Lista Discos - FListDisk  
WinDev - Arquivos - 005/... Renomear Arquivos - FRename


EDT_Text1=""
_arquivo is string="E:\ALEVA\TESTE\AMARILDO.TXT"
_arquivo_id is int=fOpen(_arquivo,foReadWrite)
IF _arquivo_id<>-1 THEN
    slinha is string=""
    LOOP
        slinha=fReadLine(_arquivo_id)
        IF slinha=EOT THEN
            BREAK
        ELSE
            EDT_Text1+=slinha+CR
        END       
    END
END
fClose(_arquivo_id)

//Frances
EDT_Text1=""
_arquivo_f est chaîne="E:\ALEVA\TESTE\AMARILDO.TXT"
_arquivo_id_f est entier=fOuvre(_arquivo,foLectureEcriture)
SI _arquivo_id_f<>-1 ALORS
    slinha est chaîne=""
    BOUCLE
        slinha=fLitLigne(_arquivo_id_f)
        SI slinha=EOT ALORS
            SORTIR
        SINON
            EDT_Text1+=slinha+RC
        FIN       
    FIN
FIN
fFerme(_arquivo_id_f)


//Salvar Arquivo

_arquivo is string="E:\ALEVA\TESTE\AMARILDO.TXT"
fSaveText(_arquivo,EDT_Text1)


//Frances
//Salvar Arquivo

_arquivo_f est chaîne="E:\ALEVA\TESTE\AMARILDO.TXT"
fSauveTexte(_arquivo_f,EDT_Text1)
































Teste

Teste
teste