WIDGETS GAMBAS
LOGICIELS GAMBAS 3
TUTORIELS
VISITES

   visiteurs

   visiteurs en ligne

Où ça, qui ça?
Accessoires - Indenteur
INDENTEUR DE FICHIERS

indenteur.png
Indenter est l'action d'ajouter une tabulation au début de chaque fonction pour faciliter la lisibilité du code. C'est une très bonne habitude à prendre.
Mais pour ceux qui ne l'on pas déjà fait, voici une contribution sympa qui indentera automatiquement votre code.

TELECHARGER LE FICHIER

nouvelle mise à jour au 01 mars 2010

TELECHARGER LE FICHIER

Date de création : 23/02/2010 @ 10:32
Dernière modification : 15/05/2011 @ 11:50
Catégorie : Accessoires
Page lue 2894 fois


Imprimer l'article Imprimer l'article


react.gifRéactions à cet article


Réaction n°3 

par Bernard le 01/03/2010 @ 22:17

Et  mes amitiés à toi aussi Taoteblues

Réaction n°2 

par Bernard le 01/03/2010 @ 19:00

Merci de tes conseils, j'en prends bonne note.
Je me suis aperçu qu'il y a une erreur d'indentation au niveau des 'ELSE', j'envoie une mise à jour à sphéris dès que je l'ai corrigé

Réaction n°1 

par taoteblues le 28/02/2010 @ 20:49

Merci pour ta participation.
J'adore ce type de programme.

Si je peux me permettre, j'ai deux petites remarques:
1) je faisais comme toi pour connaître le nom d'un dossier et d'un fichier mais il y a la formule magique : file,

  'reprendre dernier fichier
 ' i = RInStr(Settings["Fichiers/recent0"], "/")
 ' Dossier = Left$­(Settings["Fichiers/recent0"], i)
   Dossier = File.Dir(Settings["Fichiers/recent0"])
   Fichier = File.Name(Settings["Fichiers/recent0"])
   PRINT Dossier

2) J'ai ajouté dans mon settings la tabulation:

PRIVATE matab AS Integer

PUBLIC SUB Form_Open()
...
  matab = Settings["Tabulation", 2]
   SpinBox1.Value = matab
END

PUBLIC SUB Form_Close()
  ' on enregistre le dernier fichier
  IF FClass.Text <> "" THEN
  Settings["Fichiers/recent0"] = FClass.Text
  Settings["Tabulation"] = SpinBox1.Value
 
  ENDIF

Encore merci

Amitiés
taoteblues

ACCES RAPIDE
RECHERCHE




LOGICIELS GAMBAS 2
LES INSTRUCTIONS
LES COMPOSANTS
Divers

^ Haut ^