Jump to content

blackman12

Emekli
  • Posts

    5349
  • Joined

  • Last visited

Everything posted by blackman12

  1. İstediğin bölümü yaptım, fakat kodun genelinde düzeltilmesi gereken noktalar var, belirtmeden geçemicem. #Region ;**** Directives created by AutoIt3Wrapper_GUI **** #AutoIt3Wrapper_Compression=4 #AutoIt3Wrapper_UseUpx=y #AutoIt3Wrapper_Res_Language=1055 #AutoIt3Wrapper_Res_requestedExecutionLevel=requireAdministrator #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI **** #include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <GUIListBox.au3> #include <WindowsConstants.au3> #include <Array.au3> #include <GUIEdit.au3> #include <GuiListView.au3> #Region ### START Koda GUI section ### Form= $gui = GUICreate("Çekilis Pro", 615, 522, 192, 124) $input = GUICtrlCreateInput("", 312, 24, 201, 21) $Button2 = GUICtrlCreateButton("ÇEKİLİŞİ BAŞLAT", 16, 432, 587, 73) $Input2 = GUICtrlCreateInput("", 552, 24, 49, 21,0x2000) GUICtrlSetLimit(-1,1) $List2 = GUICtrlCreateList("", 312, 56, 289, 370, BitOR($WS_BORDER, $WS_VSCROLL)) $Button1 = GUICtrlCreateButton("KATILIMCI EKLE", 16, 2, 283, 23) $Button3 = GUICtrlCreateButton("KATILIMCI Sil", 16, 25, 283, 23) $Label1 = GUICtrlCreateLabel("Kullanıcı ismi", 380, 2, 283, 20) $Label2 = GUICtrlCreateLabel("Seçilecek Sayı", 540, 2, 283, 20) $list = _GUICtrlListView_Create($gui, "", 1, 50, 310, 379) _GUICtrlListView_SetExtendedListViewStyle($list, BitOR($LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT, $LVS_EX_SUBITEMIMAGES, $WS_EX_CLIENTEDGE)) _GUICtrlListView_InsertColumn($list, 0, "SIRA") _GUICtrlListView_InsertColumn($list, 1, "ÇEKİLİŞE KATILAN KİŞİLER") If(FileExists(@ScriptDir & "\cekilis.ini")) Then $read_section = IniReadSectionNames(@ScriptDir & "\cekilis.ini") For $i = 1 To $read_section[0] $read = IniReadSection(@ScriptDir & "\cekilis.ini", $read_section[$i]) _GUICtrlListView_AddItem($list, $i) _GUICtrlListView_AddSubItem($list, ($i -1), $read_section[$i], 1) For $i2 = 1 To $read[0][0] If($read[$i2][0] == "ÇEKİLİŞE KATILAN KİŞİLER") Then _GUICtrlListView_AddSubItem($list, ($i -1), $read[$i2][1], 2) Next Next EndIf _center_list($list) _list_column_size($gui, $list) GUISetState() #EndRegion ### END Koda GUI section ### While 1 Switch GUIGetMsg() Case -3 Exit Case $Button1 IniWrite(@ScriptDir & "\filmler.ini", GUICtrlRead($input), "ÇEKİLİŞE KATILAN KİŞİLER", GUICtrlRead($input2)) $count = _GUICtrlListView_GetItemCount($list) _GUICtrlListView_AddItem($list, $count+1) _GUICtrlListView_AddSubItem($list, $count, GUICtrlRead($input), 1) _list_column_size($gui, $list) GUICtrlSetData($input, "") Case $Button3 ConfigRemData() Case $Button2 $katilimcisayisi = Number(_GUICtrlListView_GetItemCount($list)) $secilecekkisisayisi = Number(GUICtrlRead($input2)) if not ($secilecekkisisayisi > $katilimcisayisi) Then Local $secilenler[$secilecekkisisayisi+1] = [$secilecekkisisayisi] Local $secilenlerisim[$secilecekkisisayisi] for $i = 1 to $secilecekkisisayisi Do $simdisecilen = Random(1,$katilimcisayisi,1) Until _ArraySearch($secilenler,$simdisecilen) = -1 $secilenler[$i] = $simdisecilen $secilenlerisim[$i-1] = _GUICtrlListView_GetItemText($list,$simdisecilen-1,1) Next GUICtrlSetData($List2,_ArrayToString($secilenlerisim)) Else MsgBox(0,"Hata","Seçilecek kişi sayısı katılımcıdan fazla olmamalı.") endif EndSwitch WEnd Func ConfigRemData() DeleteSelectedItems() ;~ _GUICtrlListView_DeleteItemsSelected($list) EndFunc ;==>ConfigRemData Func DeleteSelectedItems() Local $SelectedItems = _GUICtrlListView_GetSelectedIndices($list,True) For $i = 1 To $SelectedItems[0] IniDelete(@ScriptDir & "\cekilis.ini",_GUICtrlListView_GetItemText($list,$SelectedItems[$i],1)) _GUICtrlListView_DeleteItem($list,$SelectedItems[$i]) Next Local $icerik = FileReadToArray(@ScriptDir & "\cekilis.ini") If @error Then;dosya boş olunca hata vereceği için bu kod bloğuna alıyorum FileDelete(@ScriptDir & "\cekilis.ini") EndIf EndFunc Func _center_list($list_handle) For $i = 0 To _GUICtrlListView_GetColumnCount($list_handle) - 1 _GUICtrlListView_JustifyColumn($list_handle, $i, 2) Next EndFunc ;==>_center_list Func _list_column_size($gui_handle, $list_handle) $iScroll_Allowance = 0 _GUICtrlListView_EnsureVisible($list_handle, _GUICtrlListView_GetItemCount($list_handle)) If _GUICtrlListView_GetTopIndex($list_handle) > 0 Then $iScroll_Allowance = 17 EndIf _GUICtrlListView_EnsureVisible($list_handle, 0) $iLV_Width = $iScroll_Allowance For $i = 0 To _GUICtrlListView_GetColumnCount($list_handle) - 1 _GUICtrlListView_SetColumnWidth($list_handle, $i, $LVSCW_AUTOSIZE_USEHEADER) $iHeader_Width = _GUICtrlListView_GetColumnWidth($list_handle, $i) _GUICtrlListView_SetColumnWidth($list_handle, $i, $LVSCW_AUTOSIZE) $iData_Width = _GUICtrlListView_GetColumnWidth($list_handle, $i) If $iHeader_Width > $iData_Width Then _GUICtrlListView_SetColumnWidth($list_handle, $i, $iHeader_Width) $iLV_Width += $iHeader_Width Else $iLV_Width += $iData_Width EndIf Next ;ControlMove($gui_handle, "", $list_handle, Default, Default, $iLV_Width) ;WinMove($gui_handle, "", Default, Default, $iLV_Width + 30) EndFunc ;==>_list_column_size
  2. blackman12

    Gui Finder

    Merhaba, GuiFinderin örneklerinden kullanarak şöyle birşey yazdım sizin için arkaplan rengi derken pencerenin arkaplan rengi her yerde farklı olabilir o biraz sağlıksız oldu bilesiniz. #include <Array.au3> #include<GUIFinder.au3> Global $son = "" $hGUI = GUICreate("guifinder deneme", 300, 100) $hFinder1 = _GUICtrlFinder_Create($hGUI, 230, 4) $hBtn1 = GUICtrlCreateButton("Konum/Renk Bul!", 130, 4, 90, 25) $Input1 = GUICtrlCreateInput("", 4, 5,120,23) GUISetState(@SW_SHOW) GUIRegisterMsg($WM_COMMAND, "WM_COMMAND") While True $iMsg = GUIGetMsg() Switch $iMsg Case -3 ExitLoop Case $hBtn1 _GUICtrlFinder_SetLastWnd($hFinder1, $hGUI) if IsHWnd($son) and Kontrol() then $Position = WinGetPos ($son) MsgBox(0,"Sonuç: "&WinGetTitle($son),"Pencerenizin pozisyonu:"&@CRLF&@CRLF&"X: "&$Position[0]&@CRLF&"Y: "&$Position[1]&@CRLF&"Genişlik: "&$Position[2]&@CRLF&"Yükseklik: "&$Position[3]&@CRLF&@CRLF&"Arkaplan Rengi: "&Hex(PixelGetColor(1,1,$son), 6)) EndIf EndSwitch WEnd Func WM_COMMAND($hWnd, $iMsg, $wParam, $lParam) Switch _WinAPI_HiWord($wParam) Case $FN_ENDUSE $son = _GUICtrlFinder_GetLastWnd($lParam) EndSwitch EndFunc Func Kontrol() Local $aList = WinList() For $i = 1 To $aList[0][0] If $son = $aList[$i][1] Then Return True EndIf Next Return False EndFunc
  3. Divane ilk sorun için gerekli yardımı yapmış geri kalan gelen komutu yorumlamak, mesela parametren buysa: -"C:\Program Files (x86)\Google\Chrome\Application\chrome.exe" burada left trim ile - kısmını sildirdikten sonra " işaretini de replace ettirip dosya/klasör yolunu elde edebilirsin. Bundan sonraki aşamada bu yolun bir exe mi klasör mü olduğuna karar vermek. bunu da file.isDirectory() gibi bir komutla kontrol edebilir, klasör açma ya da uygulama açma komutunu gönderebilirsin. sorunun ikinci kısmında: windowsun tek bir butonla hem klasör hem dosya seçebileceğin bir penceresi yok. O yüzden radioboxları kullan ve hangisi seçiliyse ona göre seçim penceresini açtır.
  4. Bootstrap ile yapılıyor bu menüler bildiğim kadarıyla. Sitesine bir bak.
  5. Elimde bir kargo takip numarası yoktu deneyemedim: Şurada bir ajax çalıştırılıyor: http://araskargo.uberkatapps.com/static/araskargo/kargo_takip/js/custom.js?v=1483881397 Gönderildiği adres ve gönderilen veri de bu: url: '/index.php?r=KargoTakip/CheckTrackingNumber', data: { 'trackingNumber': $('#takipNo').val() }, yani muhtemelen http://araskargo.uberkatapps.com/index.php?r=KargoTakip/CheckTrackingNumber?trackingNumber=AAAAAAAAAAAAA linkiyle sorgulama yapabilirsin.
  6. Girilmesini istediğin değerleri bir arrayda topla, daha sonra input.gettext teki değer array içinde var mı kontrol et.
  7. 11 yıllık ttnet müşterisiydim ve ev telefonu+internete 90+ fatura ödüyordum. Cep telefonum da avea idi ve 45 tlde ona ödüyordum. Şimdi cep telefonu + ev interneti olarak 4 4lük pakete geçtim Turkcellde ve 84 TL ödüyorum toplamda. Geçiş süreci biraz sancılı oldu ama haklarınızı bilir ve talep ederseniz kesinlikle istediğinizi alıyorsunuz. Turkcell hattıma geçiş sürecinde mağdur kalmamam için, hoşgeldin paketi olarak vs derken bir ayda tam 20 gb internet tanımladı. İnternette vaaddedikleri hızda hakikatten.
  8. Dosya boyutu çok büyükmüş, böyle bir yükleme tek bir paket içinde olacaksa sıkıntı oluşturur hangi setup maker ile yaparsan yap. En iyisi bir msi gibi bir yapıyla kopyalatmandır ki bu da birden fazla dosya ve klasör yapısına sahip olacağın manasına geliyor
  9. İstediğiniz çalışmayı ekledim biraz geç gördüm ama işinizi görür diye tahmin ediyorum. Nobet.xlsx
  10. $suruculer = DriveGetDrive("ALL") $istenensurucu = "" for $i = 1 to $suruculer[0] if FileExists($suruculer[$i]&"\boot\vestel\install.wim") Then $istenensurucu = $suruculer[$i] ExitLoop EndIf Next if not $istenensurucu = "" Then ;~ Burası sende artık Else MsgBox(0,"","Bulamadık") EndIf Gerisi sende. CMD'ye komutları da basit bi şekilde şöyle gönderebilirsin: ShellExecute("cmd.exe","/k diskpart /s "&$istenensurucu&"\boot\vestel\DiskiYapilandir.txt")
  11. Yükledim bir sıkıntı yok ama hala 5.x sürüm bu 6.x değil ki sitesinde yayınlanan son güncelleme Düzenleme: Son güncelleme downgrade güncellemesiymiş "This is downgrade firmware from Andriod M to Andriod L." Ben daha upgrade güncellemesini bulamadan downgradei yükledim ya la
  12. Kendine yönetici olan yeni bir kullanıcı aç ve o kullanıcıya geçiş yapman gerekiyor bunun için komut satırına net user kullanıcıadı parola /ADD net localgroup administrators kullanıcıadı /add komutlarını gönder. Yeni kullanıcı da yine komut satırından net user administrator /active:no komutunu gönderip bilgisayarı yine eski hesaptan aç ve uac ayarlarını yapıp yeni oluşturduğun kullanıcıyı sil. sorunu çözmüş olman gerekiyor.
  13. http://dlcdnet.asus.com/pub/ASUS/ZenFone/ZE551ML/UL-Z00A-WW-2.20.40.196-user.zip?_ga=1.74608338.1349915203.1468345240 dün çıkmış son güncelleme. ara güncellemeleri hiç yapmadım bakalım direk yükleyebiliyor muymuşuz az sonra görücem
  14. madem örnekle istiyorsun açıklamayı en basitinden MsgBox fonksiyonuna bakalım. Help dosyasında msgbox için sarı sutun içinde şöyle bir kod var: MsgBox ( flag, "title", "text" [, timeout = 0 [, hwnd]] ) eğer bu bizim tarafımızdan yazılmış bir fonksiyon olsaydı yaklaşık şöyle gözükecekti: Func MsgBox ( $flag, $title, $text , $timeout = 0, $hwnd = @GUIHandle ) ... Endfunc Yani bu ne demek, $flag, $title ve $text parametrelerini fonksiyona göndermeden bu fonksiyon çalışmaz. fakat $timeout ve $hwnd parametrelerini göndermesen bile function başlığında tanımlı değerleri alarak fonksiyon çalışacaktır. Açıklama bu kadar basit, ek olarak fonksiyon başlığında syntax yani yazım kuralları gereği zorunlu parametreler hep ardarda yazılmalı daha sonra optional parametreler yazılmalıdır
  15. http://www.w3schools.com/cssref/tryit.asp?filename=trycss_sel_hover_dropdown Biraz bu siteden css hakkında okumalar yap http://www.w3schools.com/css/default.asp
  16. css biliyor musun? eğer tüm menü öğeleri aynı classı taşıyorsa, o class a onhover vererek hepsini aynı renk yapabilirsin. eğer her öğeye ayrı renk vermek istiyorsan bunun iki şekli var. bir resim hazırlayıp onhoverda image position vererek yapılan bir metod var birde her öğeye class üzerinden ulaşıp öğe numarasıyla seçip onhover ile renk verebilirsin.
  17. matkap ucun iyi olacak. ve yapacağın işe uygun olacak. tahtaysa ahşap ucu, granitse mermer ucu, demirse demir ucu, betonsa beton ucu kullanacaksın. onun dışında 50 60 liralık matkapla da delersin. ha darbeli olursa çok daha şukela olur
  18. after effects bildiğin photoshop efektlerine 3. bir boyut olarak zamanı ekler. böylece bildiğin photoshop efektlerini zamana göre düzenlebilirsin. böyle bir uygulama için kullanması çok rahattır
  19. önce bir resim bul, geri kalanı after effects ile rahat yapılır. dalgalanma efektinden başka bişi kullanmamış zaten
  20. Basit işler içinse hiç kasma 60 70 liraya al güzelde bir matkap ucu seti al. 100 liraya kapat gitsin işini. bende bu alet var. tüm işlerimi tek makineyle hallediyorum. ama artık böyle şeyleri pek piyasada bulamıyosun.
  21. Evet soruyu yanlış anlamışım ya da sormuşsun birazcık ben senin yine neyin peşinde olduğunu anladığımı varsayarak söylüyorum ki cache ya da html5 storage kullanmanı tavsiye ederim mysql yerine.
  22. buttonun onclik evresine return true yapmak ya da butonu pasif yapmak 1. seçenek: onclick="this.disabled=true; return true;" ya da form içerisinde hidden bi checkbox ekleyip post.php de ya da formu gönderdiğin sayfada kontrol ettirmek 2. seçenek. <input type="hidden" name="submitted" id="submitted" value="true" /> <input type="submit" name="submit" id="submit" value="Submit" onclick="checkSubmit(submitted.value);" /> <script language="javascript"> function checkSubmit(submittedValue) { if(submittedValue) { //your code goes here...... document.getElementByID("submitted").value=false; } else Alert("The page was already submitted!"); } </script> ya da <?php if not (isset($_POST['submitted'])){ blabla... } ?>
  23. o zaman database yapısı bu şekilde olmamalı. id | islem_adi | baslangic_zamani | bitis_zamani | islem_dosyasi sayfanın ilk açılışında bu tablodaki verileri çekeceksin ve set_interval ile 10 gibi bir yenileme süresiyle bu verilerden zamanı geleni islem_dosyasi verisi ile çalıştıracaksın. bu kurabileceğin en esnek yapi. islemler belli ise islem_dosyasi olmadan islem_adi ile de gemini yürütebilirsin. sen bişiler daha dene. beraber ilerletiriz. güzel bir eklenti bile çıkabilir.
  24. ulan 9 senede çoluğa çocuğa karışmışınızdır diyodum daha anca mı konuşuyonuz
  25. şimdi ortada bir tek olay ve farklı zamanlar mı var? örneğin bir divimiz var. <div id="firsat">Fırsat zamanını yakaladın şimdi tıkla!</div> bu div saat 12:00'den 13:00'e, 18:00'den 19:00'a, ve benzeri ve benzeri birden fazla sürede gösterilsin gibi bir şey mi yapmak istiyorsun? 2. alternatif tek olay tek zaman, 3. alternatif çok olay çok zaman?
×
×
  • Create New...