PureBasic

Forums PureBasic - Français
http://forums.purebasic.com/french/

MutanteKey 2

http://forums.purebasic.com/french/viewtopic.php?t=17780

Page 2 sur 3

Re: MutanteKey 2

Publié : mer. 14/août/2019 20:12
par Ar-S
:!: Avertir l'utilisateur lorsqu'il a oublié de mettre un MDP
- Arrête le Franglais :D

Re: MutanteKey 2

Publié : mer. 14/août/2019 20:31
par SPH
Ar-S a écrit ::!: Avertir l'utilisateur lorsqu'il a oublié de mettre un MDP
- Arrête le Franglais :D
:?: le franglais ?

A propos, savez-vous comment on change la largeur d'une colonne dans un ExplorerListGadget ?

thx 8)

Re: MutanteKey 2

Publié : mer. 14/août/2019 21:31
par Ar-S
Oui tu mets ton interface en français ou en anglais mais tu ne mélanges pas les deux.
pour la largeur je l'avais mais je n'arrives pas à remettre la main dessus. De toute façon c'est de l'API

Re: MutanteKey 2

Publié : mer. 14/août/2019 21:50
par SPH
Ar-S a écrit :De toute façon c'est de l'API
Il me la faut :idea:

Si quelqu'un a ca :!: 8)

Sinon, pour le franglais, j'ai aimé melanger :mrgreen:

Re: MutanteKey 2

Publié : mer. 14/août/2019 22:08
par Ollivier
Dans le doute, https://www.purebasic.fr/english/viewto ... 13&t=73381, pour supprimer une colonne d'un gadget et gérer le header (en-tête) car, qui supprime...

Re: MutanteKey 2

Publié : mer. 14/août/2019 22:09
par Ar-S

Code : Tout sélectionner

EnableExplicit

Procedure SetColWidth(Gadget,ColNum,Size)
  ; Ar-S
  SendMessage_(GadgetID(Gadget),#LVM_SETCOLUMNWIDTH,ColNum,Size)
EndProcedure


If OpenWindow(0,0,0,500,250,"Fenêtre ",#PB_Window_SystemMenu|#PB_Window_ScreenCentered)
  
  ExplorerListGadget(1,10,10,480,230,"C:\",0)
  
  SetColWidth(1,0,50)   ; 1ere colonne (la 0) à 50 de large
  SetColWidth(1,1,300)  ; 2eme colonne (la 1) à 300 de large
  
Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf

Re: MutanteKey 2

Publié : mer. 14/août/2019 22:39
par SPH
Ar-S a écrit :

Code : Tout sélectionner

EnableExplicit

Procedure SetColWidth(Gadget,ColNum,Size)
  ; Ar-S
  SendMessage_(GadgetID(Gadget),#LVM_SETCOLUMNWIDTH,ColNum,Size)
EndProcedure


If OpenWindow(0,0,0,500,250,"Fenêtre ",#PB_Window_SystemMenu|#PB_Window_ScreenCentered)
  
  ExplorerListGadget(1,10,10,480,230,"C:\",0)
  
  SetColWidth(1,0,50)   ; 1ere colonne (la 0) à 50 de large
  SetColWidth(1,1,300)  ; 2eme colonne (la 1) à 300 de large
  
Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow
EndIf
Je quote car je ne veux pas que qqun l'efface. Grand merci :!: :wink:

Re: MutanteKey 2

Publié : jeu. 15/août/2019 1:14
par Ollivier
Pour savoir et modifier la largeur d'une colonne, il y a une solution native :

Code : Tout sélectionner

GetGadgetItemAttribute()
SetGadgetItemAttribute()
Syntaxe :

Code : Tout sélectionner

Valeur = GetGadgetItemAttribute(Gadget, 0, #PB_Explorer_ColumnWidth, Colonne)
SetGadgetItemAttribute(Gadget, 0, #PB_Explorer_ColumnWidth, Valeur, Colonne)
Mais, perso, je n'avais bêtement pas fait le lien entre camoufler une colonne et modifier sa largeur. La modif étant aussi manuelle, je n'ai jamais utilisé cette option.

@ArS

Merci pour la méga-simplification. En fait, dans le sujet anglais, ils discutent aussi de "Comment faire une fois que les colonnes sont cachées ?", problème persistant, qu'il y ait API ou pas. Bref, ils se sont étalés sur des problèmes que, peut-être SPH ne rencontre pas.

Re: MutanteKey 2

Publié : jeu. 15/août/2019 7:15
par SPH
VOILA : Version beta 4 (finale)

Je n'ai trouvé aucun bug dans cette beta. Aussi, je vous la laisse tester et s'il n'y a pas de reclamations je la passerais en V1.0


:idea: GRAND merci à Marc56, falsam, Ar-S et KCC (pour son test) :idea:

Re: MutanteKey 2

Publié : jeu. 15/août/2019 7:25
par Ar-S
Ollivier a écrit :

Code : Tout sélectionner

GetGadgetItemAttribute()/SetGadgetItemAttribute() #PB_Explorer_ColumnWidth
J'ai pourtant recherché hier soir avant de poser l'API :D je suis passé à coté. Merci pour ce rafraichissement.

Re: MutanteKey 2

Publié : lun. 19/août/2019 18:51
par SPH
Kwai chang caine a écrit :Marche bien ici W10 X64 / v5.70 X86 :D

1/ Ce qui serait cool c'est de rajouter un champ avec le chemin entier du dossier ou est le fichier à crypter

2/ Tu devrais contrôler que le chemin que l'on rentre dans le champs "Crypter/Décrypter ici" se termine avec un antislash et au besoin en rajouter un, car si on en met pas...bah ça marche pas correctement :|

3/ Il manque l'icone dans le zip

4/ Ce serait bien si on pouvait réduire la fenêtre principale dans la barre des taches
La totalité de ce que tu as dis sera fait (par contre, bye bye le drag&drop) :idea:

Re: MutanteKey 2

Publié : lun. 19/août/2019 20:02
par Kwai chang caine
Je te remercie SPH 8)
En fait j'ai été surpris de voir que je n'étais pas le seul à utiliser le presse-papier pour accéder aux longues arborescences 8O
Faut dire que comme j'aime bien retrouver rapidement, je structure vachement mes données
Exemple :

Code : Tout sélectionner

C:\Kcc\Informatique\Applications\Donnees\Images\Gif\Animes\Femmes\
Et ça c'est dans les plus courts :mrgreen:

Donc chaque fichier est dans whatmilles dossiers imbriqués, mais c'est le panard pour retrouver, je ne perds jamais un fichier si il a été rangé correctement auparavant
Et c'est pas dur pour les retrouver rapidement car je fait un raccourcis, et aussi un programme qui m'ouvre le dossier ou est le fichier recherché.
Une fois ce dossier ouvert, je copie le chemin de l'explorateur et le colle dans le champs du logiciel qui doit le traiter (quasi tous les giciels ont un champs comme ça, ou alors dans le sélecteur de dossier il y a parfois ce champs)

Le seul hic de cette méthode c'est la longueur des chemins que windows a du mal à gérer :|
Donc une idée m'est venue, c'est de ne mettre qu'une lettre par catégorie :idea:
L'équivalent du chemin du dessus donne par exemple (Cet exemple est bidon)

Code : Tout sélectionner

C:\A\B\A\C\L\I\A\D\
Et depuis je me tripote car j'ai plus les problème de longueur, donc le beurre et l'argent du beurre, la seule chose c'est qu'il a fallu que je retienne la correspondance de chaque lettre

Re: MutanteKey 2

Publié : mar. 20/août/2019 7:48
par Micoute
Bonjour KCC,

pourquoi, ne fais-tu pas un programme qui fabrique des acronymes ?

Exemple : Acronyme("Fédération Lamentable des Imbéciles en Casquette") donne FLIC, car le programme ne prend que la première lettre majuscule de chaque mot.

Re: MutanteKey 2

Publié : mar. 20/août/2019 15:40
par venom
Micoute a écrit :Bonjour KCC,

pourquoi, ne fais-tu pas un programme qui fabrique des acronymes ?

Exemple : Acronyme("Fédération Lamentable des Imbéciles en Casquette") donne FLIC, car le programme ne prend que la première lettre majuscule de chaque mot.

Code : Tout sélectionner

Texte$ = "Bonjour micoute voici un exemple"
Resultat = CountString(Texte$, " ")

Debug Texte$ 
Debug "---"
For k=1 To Resultat+1
 Debug UCase(Left(StringField(Texte$, k, " "), 1))
Next
:lol:
Pour Micoute et KCC






@++

Re: MutanteKey 2

Publié : mar. 20/août/2019 17:31
par SPH
Voila, la beta 7 est sortie :P

(1er post) :wink:
Fuseau horaire sur UTC+01:00
Page 2 sur 3

Développé par phpBB® Forum Software © phpBB Limited

Traduction française officielle © Qiaeru