Darendeli Bilgisayar Saat & Tarih Düzenleyici V1

Programlama dilleri konusunda bilgi paylaşım alanıdır.
Cevapla
darendeli
Byte3
Byte3
Mesajlar: 128
Kayıt: 06 Haz 2016, 16:55

Darendeli Bilgisayar Saat & Tarih Düzenleyici V1

Mesaj gönderen darendeli » 24 Oca 2018, 21:55

En son darendeli tarafından 25 Oca 2018, 22:11 tarihinde düzenlendi, toplamda 2 kere düzenlendi.
Program Yazmanın En Güzel Yanı Birilerinin Bu Programlardan Faydalandığını Görmektir..



Kullanıcı avatarı
BlueLife
Byte3
Byte3
Mesajlar: 132
Kayıt: 29 Ağu 2014, 20:42

Re: Autoit ile PC nin Sistem Saatini Güncellemek

Mesaj gönderen BlueLife » 25 Oca 2018, 10:46

@darendeli

Zaman bilgisini güncellemek için, uzak bir sunucudan faydalanabilirsin. En basit olarak zaman bilgisini veren hızlı bir site bulup, sitedeki bilgeleri çekerek güncelleme yapabilirsin. Onun haricinde program başlayınca veyahut ilk kez saat değiştirilince eski saat bilgisini bir değişkende yedekleyip sonra bu bilgileri kullanabilirsin. Lakin haliyle bu verimli olmaz. Programın ne kadar açık kalacağı vs. gibi durumlarda yedeklenen saat bilgisi hatalı olacaktır. Uzak bir sunucudan zaman bilgisini çekmek daha mantıklı...

Tabi programın değişkene atadığı zaman bilgisini bir timer ile sürekli güncellenebilir. Lakin yinede program hatalı zaman bilgisini uygulayıp kapandğında ve sonra yeniden açıldığında alınan bilgiler hatalı olacaktır...

Kod: Tümünü seç

#RequireAdmin
#include <ButtonConstants.au3>
#include <ComboConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <Date.au3>

Local $FirsTime[3] =  [@hour,@MIN, @SEC]

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Darendeli Sistem Saat & Tarih Düzenleyici", 521, 197, 192, 124)
$Group1 = GUICtrlCreateGroup("Sistem Saati Değişiklik Ayarı", 8, 16, 249, 89)
$Input1 = GUICtrlCreateInput("", 24, 56, 57, 21)
$Input2 = GUICtrlCreateInput("", 104, 56, 57, 21)
$Input3 = GUICtrlCreateInput("", 184, 56, 57, 21)
$Label1 = GUICtrlCreateLabel("SAAT", 32, 80, 32, 17)
$Label2 = GUICtrlCreateLabel("DAKİKA", 112, 80, 43, 17)
$Label3 = GUICtrlCreateLabel("SANİYE", 192, 80, 43, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Group2 = GUICtrlCreateGroup("Sistem Tarihi Değişiklik Ayarı", 264, 16, 249, 89)
$Input4 = GUICtrlCreateInput("", 280, 56, 57, 21)
$Input5 = GUICtrlCreateInput("", 360, 56, 57, 21)
$Input6 = GUICtrlCreateInput("", 440, 56, 57, 21)
$Label4 = GUICtrlCreateLabel("GÜN", 288, 80, 32, 17)
$Label5 = GUICtrlCreateLabel("AY", 368, 80, 43, 17)
$Label6 = GUICtrlCreateLabel("YIL", 448, 80, 43, 17)
GUICtrlCreateGroup("", -99, -99, 1, 1)
$Button1 = GUICtrlCreateButton("SAATi GÜNCELLE", 8, 114, 247, 35)
$Button3 = GUICtrlCreateButton("Orjinal SAATE GÜNCELLE", 8, 154, 247, 35)
$Button2 = GUICtrlCreateButton("TARİHİ GÜNCELLE", 264, 114, 247, 65)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###


While 1
	$nMsg = GUIGetMsg()
	Switch $nMsg
		Case $GUI_EVENT_CLOSE
			Exit
		Case $Button1
           _saat_degistir()
		Case $Button2
		   _Tarih_degistir()
		Case $Button3
			_SetTime($FirsTime[0], $FirsTime[1], $FirsTime[2])
      EndSwitch

WEnd

Func _saat_degistir()
	$Input11 = GUICtrlRead ($Input1)
	$Input22 = GUICtrlRead ($Input2)
	$Input33 = GUICtrlRead ($Input3)
	_SetTime($Input11, $Input22, $Input33)
EndFunc


Func _Tarih_degistir()
	$Input44 = GUICtrlRead ($Input4)
	$Input55 = GUICtrlRead ($Input5)
	$Input66 = GUICtrlRead ($Input6)
	_SetDate($Input44, $Input55, $Input66)
EndFunc

darendeli
Byte3
Byte3
Mesajlar: 128
Kayıt: 06 Haz 2016, 16:55

Re: Autoit ile PC nin Sistem Saatini Güncellemek

Mesaj gönderen darendeli » 25 Oca 2018, 21:15

Tesekkürler Arraya Aktarmayı Düsünmemiştim
Program Yazmanın En Güzel Yanı Birilerinin Bu Programlardan Faydalandığını Görmektir..

Cevapla