SQLite Explorer

Programmation d'applications complexes
Avatar de l’utilisateur
Fig
Messages : 1176
Inscription : jeu. 14/oct./2004 19:48

Re: SQLite Explorer

Message par Fig »

Beau boulot Falsam, merci de partager ton travail. :wink:
Il y a deux méthodes pour écrire des programmes sans erreurs. Mais il n’y a que la troisième qui marche.
Version de PB : 6.00LTS - 64 bits
Avatar de l’utilisateur
falsam
Messages : 7244
Inscription : dim. 22/août/2010 15:24
Localisation : IDF (Yvelines)
Contact :

Re: SQLite Explorer

Message par falsam »

Nouvelle version de SQLite Explorer.

■ Ajout de la visualisation d'une ligne de résultat en mode fiche.
- Sélectionner la ligne à visualiser et appuyer sur la touche Entrée.

■ Possibilité de lire des données échapées avec la fonction EscapeString()
- Cocher la case Use UnescapeString avant de lancer une requête SQL avec la touche F5

Mise à jour du code dans le premier message.
Configuration : Windows 11 Famille 64-bit - PB 6.03 x64 - AMD Ryzen 7 - 16 GO RAM
Vidéo NVIDIA GeForce GTX 1650 Ti - Résolution 1920x1080 - Mise à l'échelle 125%
Marc56
Messages : 2146
Inscription : sam. 08/févr./2014 15:19

Re: SQLite Explorer

Message par Marc56 »

J'aime bien ce petit outil rapide pour vérifier l'état des bases en cours de développements.
Mais je trouvais dommage de ne pas pouvoir ouvrir une base simplement glissant un fichier sur l'icône de raccourci ou sur l'EXE
Alors je propose ce petit ajout (après la ligne 130)

Code : Tout sélectionner

    If CountProgramParameters()
         Protected DataBase_Launch$ = ProgramParameter()
         If OpenDatabase(#DataBase, DataBase_Launch$, "","")
              SetGadgetText(#Database, DataBase_Launch$)
              DataBaseListTable()
         Else
              MessageRequester("Erreur", "Problème pour ouvrir la base de données: " + #CRLF$ + DataBase_Launch$)
         EndIf
    EndIf

;Evenements
Ce n'est peut-être pas le meilleur endroit. À toi de modifier.
:)
Répondre