PBSyntax - Mise en forme du code

[Le Soldat Inconnu]

ah oui, pas pensé au PNG

[Le Soldat Inconnu]

J'ai mis à jour le code, j'ai encore fait une petite correction sur les textes sous la formes 'C' pour indiquer un caractère au format numérique.

Et j'ai mis le code à jour dans les messages précédent ainsi qu'un lien avec le code et images. Donc voir 4 messages en arrière.

[Le Soldat Inconnu]

Encore une correction pour les textes écrits avec un @ tel que

Code : Tout sélectionner

@"texte"

J'en ai profité pour améliorer la mise à jour des fichiers de paramètres qui sont extrait de l'exe au premier lancement.

Disponible sur mon site :
http://www.lsi-dev.com/index.php?mod=do ... rid&id=163

[nico]

Excellent, adopté!

[Kwai chang caine]

Et j'ai mis le code à jour dans les messages précédent ainsi qu'un lien avec le code et images. Donc voir 4 messages en arrière.

Ca doit etre un bébé à toi ça

Code : Tout sélectionner

SetCurrentDirectory(ProgramFiledirectory())

A part ça le code tourne, merci

[Le Soldat Inconnu]

J'ai mis le code source à jour; Lien dans le premier message du sujet

[nico]

J'ai remarqué plusieurs choses:

file$ est transformé en file $

Lorsque dans le fichier, il manque des indentations, le programme nous le dit (très bien) et lance un décompte pour annuler l'action, mais lorqu'on veut fermer ton programme, il met une plombe à le faire, pourquoi?

[Le Soldat Inconnu]

Ah zut, pas pensé au Texte$, je l'utilise jamais. Et je zieute pour la fermeture.
Merci du retour

[Le Soldat Inconnu]

Peux tu essayer ?
ça doit être bon maintenant

[nico]

Pour le $ c'est bon

Par contre l'arrêt du décompte et la fermeture par ta croix rouge met 4 secondes (j'ai quand même un 8 coeurs)

Et si je clique sur la croix rouge de la fenêtre, ça plante!

[dayvid]

Moi je comprends pas, ça ne marche pas ?
j'ai surement zaper un truc

ça reste comme c'est, rien ne bouge !

Code : Tout sélectionner

            file$=OpenFileRequester("Sélectionnezunfichier","","Text(.txt)|*.txt|Allfiles(*.*)|*.*",0)
            If file$
            If ReadFile(0,file$)
            length=Lof(0)
            *MemoryID=AllocateMemory(length)
            If*MemoryID
            ReadData(0,*MemoryID,length)
            *Fichier.String=@*MemoryID
            Fichier$=*Fichier\s
            EndIf
            CloseFile(0)
            EndIf
            EndIf
            
            
            
            
            
            

[Le Soldat Inconnu]

@Nico :

Pour l'arrêt je ne pige pas. En fait, à la fin, j'attends l'arrêt d'un thread pour fermer.
Mais chez moi, j'ai pas de plantage.

Je reregarde

@Dayvid
Ca fonctionne très bien

[nico]

Ton programme ne fonctionne plus ???

[Le Soldat Inconnu]

Ha bon ?

Je ne trouve aucun bug pour l'arrêt du programme

Je remet la dernière version compilé, dès fois que j'ai fait une boulette dans la version du site

[nico]

J'ai re-téléchargé et le prog fonctionne de nouveau!

Autre erreur: #crlf$ transformée en #crlf $

Par contre, je ne comprend pas pourquoi, on est obligé d'attendre 4 seconde lorsqu'on ferme le prog (c'est vraiment ennuyeux!)