FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC

Développement d'applications avec le langage Panoramic
 
AccueilAccueil  FAQFAQ  RechercherRechercher  S'enregistrerS'enregistrer  MembresMembres  GroupesGroupes  Connexion  
Derniers sujets
» Une autre façon de terminer une application.
par Francis-mr Aujourd'hui à 12:07

» Compilateur FBPano
par jean_debord Aujourd'hui à 10:09

» Copier / coller du texte à partir de la fenêtre de commandes
par jean_debord Aujourd'hui à 9:46

» COMPILATEUR V 0.9 beta 8 du 18 aout 2017
par papydall Aujourd'hui à 5:01

» Mettre en windows en veille
par papydall Aujourd'hui à 4:15

» Stretch_on ne stretch plus...
par papydall Hier à 15:22

» Pb 18 (en analyse): RESTORE_LABEL avec DATA à la fin
par Jack Hier à 13:21

» Problème de traitement des opérateurs avec le compilateur.
par Pedro Alvarez Sam 19 Aoû 2017 - 20:01

» Pb 17 (résolu): ITEM_SELECT ne fonctionne pas
par Jack Jeu 17 Aoû 2017 - 19:26

» un nouveau editeur panobasic
par Jean Claude Jeu 17 Aoû 2017 - 10:18

» Le compilateur.
par Pedro Alvarez Jeu 17 Aoû 2017 - 8:36

» Pb 16 (résolu): ON_CLOSE plante à l'exécution
par Jack Mer 16 Aoû 2017 - 20:00

» Pb 15 (résolu): TIMER_ON plante à l'exécution
par Jack Mer 16 Aoû 2017 - 19:58

» KGF_dll - nouvelles versions
par Yannick Dim 13 Aoû 2017 - 17:35

» probleme d'outil
par Yannick Dim 13 Aoû 2017 - 17:32

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Août 2017
LunMarMerJeuVenSamDim
 123456
78910111213
14151617181920
21222324252627
28293031   
CalendrierCalendrier

Partagez | 
 

 Liste des dossiers spéciaux de Windows

Voir le sujet précédent Voir le sujet suivant Aller en bas 
AuteurMessage
Klaus

avatar

Nombre de messages : 10062
Age : 68
Localisation : Ile de France
Date d'inscription : 29/12/2009

MessageSujet: Liste des dossiers spéciaux de Windows   Lun 6 Fév 2017 - 2:14

Pour ceux qui utilisent KGF.dll, voici un exemple exhaustif d'utilisation de GetWindowsFoldersPath pour afficher l'ensemble des dossiers spéciaux possibles:
Code:
' AfficherWindowsDossierSpeciaux.bas

label sel1, sel2

dim libelles$(60), dossiers$(60), i%, res%, chemin$, s$

full_space 0
list 1 : width 1,600 : height 1,700                : on_click 1,sel1
list 2 : width 2,600 : height 2,700 : left 2,610  : on_click 2,sel2


data "0 = Dossier Virtuel représentant le Bureau"
data "1 = Dossier Virtuel Internet"
data "2 = Dossier Programmes du Menu Démarrer"
data "3 = Dossier Virtuel contenant les icônes des applications du Panneau de Contrôle"
data "4 = Dossier Virtuel contenant les Imprimantes Installées"
data "5 = Dossier Mes Documents"
data "6 = Dossier Favoris"
data "7 = Dossier Démarrage dans le dossier Programmes du Menu Démarrer"
data "8 = Dossier Récent"
data "9 = Dossier SendTo"
data "10 = Dossier Virtuel contenant les fichiers de la Corbeille"
data "11 = Dossier Menu Démarrer"
data "12 = Dossier Virtuel contenant les fichiers du dossier Mes Documents"
data "13 = Dossier Mes Musiques"
data "14 = Dossier Mes Vidéos"
data "15 ="
data "16 = Dossier physique contenant les objets du Bureau"
data "17 = Dossier Virtuel My Computer"
data "18 = Dossier Virtuel Voisinage réseau"
data "19 = Dossier physique Nethood"
data "20 = Dossier Fonts"
data "21 = Dossier ShellNew"
data "22 = Dossier Menu Démarrer pour All Users"
data "23 = Dossier Programmes dans le menu Démarrer pour All Users"
data "24 = Dossier Démarrage dans le dossier Programmes du Menu Démarrer pour All Users"
data "25 = Dossier Physiques du Bureau pour All Users"
data "26 = Dossier Application Data"
data "27 = Dossier PrintHood"
data "28 = Dossier Application Data dans Local Settings pour le Current User"
data "29 = NT Only"
data "30 = NT Only"
data "31 = Dossier Favoris pour All Users"
data "32 = Dossier Temporary Internet Files"
data "33 = Dossier Cookies"
data "34 = Dossier Historiques"
data "35 = Dossier Physique Application Data pour All users"
data "36 = Répertoire windows"
data "37 = Répertoire System 32 de Windows"
data "38 = Dossier Program Files"
data "39 = Dossier physique de My Pictures pour Current Users"
data "40 = Dossier Physique du Current Users"
data "41 = x86 system directory on RISC systems"
data "42 = x86 Program Files folder on RISC systems"
data "43 = Dossier Common files de Program Files"
data "44 = x86 Program Files Common folder on RISC systems"
data "45 = Dossier Physique ShellNew pour AllUsers"
data "46 = Dossier Physique Documents pour AllUsers"
data "47 = Dossier Physique pour l'administrative tools"
data "48 = Dossier Start MenuPrograms Administrative Tools"
data "49 = Dossier Virtuel contenant les connections réseaux et dial-up"
data "50 ="
data "51 ="
data "52 ="
data "53 = Dossier physique My Music pour AllUsers"
data "54 = Dossier physique My Pictures pour AllUsers"
data "55 = Dossier physique My Video pour AllUsers"
data "56 = Dossier physique Ressources de Windows"
data "57 = Dossier physique Ressources Localisées de Windows"
data "58 ="
data "59 = Dossier CD Burning de Windows"
data "60 = Dossier Virtuel Work Group NetWork"

dll_on "KGF.dll"

for i%=0 to 60
  read s$
  libelles$(i%) = s$
  chemin$ = string$(255," ")
  res% = dll_call2("GetWindowsFoldersPath",i%,adr(chemin$))
  chemin$ = trim$(chemin$)
  dossiers$(i%) = chemin$
  item_add 1,s$
  item_add 2,str$(i%)+" = "+chemin$
next i%

end

sel1:
  i% = item_index(1)
  res% = dll_call2("SelectListBoxItem",handle(2),i%)
  s$ = item_read$(2,i%)
  clipboard_string_copy s$
  res% = dll_call3("SynchronizeListBoxes",0,handle(1),handle(2))
  return
 
sel2:
  i% = item_index(2)
  res% = dll_call2("SelectListBoxItem",handle(1),i%)
  s$ = item_read$(2,i%)
  clipboard_string_copy s$
  res% = dll_call3("SynchronizeListBoxes",0,handle(1),handle(2))
  return

Cliquez dans une liste ou dans l'autre - l'élément correspondant de la liste opposée sera sélectionné automatiquement, et le chemin résultant sera dans le presse-papier ! Les listes se synchronisent automatiquement, et en utilisant les flèches en haut ou en bas, elles défilent de façon synchrone !
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klauspanoramic.comxa.com/index.html
papydall

avatar

Nombre de messages : 5518
Age : 67
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: Liste des dossiers spéciaux de Windows   Lun 6 Fév 2017 - 5:34

Testé --- > OK

Voici ce que je propose.

Code:

hide 0
execute_wait "cmd /c set |clip"
message CLIPBOARD_STRING_PASTE$
terminate

Ce n'est pas la même chose, mais ... Bon, j'ai voulu simplement partager.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Klaus

avatar

Nombre de messages : 10062
Age : 68
Localisation : Ile de France
Date d'inscription : 29/12/2009

MessageSujet: Re: Liste des dossiers spéciaux de Windows   Lun 6 Fév 2017 - 11:23

Oui, c'est intéressant aussi. Cela donne tout l'environnement.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klauspanoramic.comxa.com/index.html
Laurent (Minibug)

avatar

Nombre de messages : 2353
Age : 50
Localisation : Vienne (86)
Date d'inscription : 10/02/2012

MessageSujet: Re: Liste des dossiers spéciaux de Windows   Lun 6 Fév 2017 - 23:37

Et pour localiser le dossier 'temp' vous avez une idée ?
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Klaus

avatar

Nombre de messages : 10062
Age : 68
Localisation : Ile de France
Date d'inscription : 29/12/2009

MessageSujet: Re: Liste des dossiers spéciaux de Windows   Lun 6 Fév 2017 - 23:44

Tu utilises
Code:
temp$ = string$(255," ")
res% = dll_call1("GetWindowsTempFolder",adr(temp$))
message "dossier temp = "+trim$(temp$) : ' et non pas tgrimp$ comme Papydall a noté...
Sympa, non ? (avec KGF.dll, bien sûr !)


Dernière édition par Klaus le Mar 7 Fév 2017 - 3:49, édité 1 fois
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://klauspanoramic.comxa.com/index.html
papydall

avatar

Nombre de messages : 5518
Age : 67
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: Liste des dossiers spéciaux de Windows   Mar 7 Fév 2017 - 3:38

@Klaus
Il me semble que tu as des gros doigts. Wink
message "dossier temp = "+trim$(temp$)
Et non ….+tgrim$...

Ma solution ultra simple:

Code:

execute_wait "cmd /c set t |clip"
message clipboard_string_paste$

Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
silverman

avatar

Nombre de messages : 464
Age : 45
Localisation : Picardie
Date d'inscription : 19/03/2015

MessageSujet: Re: Liste des dossiers spéciaux de Windows   Mar 7 Fév 2017 - 12:49

@minibug
sinon tu peux jeter un oeil ici
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
JL35



Nombre de messages : 5922
Localisation : 77
Date d'inscription : 29/11/2007

MessageSujet: Re: Liste des dossiers spéciaux de Windows   Mar 7 Fév 2017 - 14:58

Ça papydall c'est génial ! simple et efficace, comme j'aime !
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
papydall

avatar

Nombre de messages : 5518
Age : 67
Localisation : Moknine (Tunisie) Entre la chaise et le clavier
Date d'inscription : 03/03/2012

MessageSujet: Re: Liste des dossiers spéciaux de Windows   Mar 7 Fév 2017 - 17:38

Merci JL35.

CMD  qui permet de démarrer une nouvelle instance de l’interpréteur de commande Windows est une vraie mine pour ceux qui savent en tirer profit.
Revenir en haut Aller en bas
Voir le profil de l'utilisateur http://papydall-panoramic.forumarabia.com/
Yannick

avatar

Nombre de messages : 7975
Age : 46
Localisation : Bretagne
Date d'inscription : 15/02/2010

MessageSujet: re   Mar 7 Fév 2017 - 17:49

Où il faut avoir un mineur à porter de clavier...
Je te verrai bien avec un casque une lampe à bougie...
lol! lol! lol!
Revenir en haut Aller en bas
Voir le profil de l'utilisateur
Contenu sponsorisé




MessageSujet: Re: Liste des dossiers spéciaux de Windows   

Revenir en haut Aller en bas
 
Liste des dossiers spéciaux de Windows
Voir le sujet précédent Voir le sujet suivant Revenir en haut 
Page 1 sur 1
 Sujets similaires
-
» Liste des dossiers spéciaux de Windows
» [Résolu] Peut-on nettoyer sans risques le dossier Application Data ?
» [Résolu] WLM : utilisation des Dossiers stockés sur l'Ordinateur ?
» Petit Problème de Personalisation de Dossier sous Windows 7
» Slowin Killer : Optimisation de Windows

Permission de ce forum:Vous ne pouvez pas répondre aux sujets dans ce forum
FORUM DE DISCUSSION SUR LE LANGAGE PANORAMIC :: PANORAMIC 32 bits :: Vos sources, vos utilitaires à partager-
Sauter vers: