une varibale / chaine de caractères du type chaine$
mon probleme est que quand je la réappelle pour y mettre un texte plus petit, elle garde une partie de son ancien texte
merci
effacer detruire reinitialiser
effacer detruire reinitialiser
je sais que c'est violent mais j'arrive pas a effacer detruire reinitialiser
une varibale / chaine de caractères du type chaine$
mon probleme est que quand je la réappelle pour y mettre un texte plus petit, elle garde une partie de son ancien texte
merci
une varibale / chaine de caractères du type chaine$
mon probleme est que quand je la réappelle pour y mettre un texte plus petit, elle garde une partie de son ancien texte
merci
-
Anonyme
Ceci marche très bien 
Code : Tout sélectionner
T$= "Tonton qu'est ce qui t'arrive?"
Debug T$
T$ = "Ch'ai pô..."
Debug T$yo bator!
en fait je fait cohabiter les gadgets et l assembleur.
en basic le blem est transparant et ne se pose pas...
la zone memoire contenant le text , n est pas remis a zero
par exemple si on fait une lecture direct de la memoire avec ton exemple apres le second texte, on a cela:
"Ch'ai pô... ce qui t'arrive?"
y a le bout du premier et le bout du second.
j aimerai vider totalement la zone memoire avec une fonction en basic .
j ai pensé avec la fonction "alocatememory ", mais je ne sais pas la mettre en oeuvre avec une chaine de caracteres.
en fait je fait cohabiter les gadgets et l assembleur.
en basic le blem est transparant et ne se pose pas...
la zone memoire contenant le text , n est pas remis a zero
par exemple si on fait une lecture direct de la memoire avec ton exemple apres le second texte, on a cela:
"Ch'ai pô... ce qui t'arrive?"
y a le bout du premier et le bout du second.
j aimerai vider totalement la zone memoire avec une fonction en basic .
j ai pensé avec la fonction "alocatememory ", mais je ne sais pas la mettre en oeuvre avec une chaine de caracteres.
-
Anonyme
Les commandes que tu utilises pour la mémoire, c'est de l'asm ?
sinon en basic :
Ca marche très bien, en fait je n'arrive pas à reproduire ton problème.
FreeMemory() efface une zone mémoire alloué avec AllocateMemory()
@++
sinon en basic :
Code : Tout sélectionner
*T = AllocateMemory(4*6)
PokeS(*T,"COUCOU")
Debug PeekS(*T,6)
FreeMemory(*T)
Debug PeekS(*T,6)
*T = AllocateMemory(4*13)
PokeS(*T,"TONTON TONTON")
Debug PeekS(*T,13)FreeMemory() efface une zone mémoire alloué avec AllocateMemory()
@++
Re: effacer detruire reinitialiser
Il me semble que PB utilise les fonctions Heap pour l'allocation mémoiretonton a écrit :je sais que c'est violent mais j'arrive pas a effacer detruire reinitialiser
une varibale / chaine de caractères du type chaine$
mon probleme est que quand je la réappelle pour y mettre un texte plus petit, elle garde une partie de son ancien texte
merci
Mais je me demande comment PB va supporter le fait que la taille ait changé car son ramasse miette libère les ressources à la fin est s'il tente de désallouer une taille incorrecte, je ne sait pas ce qu'il va se passer
La syntaxe asm de déclaration est la suivante pour les API, celle d'allocation, celle de libération et celle de réallocation etc
Code : Tout sélectionner
Extrn _HeapAlloc@12
Extrn _HeapCreate@12
Extrn _HeapDestroy@4
Extrn _HeapFree@12
Extrn _HeapReAlloc@16
Code : Tout sélectionner
!Extrn _HeapReAlloc@16
Tu te reportes à la doc MS ici
http://msdn.microsoft.com/library/defau ... ctions.asp
pour récupérer le hHeap, je n'ai pas trouvé dans le fichier sdk mais tu crée un asm depuis un fichier PB qui utilise une chaine et dans le listing tu dois trouver une variable contenant dans son nom le mot heap ou memory (reportes-toi à l'appel des fonction de chaîne dans le listing)
HeapReAlloc utilise 4 paramètres , le hHeap , les options de réallocation, le pointeur actuel sur la mémoire de la chaine lpMem et le dernier paramètre la taille en octets recherchée.
Pour appeler l'API, tu empiles les paramètres en commençant par le dernier pour finir par le heap. les 4 paramètres sont des mot de 32 bits
Code : Tout sélectionner
PUSH dwBytes
PUSH lpMem
PUSH dwFlags
PUSH hHeap
CALL _HeapReAlloc@16
D'après la doc, tous les paramètres sont des paramètres d'entrée, j'en déduis que eax contiendra le pointeur sur la nouvelle zone mémoire allouée
Il faudrait pouvoir modifier le pointeur de PB qui stocke l'ancienne adresse
Je pense qu'il serait bien que tu désalloues la mémoire toi-même car PB ne le fera pas du fait du changement de pointeur
@bator, ton exemple fonctionne, mais ne permet pas d allouer ou de mesurer une chaine de caracteres directement dans la memoire.
merci denis, tu es callé, mais je pressent le pantage, lol.
j ai trouvé une methode a la "Mc Gyver" , j alloue la zone memoire avec des "espace" (tres beaucoup d "espace"), et pout trouver la fin de la chaine , faut chercher le "0".
bon, je me comprent!!! c est mon style tordu
merci a vous
merci denis, tu es callé, mais je pressent le pantage, lol.
j ai trouvé une methode a la "Mc Gyver" , j alloue la zone memoire avec des "espace" (tres beaucoup d "espace"), et pout trouver la fin de la chaine , faut chercher le "0".
bon, je me comprent!!! c est mon style tordu
merci a vous
Et comme ça ?
Code : Tout sélectionner
chaine1$ = "chaine num 1"
chaine2$ = "chaine suivante"
;On récupère la taille exacte nécessaire à la chaîne...
LenghtOf=StringByteLength(chaine1$, #PB_Ascii)
*MemoryID = AllocateMemory(LenghtOf+1) ; Alloue un bloc mémoire de LenghtOf octets + 1 pour le caractère de fin de chaîne
If *MemoryID
PokeS(*MemoryID, chaine1$,#PB_Default, #PB_Ascii ) ; Ecriture d'une chaîne de caractères dans le bloc mémoire
EndIf
If CreateFile(0, "D:\Documents and Settings\Jacobus\Mes documents\TexteTest.txt") ; Création du fichier
WriteData(0, *MemoryID, SizeOf(Character)*LenghtOf); On écrit les caractères du bloc mémoire dans le fichier
CloseFile(0)
EndIf
FreeMemory(*MemoryID)
Debug "Ok chaine 1"
;On recommence pour la chaîne suivante
LenghtOf=StringByteLength(chaine2$, #PB_Ascii)
*MemoryID = AllocateMemory(LenghtOf+1)
If *MemoryID
PokeS(*MemoryID, chaine2$,#PB_Default, #PB_Ascii )
EndIf
If CreateFile(1, "D:\Documents and Settings\Jacobus\Mes documents\TexteTest.txt")
WriteData(1, *MemoryID, SizeOf(Character)*LenghtOf)
CloseFile(1)
EndIf
FreeMemory(*MemoryID)
Debug "Ok chaine 2"Quand tous les glands seront tombés, les feuilles dispersées, la vigueur retombée... Dans la morne solitude, ancré au coeur de ses racines, c'est de sa force maturité qu'il renaîtra en pleine magnificence...Jacobus.
heuu... 
en fait, pour simplifier,
lorsqu on ecrit un text dans une fenetre "GetGadgetText" le texte est placé dans un "bidule$", et la memoire alloué et celle de la taille du texte.
et mon souhait, est de choisir moi meme cette memoire alloué, quelque soit la longueur du texte.
faudrait une instruction du style "Alocatememory(bidule$,10000)
en fait, pour simplifier,
lorsqu on ecrit un text dans une fenetre "GetGadgetText" le texte est placé dans un "bidule$", et la memoire alloué et celle de la taille du texte.
et mon souhait, est de choisir moi meme cette memoire alloué, quelque soit la longueur du texte.
faudrait une instruction du style "Alocatememory(bidule$,10000)
Je ne sais pas comment tu structures ton programme mais dans mes librairies en asm, j'utilise souvent la pile pour stoker mes chaines de caractères.
Tu peux aussi créer directement une zone sur la pile avec des instructions du type
et ensuite dans tes procedures, tu déclares une variable locale, à la sortie de la procédure les infos de la pile sont "perdues"
tu récupères l'adresse de la variable, dans ce cas la taille est fixe mais dans bien des cas c'est largement suffisant
La pile n'est pas élastique (1 Mo il me semble pour le programme)
La variable peux aussi être globale et donc disponible partout.
Tu peux aussi définir des datas qui seront également accessibles en écriture, tu peux stocker dans le déroulement du programme ce que tu veux
Tu peux aussi créer directement une zone sur la pile avec des instructions du type
Code : Tout sélectionner
Structure MilleVingtQuatre_Octets
ANDmask.b[1024]
EndStructure
Code : Tout sélectionner
Protected ANDmask.MilleVingtQuatre_Octets
La pile n'est pas élastique (1 Mo il me semble pour le programme)
La variable peux aussi être globale et donc disponible partout.
Tu peux aussi définir des datas qui seront également accessibles en écriture, tu peux stocker dans le déroulement du programme ce que tu veux
Dans le cas ou la variable est protected, un long est réservé sur la pile, les 40000 espaces sont alloués avec les fonctions d'allocation de mémoire.tonton a écrit :Result1$= Space(40000)
lolololol
Le long recevra l'adresse de la zone mémoire allouée pour la chaine. En fin de procedure, PB désalloue automatiquement les 40000 espaces alloués.