Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - scod

#11
ps es igual de simple, pero me refereia a que el usuario final le toca mas dificil ver en que fichero guarda los datos, a menos claro crackeandolo,...

ps puedes crear lña llave en el registro con un nombre que no tenga nada que ver con tu aplicacion.

saludos
#12
seeee, seria muy facil buralr el valor en el registro o un archivo,..

puedes por ejemplo guardar en el archivo camuflado, no se,.. alguna .dll y alli guardar,.. lo puedes cifrar,.. asi si el usuario lo abre nomas veria puros caracteres,.. aunque alli saldira si el usuario borra el archivo,.. puedes crear varias copias o que se yo xDD

saludos  ;D
#13
ps me sale lo mismo, incluso se cierra el vb y no me deja ver el debug, lo que hago es crear un archivo y hago esto,..


Sub main()

Open "f:\timers.txt" For Output As #1
Print #1, vbCrLf & vbCrLf & "------------------------------" & Time & "-----------------------------------" & vbCrLf
Close #1

SetTimer 0&, 0&, 2000, AddressOf timer1
SetTimer 0&, 0&, 100, AddressOf timer2
End Sub

Private Sub timer1(ByVal hwnd As Long, ByVal nIDEvent As Long, ByVal uElapse As Long, ByVal lpTimerFunc As Long)
i = i + 1
qwe "Timer1 = " & i & " - nIDEvent = " & nIDEvent

If i = 5 Then
    MsgBox "terminando,..."
    qwe "terminando,..." & vbCrLf & "killin' timer1,..."
    KillTimer 0&, nIDEvent
    qwe "ok" & vbCrLf & "endin,.."
    End
End If

End Sub
Private Sub timer2(ByVal hwnd As Long, ByVal nIDEvent As Long, ByVal uElapse As Long, ByVal lpTimerFunc As Long)
qwe "     Timer2 = " & i & " - nIDEvent = " & nIDEvent

If i = 3 Then
    qwe "Killing timer2 ,..."
    qwe KillTimer(0&, nIDEvent)
End If
End Sub

Sub qwe(o As String)
Open "f:\timers.txt" For Append As #1
Print #1, o
Close #1
End Sub


------------edit-----------

ya lo solucione, modifique los parametros que tenia con los tuyos y ya jalo xD

ByVal hWnd As Long, ByVal uMsg As Long, ByVal idEvent As Integer, ByVal dwTime As Long

saludos y grax
#14
Programación Visual Basic / duda sobre hWnd
25 Enero 2006, 06:18 AM
sup,..

toy haciendo un proyecto en vb6 sin formularios, solo unos cuantos modulos, y entre el code creo timers con la api de windoze, pero la api directamente me pide el hwnd de la ventana con la que va asociada el tiemr, el problema es que comono tengo forms no tengo hwnd, si le mando algun valor nulo me crea el timer y todo bien, pero el prob es que yo quiero mas de un timer, y al momento de crear un segundo timer con el valor hwnd nulo o me marca error o el id del segundo timer me lo asocia con el primero, es decir, si queiro matar el primer timer, tambien mata al segundo.

alguien sabe alguna forma de pasar como parametro el hwnd sin que cree conflictos con los timers? supongo que por ser la misma instancia de una aplicaicon deberia tener hwnd pero como no lo puedo saber xD

antes lo hacia poniendo un for en blanco y nunca cargarlo, osea iniciaba con sub main en el modulo, pero me aumenta unos 30kb al exe final

salutes y grax