| View previous topic :: View next topic |
| Author |
Message |
Pepsiguy
I post too much
 Reputation: 0
Joined: 16 Aug 2007
Posts: 2016
|
 Posted: Thu Jan 17, 2008 3:21 pm Post subject: Never Mind Please Lock |
 |
|
Please Lock it was a mistake
_________________
Last edited by Pepsiguy on Thu Jan 17, 2008 6:20 pm; edited 1 time in total |
|
| Back to top |
|
 |
NINTENDO
Grandmaster Cheater Supreme
![]() Reputation: 0
Joined: 02 Nov 2007
Posts: 1371
|
| Posted: Thu Jan 17, 2008 3:38 pm Post subject: |
|
|
Hahaha!!!!
You guys allways make me laugh!
The timer will not save it's current value when you exit the program.
That means that u actually have to have the program open for 30 days without closing it before the button will get invisible.
And btw if you were to use that code of yours i would have recomended you to skip most parts or it :
| Code: | Private Sub Command1_Click()
form2.show
End Sub
|
| Code: |
Label1.caption = "You trial has finnished, thanks for trying the application! We wish for you own sake that you'll buy the full verison in the next 24 hours or else..."
Command1.Visible = False
|
_________________
Intel over amd yes. |
|
| Back to top |
|
|
stealthy17
Expert Cheater
 Reputation: 0
Joined: 10 Apr 2007
Posts: 144
Location: The Netherlands
|
| Posted: Thu Jan 17, 2008 4:03 pm Post subject: |
|
|
| That's pretty funny indeed...
|
|
| Back to top |
|
|
Trow
Grandmaster Cheater
 Reputation: 2
Joined: 17 Aug 2006
Posts: 957
|
|
| Back to top |
|
|
Pseudo Xero
I post too much
![]() Reputation: 0
Joined: 16 Feb 2007
Posts: 2607
|
| Posted: Thu Jan 17, 2008 5:54 pm Post subject: |
|
|
_________________
| haxory' wrote: | can't VB do anything??
windows is programmed using VB right? correct me if im wrong.
so all things in windows you have like the start menu is a windows form too. |
|
|
| Back to top |
|
|
Pepsiguy
I post too much
Reputation: 0
Joined: 16 Aug 2007
Posts: 2016
|
| Posted: Thu Jan 17, 2008 6:15 pm Post subject: |
|
|
| Naablet wrote: | Hahaha!!!!
You guys allways make me laugh!
The timer will not save it's current value when you exit the program.
|
Yes Yes i forgot
_________________
|
|
| Back to top |
|
|
Elec0
Expert Cheater
 Reputation: 0
Joined: 21 Nov 2007
Posts: 188
Location: Out of my mind, back in five minutes.
|
| Posted: Thu Jan 17, 2008 6:37 pm Post subject: |
|
|
If you want to make something like this, then you would probably have to write the time to a file, or do something like this:
| Code: |
Public TimeLeeft as Integer ' << The misspelling is on purpose.
public TimeTotal as integer
Private Sub Timer1_Timer() ' Or something like that, I'm writing this off the top of my head.
Static CTime ' <<Current Time
Timer1.interval = 60000 ' 1 min, could be more, could be less.
CTime = CTime + 1
call PutVar("C:\Windows\TL.dat", "TL", "CT", CTime) ' <<Not sure if this will work, but something like it.
if CTime = TimeTotal then
label2.visible = true
command1.enabled = false
label1.visible = false
end if
End Sub
Private Sub Form_load()
TimeTotal = "2592000"
End Sub
|
Something like that should work, I think.
~Elec0
_________________
Last edited by Elec0 on Thu Jan 17, 2008 7:32 pm; edited 1 time in total |
|
| Back to top |
|
|
HomerSexual
Grandmaster Cheater Supreme
 Reputation: 5
Joined: 03 Feb 2007
Posts: 1657
|
| Posted: Thu Jan 17, 2008 6:40 pm Post subject: |
|
|
elec thats not 1 min thats 10 seconds.
1 min is 60000
it goes by milliseconds, unless VB is different
_________________
|
|
| Back to top |
|
|
Elec0
Expert Cheater
Reputation: 0
Joined: 21 Nov 2007
Posts: 188
Location: Out of my mind, back in five minutes.
|
| Posted: Thu Jan 17, 2008 7:29 pm Post subject: |
|
|
Oops. Thanks, that's that I meant. 
_________________
|
|
| Back to top |
|
|
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
