Kayan Yazı, Titreyen Saat...

[asmazh]

Bu aralar sorduğum sorularla biraz sıkıyorum galiba ama yardım alabileceğim başka bir yer yok. Zaten bu son haftam sonrası oturup soru çözmek olacak üniversiteyi kazanmam lazımmış
şimdi bir gui de kayan yazı yapmak istiyorum yaptım ama sleep ler programı donduruyor ve başka bir işlem yapılmasına izin vermiyor.
Bir saat gui si yaptım while içine guictrlsetdata($label,@hour&@min&@sec) kodunu koydum çok güzel sorun yok ama program sürekli titreşim halinde ve belli bir süre bilgisayara dokunmayınca ekran koruyucusu çalıştığında bu while içine koyduğum kod yüzünden ekran koruyucu kapanıyor.
Arkadaşlar kod verecekseniz lütfen normal yazın aksi taktirde kod sayfasından kodları alamıyorum cepten girdiğim için sizden çok şey istediğimin farkındayım.
Ama mağdur görün.

[blue_life]

@asmazh

Kodlarını verirsen, hatayı hangi kısımda yaptığını yazabiliriz.
Hadi sana basit bir saat örneği verelim...

[color="#0000FF"][b]Local $SEC
Opt("GUIOnEventMode", 1)
$Form1 = GUICreate("Form1", 400, 200)
GUISetOnEvent(-3, "Form1Close")
$Label1 = GUICtrlCreateLabel("", 10, 10, 200, 20)
GUICtrlSetFont(-1,10)
GUISetState(@SW_SHOW)

While 1
Sleep(100)
If $SEC <> @SEC Then
$SEC = @SEC
GUICtrlSetData($Label1,@HOUR & ":" & @MIN & ":" & $SEC)
EndIf
WEnd

Func Form1Close()
Exit
EndFunc[/b][/color]

[blackman12]

Kayan yazıda da sleep kullanma for döngüsü içinde labelin konumunu +1 şeklinde artır.

[asmazh]

Saat olayı tamam sağolun BlueLife

@blackman12

[code]#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Kayan Yazı Deneme", 388, 65, 192, 124)

GUISetState(@SW_SHOW)
#endregion ### END Koda GUI section ###

While 1
For $i = 1 To 100

$Label1 = GUICtrlCreateLabel("Kayıyorummmmmmmmm oleyyy ", $i, 16, 157, 17)
Next
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit

EndSwitch
WEnd
[/code]

böyle bir şey yaptım ama çok hızlı birde siz konrol etseniz.

Edited July 20, 2011 by asmazh

[KintaRo]

titreyen saati ne yapacaksın çok merak ettim

[asmazh]

Yok yanlış anlamışsın bende titreyen vardı zaten. titremiyenninden istedim sağolsun verdiler.

[blackman12]

Madem blue_life in kodlarını kullanıcaksın o zaman GuiGetMSG kullanamazsın yine setonevent kullanacaksın.
[code]
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
Opt("GUIOnEventMode", 1)
Global $b = True
$Form1 = GUICreate("Kayan Yazı Deneme", 388, 65, 192, 124)
GUISetOnEvent(-3, "Kapa")
$Label1 = GUICtrlCreateLabel("Kayıyorummmmmmmmm oleyyy ", 10, 16)
GUISetState(@SW_SHOW)

while $b = True
For $i = 9 To 150
ControlMove($Form1,"",$Label1,$i,16)
Sleep(10)
Next
For $i = 150 To 8 step -1
ControlMove($Form1,"",$Label1,$i,16)
Sleep(10)
Next
WEnd

Func Kapa()
Exit
EndFunc[/code]

[asmazh]

Sağolun hocam halloldu. Şimdi windows açıldığında hoşgeldiniz sayfasından önce yazdığım bir programın açılmasını istiyorum regedit in run kısmını kullanıyorum ama bu hoş geldiniz sayfasından sonra programı çalıştırıyor. Hani vardırya bazı programlar hoş geldiniz sayfasından önce açılır işlemini yapar sonra windows u açar.

[MostWanted]

Autoit ile yapmak çok zor.Açıkçası bilgim yok ama boot edilebilen programlar autoit ile yazılmaz.

[asmazh]

Ben reg kaydı ile olur diye düşündüm hocam şimdi ben auto it ile yazdığım bir programı decompileden nasıl korurum ? Siz autoit ile yazdığınız programları decompile den nasıl koruyorsunuz

Edited July 21, 2011 by asmazh

[MostWanted]

Ben korumuyorum Çalıp da benim yazdığım karmaşık kodları anlayabilen varsa çalsın zaten O kadar karışık yazıyorum ki 1 ay sonra bakınca çözmek için canım çıkıyor

[blackman12]

ben açık kaynak koddan yanayım zaten koruyamıyorum exelerimi demekten daha estetik duruyo

[asmazh]

Ama ben çok sade bir şekilde yazıyorum programlarımı. @blackman12 nin en ufaktan pc kilitleyiçi programına baktım bu autoit ilemi yazılmış diye tereddüt ettim. O nasıl bir kodlama aman yarabbim. Hocam siz yinede benim gibi sade kodlayan bir arkadaşa neyi tavsiye edersiniz?

[blackman12]

Hayırdır neresini beğenmedin kodlamamın Sana tavsiye edebileceğim blue_lifein kendi yaptığı bir crypto vardı onu kullanman. Biz denedik autoitin şu anda en geçerli decompilerıyla kırılmıyo. Ayrıca çok fazla yayılmadığı için karşısına yazılmış olan bir decompileri da mevcut değil bildiğim kadarıyla. Neyi gizlemeye çalıştığını da anlamadım hayır iranın nükleer tesislerine virüs mü sokucan

[asmazh]

Yok ben öyle küçük işlerle uğraşmıyorum. Autoit ile win7 ye rakip bir işletim sistemi kurdum herşey tamam amma kodları gizleyemiyorum