Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Kako da postavim neki counter na formu da mogu da je otvorim samo 10 puta?

[es] :: Visual Basic 6 :: Kako da postavim neki counter na formu da mogu da je otvorim samo 10 puta?

[ Pregleda: 4643 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

zeppelin
Cacak

Član broj: 33
Poruke: 49
*.ptt.yu



+2 Profil

icon Kako da postavim neki counter na formu da mogu da je otvorim samo 10 puta? 15.07.2002. u 16:13 - pre 265 meseci
kako da postavim counter na formu da mogu da je otvorim samo 10 puta?

[Ovu poruku je menjao jc denton dana 20.07.2002 u 12:13 AM GMT]
 
Odgovor na temu

Krsta
Krstić Dejan
Programer & Web Developer
Kruševac

Član broj: 2461
Poruke: 307
*.ptt.yu

Sajt: www.atec.rs


+15 Profil

icon Re: vb form15.07.2002. u 16:46 - pre 265 meseci
To ogranicenje moras preko nekog fajla u kome se
upisuje koliko je puta program otvoren. Pa kad
se program startuje proveri u tom fajlu koliko je puta startovan,
ako je deset puta, program se iskljucuje.
Mozes takodje koristiti i bazu, mada ako ti to treba za neku
demo verziju bolje je da snimas u fajl i da ga kriptujes.

Poz...
 
Odgovor na temu

gio1000
Italia

Član broj: 1159
Poruke: 122
*.98-62.inwind.it



Profil

icon Re: vb form16.07.2002. u 02:56 - pre 265 meseci
Mozes i pomocu Save i GetSettinga upisati u registar.
Stavi jedan TextBox (Text1) i kopiraj ovo:

Private Sub Form_Load()
'Trazi u registru setting nazvan "Count" i vrijednost upisuje u Text1
Text1.Text = GetSetting(App.Title, "Settings", "Count", Text1.Text)
'Na vrijednost dodaje +1 (Na startu u property Text1.Text upisi nulu)
Text1 = Text1 + 1
If Text1 > 9 Then
MsgBox "Ovo je deseti put da me otvaras!"
End If
End Sub

Private Sub Text1_Change()
'Na promjenu u Text1 zapisuje u registar novu vrijednost settinga "Count"
SaveSetting App.Title, "Settings", "Count", Text1.Text
End Sub
 
Odgovor na temu

[es] :: Visual Basic 6 :: Kako da postavim neki counter na formu da mogu da je otvorim samo 10 puta?

[ Pregleda: 4643 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.