Jump to content


Photo

Criar Contador...


  • Faça o login para participar
1 reply to this topic

#1 siola

siola

    Usuário

  • Usuários
  • 894 posts
  • Sexo:Masculino
  • Localidade:SBC - SP
  • Interesses:ASP, .NET, javascript

Posted 03/07/2003, 02:29

Ae eu tava querendo saber como eu faço pra criar um exe q quando fosse aberto um relogio comecava a rodar...ai quando fechado..ele para...equando aberto denovo ele continue do ponto q parou da ultima vez..

ou seja..hehe:

Aberto:
00 segundos

Fechou:
1100 segundos

ABriu denovo:
1100 segundos



deu pra entender?

#2 RodrigoBytes

RodrigoBytes

    Turista

  • Usuários
  • 31 posts
  • Sexo:Não informado

Posted 10/08/2003, 20:13

Caro O_Chacal,
Existem muitas maneiras de guarda valores, mostraria o mais conveniente a situação no caso usando o registro do windows.
Material:
1 timer nomeado como tmrtimer
1 label nomeado como lblcont

segue o codigo abaixo:

Dim cont As Double
Private Sub Form_Load()
'aki pegamos o valor da variavel cont amarzenda no registro caso não tenhe este registro ele pega 0
cont = GetSetting(App.Title, "Contador", "parou", "0")
MsgBox ("iniciando em: " & cont)
End Sub

Private Sub tmttimer_Timer()
cont = cont + 1
lblcont.Caption = cont
End Sub

Private Sub Form_Unload(Cancel As Integer)
'salvamos no registro o valor do contador
SaveSetting App.Title, "Contador", "parou", CStr(cont)
MsgBox ("Parou em: " & cont)
End Sub

Enviei um codigo exemplo que eu fiz
qualquer coisa tamos ai!

Espero ter ajudado
Rodrigo

Attached Files


Legião Urbana Omnia Vincit

"Só existe uma maneira de deter um hacker, é pensando como ele"

Rodrigo Bytes® - Segurança da informação




1 user(s) are reading this topic

0 membro(s), 1 visitante(s) e 0 membros anônimo(s)

IPB Skin By Virteq