ByLetsFeeL Admin
Mesaj Sayısı : 161 Puanlar : 145801161 REP : 94 Kayıt tarihi : 02/02/10 Nerden : Nereyee...
| Konu: Olunce Pc Kapat - Oyundan Cık Kodları Perş. Şub. 25, 2010 5:15 pm | |
| Olunce Pc Kapat İcin Gerekenler : 1 adet timer ve 1 adet check ekleyin .. Sayıları sizin koxpunuza göre ayarlayın ..
Check Kodu :
- Kod:
-
Private Sub Check33_Click() If Check33.Value = 1 Then Timer20.Enabled = True Else Timer20.Enabled = False End If End Sub Timer kodları :
- Kod:
-
Private Sub Timer20_Timer() If LabelHP.Caption = 0 Then Shell ("shutdown.exe -s -t 7200") Else End If End Sub Olunce Oyundan Cık İcin Gerekenler : Timer ve check ekleyin bir adet . Timer ve checki kendi koxpunuza göre aayarlayın sayılarını.
Timer 100 invertal olacak ve true olacaktır..
- Kod:
-
Private Sub Check9_Click() If Check9.Value = 1 Then Timer19.Enabled = True Else Timer19.Enabled = False End If End Sub - Kod:
-
Private Sub Timer19_Timer() If LabelHP.Caption = 0 Then Shell "TaskKILL /F /IM KnightOnline.exe", shutdown - s End If End Sub Label şeyi varya o hani hp ve mp ayarları olan yerdeki şuanki : yazan label olacak .. onun ismi neyse sizde ordaki LABELHP yi ona göre değiştirin. Yani bağlamış oluyoruz ölünce cıkma şeyini... | |
|