APPLICATION SYSTÈME

tinux Messages postés 244 Date d'inscription mercredi 13 avril 2005 Statut Membre Dernière intervention 21 octobre 2013 - 4 nov. 2007 à 00:23
cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 - 6 nov. 2007 à 17:12

Cette discussion concerne un article du site. Pour la consulter dans son contexte d'origine, cliquez sur le lien ci-dessous.

https://codes-sources.commentcamarche.net/source/44597-application-systeme

cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 137
6 nov. 2007 à 17:12

A propos de la mise à jour que je viens de mettre :
Trier de A à Z , si vous voulez revenir à la position de départ ajouter au bouton "Clear"
Me.ListBoxKey.Sorted = False
Me.ListBoxSave.Sorted = False
J'avais complètement oublié.
Le Pivert

cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 137
4 nov. 2007 à 19:41

J'ai réussi à faire ce que m'a conseillé TINUX cela marche, mais j'ai un problème au niveau des Keys, il y en a qui marche avec: Dim t() As String = key.GetValueNames et d'autres avec
Dim t() As String = key.GetSubKeyNames, alors en plus si on me parle d'array j'en perd mon latin.
PS:j'ai réussi à enregistrer, donc à pouvoir comparer les fichiers.
Merci à tous pour votre aide qui m'est bien utile.

cs_yoman64 Messages postés 592 Date d'inscription samedi 19 janvier 2002 Statut Membre Dernière intervention 4 décembre 2008
4 nov. 2007 à 19:22

Salut, pourquoi proposé d'utilisé un listbox caché? un simple array ne serait-il pas plus approprié ? a moin que la listbox en question aie besoin d'etre visible a un moment ou a un autre..?

cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 137
4 nov. 2007 à 14:01

Je te remercie et je vais essayer de mettre en application tes conseils
PS: J'ai trouvé sur un site VB anglophone le code pour enregistrer les listBox.
@+

tinux Messages postés 244 Date d'inscription mercredi 13 avril 2005 Statut Membre Dernière intervention 21 octobre 2013
4 nov. 2007 à 13:40

0 J'oubliais de dire l'essentiel.. en fait en utilisant les ListBox, tu permets à l'utilisateur de rentrer ses propres "raccourcis" registre...

tinux Messages postés 244 Date d'inscription mercredi 13 avril 2005 Statut Membre Dernière intervention 21 octobre 2013
4 nov. 2007 à 13:38

Pour réduire un peu ton code et le simplifier un peu, à ta place, j'aurais crée 2 ListBox donc un caché.

Dans le premier, tu mets tous les "menus" (= ce qu'il y a sur tes boutons) et dans le deuxième, tu mets à la même position le nom de la clé..
Par exemple : App Paths dans le premier Listbox et "Software\Microsoft\Windows\CurrentVersion\App Paths" dans le caché, et ensuite tu aurais quelque chose du genre :

If ListeNomRegistry.SelectedIndex = -1 Then Exit Sub 'ListBox Menu
ADRESSE_REGISTRE = (ListeAdresseRegistry.Items.Item(ListeNomRegistry.SelectedIndex))

Ainsi ensuite tu n'aurais qu'une seule boucle :

Dim key As Microsoft.Win32.RegistryKey
key = Microsoft.Win32.Registry.LocalMachine.OpenSubKey(ADRESSE_REGISTRE, True)
Dim t() As String = key.GetSubKeyNames
Dim i As Integer
For i = 0 To t.Length - 1
If t(i) <> "" Then
Me.ListBox1.Items.Add(t(i))
End If
Next

Sinon, pourquoi utiliser un RichTextBox ? Un simple Textbox peut le faire avec gestion des Lignes...

cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 137
4 nov. 2007 à 08:25

C'est vrai le code est simpliste, pour ce qui est de la répétition, je suis débutant et cela dépasse mes acquis. Par contre je trouve l'idée séduisante si une personne pouvait me donner le code pour enregistrer la ListBox ou la copier dans la RichTextBox,car l'on pourrait comparer la sauvegarde et en cas de fichiers indésirables y remédier.
Merci pour ce commentaire positif.

tinux Messages postés 244 Date d'inscription mercredi 13 avril 2005 Statut Membre Dernière intervention 21 octobre 2013
4 nov. 2007 à 00:23

Salut !

Source pratique, même si au niveau de code, rien de transcendant.
Je pense aussi qu'on aurait plus simplifier légèrement, en évitant de créer une boucle à chaque fois.

Discussions similaires

Les systèmes réducteurs

Erreur du serveur dans l'application '/'

conception de systéme de géolocalisation de véhicule par balise gps

gestion de systeme de pointage dans une entreprise

Exemple d'une application web avec j2EE

Votre réponse

Discussions similaires