Gestion des fichiers

Description

Un dialog que j'ai fait en 10 Minutes, il sert a faire une gestion de fichier:
- Créer
- Charger
- Décharger
- Supprimer
- Ouvrir des fichiers

Si vous avez des idées ou des améliorations
contactez moi (allan_321@msn.com)
A ma connaissance il ny a pas de bug dans ma source
si il y en a faite moi le savoir

(Modifier et améliorer, j'ai mit une zone de text ou sa explique sa ke sa fé.)

Il y a pas encore d'amélioration visuel

Le zip à été modifier

Source / Exemple :


;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;|
;;;.______________________.;;;|
;;;|;Gestion des Fichiers;|;;;|
;;;|;;;;;;By Allan;;;;;;;;|;;;|
;;;|;;;;;;;;;;;;;;;;;;;;;;|;;;|
;;;|;;;;;;;;;;;;;;;;;;;;;;|;;;;;;|
;;;;;;;Bonne;;;;;;;;;;|;;;;;;;|
;;;;Utilisation;;;;;;;|;;;;/
;;;^______________________^;;;/
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;'

alias gf { dialog -m GF GF }
dialog GF {
  title "Gestion des fichiers By [Allan]"
  size -1 -1 120 88
  option dbu
  tab "&Charger", 1, 8 22 83 47
  edit "", 2, 12 47 50 10, tab 1
  text ".", 3, 63 50 3 8, tab 1
  edit "", 4, 66 47 15 10, tab 1
  button "Charger", 5, 13 59 69 8, tab 1
  text "Entrer le nom du fichier:", 6, 13 39 65 8, tab 1
  tab "&Décharger", 7
  text "Entrer le nom du fichier:", 8, 13 39 65 8, tab 7
  edit "", 9, 12 47 50 10, tab 7
  text ".", 10, 63 50 3 8, tab 7
  edit "", 11, 66 47 15 10, tab 7
  button "Décharger", 12, 13 59 69 8, tab 7
  tab "&Supprimer", 13
  text "Entrer le nom du fichier:", 14, 13 39 65 8, tab 13
  edit "", 15, 12 47 50 10, tab 13
  text ".", 16, 63 50 3 8, tab 13
  edit "", 17, 66 47 15 10, tab 13
  button "Supprimer", 18, 13 59 69 8, tab 13
  tab "&Crée", 19
  text "Entrer le nom du fichier:", 20, 13 39 65 8, tab 19
  edit "", 21, 12 47 50 10, tab 19
  text ".", 22, 63 50 3 8, tab 19
  edit "", 23, 66 47 15 10, tab 19
  button "Crée", 24, 13 59 69 8, tab 19
  tab "&Ouvrir", 25
  text "Entrer le nom du fichier:", 26, 13 39 65 8, tab 25
  edit "", 27, 12 47 50 10, tab 25
  text ".", 28, 63 50 3 8, tab 25
  edit "", 29, 66 47 15 10, tab 25
  button "Ouvrir", 30, 13 59 69 8, tab 25
  text "By Allan", 31, 95 68 20 8
  button "&Fermer", 32, -2 78 125 12, flat ok cancel
  button "Ouvrir le dossier du mIRC", 33, 8 12 84 10
  edit "", 34, 5 0 107 10, read
}
on *:dialog:GF:sclick:*: {
  if $did == 5 { did -r GF 34 | load -rs $did(2) $+ . $+ $did(4) | did -a GF 34 Le fichier " $+ $did(2) $+ . $+ $did(4) $+ " a été charger. }
  if $did == 12 { did -r GF 34 | unload -rs $did(9) $+ . $+ $did(11) | did -a GF 34 Le fichier " $+ $did(9) $+ . $+ $did(11) $+ " a été décharger. }
  if $did == 18 { did -r GF 34 | remove $did(15) $+ . $+ $did(17) | did -a GF 34 Le fichier " $+ $did(15) $+ . $+ $did(17) $+ " a été supprimer. }
  if $did == 24 { did -r GF 34 | write $did(21) $+ . $+ $did(23) | did -a GF 34 Le fichier " $+ $did(21) $+ . $+ $did(23) $+ " a été crée. }
  if $did == 30 { did -r GF 34 | run $did(27) $+ . $+ $did(29) | did -a GF 34 Le fichier " $+ $did(27) $+ . $+ $did(29) $+ " a été ouvert. }
  if $did == 33 { did -r GF 34 | run $mircdir | did -a GF 34 Le dossier du mIRC a été ouvert }
}
on *:LOAD:{
  echo -a M14erci d'avoir télécharger mon addon.
  echo -a S14i vous constatez des bugs écrivez moi12 (allan_321@msn.com).
  echo -a P14our l'ouvrir tapez: /GF
  echo -a G14estion des fichiers by 6Allan.
}

Conclusion :


On peux aussi le télécharger dans le zip.

Codes Sources

A voir également