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
» I Love You
par JL35 Hier à 16:25

» MARK_ON déclenche un événement ON_CLICK à la place de ...
par Jean Claude Mer 18 Oct 2017 - 18:08

» mise a jour calculatrice
par joeeee2017 Mer 18 Oct 2017 - 15:57

» [solved] 3D_LINE How to ?
par Jicehel Mer 18 Oct 2017 - 11:01

» Convertisseur de base 10 de 2 à 36
par gigi75 Mar 17 Oct 2017 - 18:49

» calculatrice avec touches movibles
par joeeee2017 Dim 15 Oct 2017 - 1:11

» CORTANA
par gigi75 Sam 14 Oct 2017 - 16:32

» Calculatrice
par Jean Claude Sam 14 Oct 2017 - 12:30

» Compilateur FBPano
par jean_debord Jeu 12 Oct 2017 - 9:53

» KGF_dll - nouvelles versions
par Klaus Mar 10 Oct 2017 - 18:49

» à propos de Panoramic_Editor [Résolu]
par Klaus Mar 10 Oct 2017 - 3:19

» Un petit "coucou" à tous les Panoramiciens !
par Jack Ven 6 Oct 2017 - 10:24

» Pourquoi le compilateur stagne
par mindstorm Mer 4 Oct 2017 - 20:38

» Panoramic ?
par Marc37 Mer 4 Oct 2017 - 0:39

» Premiers pas avec Arduino
par Marc37 Mer 4 Oct 2017 - 0:29

Navigation
 Portail
 Index
 Membres
 Profil
 FAQ
 Rechercher
Rechercher
 
 

Résultats par :
 
Rechercher Recherche avancée
Octobre 2017
LunMarMerJeuVenSamDim
      1
2345678
9101112131415
16171819202122
23242526272829
3031     
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 : 10074
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 : 5546
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 : 10074
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 : 51
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 : 10074
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 : 5546
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 : 466
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 : 5953
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 : 5546
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 : 7994
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 :: Vos sources, vos utilitaires à partager-
Sauter vers: