Minulla on pieni ohjelma, jossa voi vaihtaa esim. taustaväriä yms. Miten nuo asetukset saa pysymään kun ohjelmaa avataan seuraavan kerran?
Asetukset täytyy tallentaa jollakin tapaa koneelle. Windowsin rekisteri (https://www.ohjelmointiputka.net/koodivinkit/
'asetusmuuttujat Dim taustavari As Integer, toinenjuttu As String 'haetaan vanhat asetukset tiedostosta Open "asetukset.dat" For Binary As #1 Get #1, , taustavari Get #1, , toinenjuttu Close #1 'ilmoitetaan vanha taustaväri MsgBox "Taustaväri oli viime kerralla " & taustavari 'arvotaan uusi taustaväri taustavari = Int(Rnd * 10) + 1 'tallennetaan asetukset Open "asetukset.dat" For Binary As #1 Put #1, , taustavari Put #1, , toinenjuttu Close #1
Luulisin että tuo on aika hyvä, mutta taustaväri ei voi olla random koska sen voi itse valita listasta... Tosin koodi tuommoisenaan ei palauttanut minkäänlaista väriä =(
ps. en oikeen ymmärrä vb päälle vielä joten ehkä olen mokannut jossakin.
jaa mun pitää vissii lisätä tohon koodin joku väri vai? :P
Tallenna ne tiedot rekisteriin:
SaveSetting "Ohjelman nimi", "Osio", "Taustaväri", VariLista.Text
Ja sitten se luetaan näin:
Me.BackColor = GetSetting("Ohjelman nimi", "Osio", "Taustaväri")
Toivottavast toimii...
Ja sitten sen listan, jossa ne eri värivaihtoehdot sijaitsevan, ni sen nimi pitää olla VariLista. Kysy jos ongelmia...
Aihe on jo aika vanha, joten et voi enää vastata siihen.