fil:
<pre>
open "fil" for append as #1 'append søger for at den automatisk skriver sidst i filen
print #1, "link"
close #1
</pre>
<pre>
talvariable =getsettings ("programanavn" ,"sektionsnavn","nøglenavn","indhold")
talvariable=talvariable+1
savesettings "programanavn" ,"sektionsnavn",talvariable,"indhold"
</pre>
for at hente oplysninger skal man ændre koden en smule
<pre>
open "fil" for input as #1
do while eof(1)=false 'søger for at den tjekker all linjer i filen
line input #1,variable
Combo1.AddItem (variable)
loop
close #1
</pre>
<pre>
talvariable =getsettings ("programanavn" ,"sektionsnavn","nøglenavn","indhold")
for teller=1 to talvariable
variable =getsettings ("programanavn" ,"sektionsnavn",talvariable,"indhold")
Combo1.AddItem (variable)
next
</pre>
nu kan du selv vælge de har vær deres fordele og uleper
f.eks.
fil skal du ikke hente antal for at gemme, til gengæld er det svært at slette en fortrukne side da den så skal hente dit og dat.
registeringsdatabase
der er det nemt at slette, men du skal hente talværdi både for at gemme og hente
-Thomas
[Redigeret d. 17/07-03 13:24:12 af Thomas Christensen] enten er jeg for dum ellers....
jeg har lavet en knap og sat det ind med filen og så har jeg lavet en list box og sat det ind med hent men det virker ikke hvad gør jeg galt?
--------------------------------------------------
[THIS IS A SIGNATURE VIRUS! PLEASE COPY IT INTO YOUR OWN SIGNATURE(S)]
--------------------------------------------------
min hp:
http://www.friserverplads.dk/technic117 [Redigeret d. 21/07-03 11:45:02 af smurf killer]