writestring dans fichier comment insérer et non remplacer
Publié : ven. 16/sept./2005 7:14
voici un code qui lit un fichier ini
voici un bout du
Mame.ini
or lorsque j'execute mon code du coup ça modifie le fichier comme suit
vous voyez mon problème ?
quelqu'un a une idée ?
Code : Tout sélectionner
key.s="screen_aspect"
val.s="TESTDEREMPLACEMENT"
OpenFile(0,"MAME.ini")
While Eof(0) = 0 Or keyfound.s=key
l=Loc()
chaine$=ReadString()
keyfound.s=Trim(Mid(chaine$, 1, 24))
If keyfound=key
Debug "coucou"
FileSeek(l+24)
WriteString(val)
EndIf
Wend
CloseFile(0)
Mame.ini
Code : Tout sélectionner
ddraw 1
direct3d 0
hwstretch 1
# screen <NULL> (not set)
cleanstretch auto
resolution auto
refresh 0
scanlines 0
switchres 1
switchbpp 1
maximize 1
keepaspect 1
matchrefresh 0
syncrefresh 0
throttle 1
full_screen_brightness 0.000000
frames_to_run 0
effect none
screen_aspect 4:3
## Windows Direct3D 2D video options ###
zoom 2
d3dtexmanage 1
d3dfilter 1
d3dfeedback 0
d3dscan 100
d3deffectrotate 1
d3dprescale auto
Code : Tout sélectionner
effect none
screen_aspect TESTDEREMPLACEMENT
rect3D 2D video options ###
quelqu'un a une idée ?