Jump to content

SimpsoN_Bart

-=TNC.VIP=-
  • Posts

    712
  • Joined

  • Last visited

  • Days Won

    6

Everything posted by SimpsoN_Bart

  1. O kadar kod ve program verdik tutturdun nircmd ile yapacam diye şimdi o olmayınca yine dediğim programa geldin :D Alt tarafı bir kısayol bu kadar uzatmanın bi alemi yok kanımca. Önceki postlarda isteğini vermiştim ama pm attığın için son defaya mahsus hazırlayıp veriyorum. Kabak tadı vermeye başladı çünkü. https://app.box.com/s/rbokk1csllme5g26a3o5
  2. Program halini de verdim kullanmıyorsan sen bilirsin. 64 bit için üstteki programın ilgili sürümünü indirip dene veyahut buna benzer bir program var onu da önceki cevaplarda parametreleriyle verdim.. http://www.nirsoft.net/utils/nircmd-x64.zip
  3. Önceki cevaplarda isteğin kodu verdim. Derleyip bakma zahmetine girmemişsin sanırım :) İsteğin basit bir olay ama ben yinede bunun fonksiyonunu yazdım daha işlevsel ve anlaşılır olsun diye. Diğer çalışmalarında da kullanabilirsin. Bu arada @ProgramFilesDir sisteme göre sonuç döndürür yani @OSArch ile koşul koşmaya pek gerek yok diye hatırlıyorum.. ;Dosya Adı|Kısayol konumu|Çalışma dizini|Parametre|Açıklama|Simge|Simge numarası|Başlagıç sitili|Kısayol tuşu SK_SHORTCUT(@ProgramFilesDir & "\Nero\Nero Burning ROM\nero.exe", @DesktopDir & "\Nero Express", @ProgramFilesDir & "\Nero\Nero Burning ROM", "/w", "", @ProgramFilesDir & "\Nero\Nero Burning ROM\nero.exe", 1, @SW_MAXIMIZE) Func SK_SHORTCUT($DOSYA_ADI, $LNK, $CALISMADIZINI = "", $PARAM = "", $ACIKLAMA = "", $SIMGE = "", $NSIMGE = 0, $DURUM = "", $KISAYOLT = "") Local $KLASOR If $NSIMGE = "" Then $NSIMGE = 0 If StringRight($LNK, 4) <> ".lnk" Then $LNK &= ".lnk" If Not StringInStr($DOSYA_ADI, ":\", 0) Then $DOSYA_ADI = @ScriptDir & "\" & $DOSYA_ADI If Not FileExists($DOSYA_ADI) Then Return -1 $KLASOR = StringSplit($LNK, "\") $KLASOR = StringLeft($LNK, StringInStr($LNK, $KLASOR[$KLASOR[0]]) - 2) If Not FileExists($KLASOR) Then DirCreate($KLASOR) FileCreateShortcut($DOSYA_ADI, $LNK, $CALISMADIZINI, $PARAM, $ACIKLAMA, $SIMGE, $KISAYOLT, $NSIMGE, $DURUM) EndFunc ;==>SK_SHORTCUT Program Hali. https://app.box.com/s/n489it59d1940hfuc2el
  4. ;Dosya Adı|Kısayol konumu|Çalışma dizini|Parametre|Açıklama|Simge|Simge numarası|Başlagıç sitili|Kısayol tuşu SK_SHORTCUT("nero.exe", @DesktopDir & "\Nero Express", @ProgramFilesDir & "\Nero\Nero Burning ROM", "/w", "Hazırlayan : SimpsoN_Bart") Func SK_SHORTCUT($DOSYA_ADI, $LNK, $CALISMADIZINI = "", $PARAM = "", $ACIKLAMA = "", $SIMGE = "", $NSIMGE = 0, $DURUM = "", $KISAYOLT = "") Local $KLASOR If $NSIMGE = "" Then $NSIMGE = 0 If StringRight($LNK, 4) <> ".lnk" Then $LNK &= ".lnk" If Not StringInStr($DOSYA_ADI, ":\", 0) Then $DOSYA_ADI = @ScriptDir & "\" & $DOSYA_ADI If Not FileExists($DOSYA_ADI) Then Return -1 $KLASOR = StringSplit($LNK, "\") $KLASOR = StringLeft($LNK, StringInStr($LNK, $KLASOR[$KLASOR[0]]) - 2) If Not FileExists($KLASOR) Then DirCreate($KLASOR) FileCreateShortcut($DOSYA_ADI, $LNK, $CALISMADIZINI, $PARAM, $ACIKLAMA, $SIMGE, $KISAYOLT, $NSIMGE, $DURUM) EndFunc ;==>SK_SHORTCUT Bunun yerine ufak bir program daha var şöyle biraz incelersin. Shortcut.exe Parametresi Shortcut.exe /F:filename /A:C|E|Q [/T:target] [/P:parameters] [/W:workingdir] [/R:runstyle] [/I:icon,index] [/H:hotkey] [/D:description] /F:filename : Specifies the .LNK shortcut file. /A:action : Defines the action to take (C=Create, E=Edit or Q=Query). /T:target : Defines the target path and file name the shortcut points to. /P:parameters : Defines the command-line parameters to pass to the target. /W:working dir : Defines the working directory the target starts with. /R:run style : Defines the window state (1=Normal, 3=Max, 7=Min). /I:icon,index : Defines the icon and optional index (file.exe or file.exe,0). /H:hotkey : Defines the hotkey, a numeric value of the keyboard shortcut. /D:description : Defines the description (or comment) for the shortcut. Notes: - Any argument that contains spaces must be enclosed in "double quotes". - If Query is specified (/A:Q), all arguments except /F: are ignored. - To find the numeric hotkey value, use Explorer to set a hotkey and then /A:Q - To prevent an environment variable from being expanded until the shortcut is launched, use the ^ carat escape character like this: ^%WINDIR^% Examples: /f:"%ALLUSERSPROFILE%\Start Menu\Programs\My App.lnk" /a:q /f:"%USERPROFILE%\Desktop\Notepad.lnk" /a:c /t:^%WINDIR^%\Notepad.exe /h:846 /f:"%USERPROFILE%\Desktop\Notepad.lnk" /a:e /p:C:\Setup.log /r:3 An argument of /? or -? displays this syntax and returns 1. A successful completion will return 0.
  5. Çoğu üyenin, işini iyi yaptığından ötürü ön yargısını kazandığı ama sanıldığı kadar kötü niyetli (kırbaç hastası) bir yönetici değildir. KintaRo. Forum düzeni için elinden geleni yapan herkese kendince yardımcı olmaya çalışan acımasız moder seksi coder karizmatik father.. neyse lafı çok uzakttık. İyi varsın yönetici kardeş hep bizimle olmanı dilerim :trollface:
  6. Bu progressbar zımbırtısı her zaman sorun olmuştur. Eğer işlemleri tam okuyamıyorsan ilerletmek zor olur.. Program kurulumlarında ben InstallTips öneririm. Sorunsuz çalışır hemde kurulurken kullanıcıya bilgi sağlar. Yinede sana ufak bir örnek verelim. Örneği kendine göre düzenlersin. #include <File.au3> Global $EXE_FILE = _TempFile() FileInstall("program1.exe", $EXE_FILE) _SET_PROGRESS($EXE_FILE, "Deneme", "Flash Player yüklenirken lütfen bekleyiniz...") FileDelete($EXE_FILE) FileInstall("program2.exe", $EXE_FILE, 1) _SET_PROGRESS($EXE_FILE, "Deneme", "Java yüklenirken lütfen bekleyiniz...") FileDelete($EXE_FILE) Func _SET_PROGRESS($GET_EXE_FILE, $GET_TITLE = "UltraFlashPack v1", $GET_MSG = "Program(lar) Yuklenirken Bekleyiniz.") ProgressOn($GET_TITLE, $GET_MSG, "0 Saniye") Local $PR_PID = Run($GET_EXE_FILE, @WorkingDir) Local $START_TIME[2] = [TimerInit(), 0] Local $SET_PROGRES While ProcessExists($PR_PID) If Round(TimerDiff($START_TIME[0])) > $START_TIME[1] Then $START_TIME[1] = Round(TimerDiff($START_TIME[0]) / 1000) $SET_PROGRES += 1 ProgressSet($SET_PROGRES, $START_TIME[1] & " Saniye") If $SET_PROGRES >= 100 Then $SET_PROGRES = 1 EndIf Sleep(50) WEnd ProgressSet(100, "Bilgi", "Kurulum Tamamlandi") EndFunc ;==>_SET_PROGRESS Ben burada Run kullandım sen istersen ShellExecute vs kullabilirsin buna ek olarak da parametre de ekleyebilirsin sana kalmış. Hayırlı geceler.
  7. İlk sorunuzun cevabı:       CPU çok kasıyorsa ;     Yazılan iletileri güzel bir şekilde okuyun. Aradığınız mutlaka yazılı olacaktır ki sorduğunu 2 sorunun cevabı burada mevcut idi. PM nize bu yüzden cevap vermedim.
  8. Baktın ki olmay bakma annay mısın ?

    1. Show previous comments  3 more
    2. blackman12

      blackman12

      yavvaşşş kayar düşersin kıyamam.

    3. SimpsoN_Bart

      SimpsoN_Bart

      ben düşeyim sana bişi olmasın bilekmenim.

    4. KintaRo

      KintaRo

      daş düşebilü ayu çıkabilüü

  9. Date&Time Synchronize, sistem saatiniz yanlış ise internet üzerinden sisteminizi kısa sürede senkronize eden bir uygulamadır.. Kullanımı gayet basit ve kullanıcı dostudur. Çift tıklamanız kâfidir. Programa komut satırı da koydum dilerseniz bu şekilde de çalıştırabilirsiniz..İyi çalışmalar arkadaşlar. Programdan Görüntüler:[spoiler] [/spoiler] Komut Satırı : /Silent : Program sessiz şeklilde çalışır. Herhangir bir uyarı veya bilgi mesajı vermez. /About : Program hakkında bilgi sağlar. /? : Programın nasıl kullanılacağı hakkında bilgi sağlar. https://app.box.com/s/auk2cmh0cxrvpakyo35w
  10. SkinCrafter windows uygulamaları için özel temalı arayüzler tasarlamanıza olanak sağlayan bir araçtır. Desteklediği programlama dilleri C++ , C# , Visual Basic, .NET ve Delphi. Ek olarak autoit de bile desteği bulunmaktadır.Aslında benimde çok sevdiğim bir kütüphane fakat tam olarak isteğim gibi bir tema dosyası bulamadım, bulduklarımda C# da çalışmadı veya Framework desteği yoktu. Autoit de kullanımı gayet sade ve anlaşılır biçimdedir. UDF açıklamalarına göz gezdirin. İyi çalışmalar.. Kaynak: http://skincrafter.com/ Kaynak Kodlar + 1 Adet Tema: https://app.box.com/s/14twqc75izfg9gi9jz1e
  11. Aslında autoit ile yapılan katılımsız programlar pek stabil değil.. Bazen sıkıntılar çıkarabiliyor, komutlar ve ilgili yöntemleri bilmiyorsanız hiç bulaşmayın derim. En temizi repacker yapmak o da her programla değil özellikle smart install maker ve Advanced Installer.. Aralarında en iyi program Inno Setup. Bununla çok iyi repacker yapabilirsiniz her yönüyle başarılı bir programdır ve forumda katılımsız ustaları bu programla katılımsız yapmaktalar..Yanlış hatırlamıyorsam açık koda bile destek veriyordu yani delphi vs dil biliyorsanız harika setuplar yapabilirsiniz.
  12. [spoiler] [/spoiler] Ayarlarınızı bu şekilde yapın. En alt da Ses denetimi var orda test yaparsanız sonuç alabilirsiniz.
  13. herkese benden oralet

  14. .NET Framework kurulu olunca çalışıyorsa demek ki C# vb. dilde yazıldı.
  15. Nice yıllara hemşo. Rabbim uzun ve sağlıklı ömürler versin. :)
  16. Baltayı taşa vurdun ! hazır ol tnctr...

    1. Show previous comments  1 more
    2. KintaRo

      KintaRo

      admin kardeş güvenlik kalkanlarını çalıştır hemen adam siteyi hekırlayacak

    3. SimpsoN_Bart
    4. sk8er_boi

      sk8er_boi

      omg noooooooooooooooooo!

  17. Bazı zamanlarda host dosyasından site engellemek istediğim oluyordu bunu daha hızlı hala getirmek için böyle bir şey geliştirmek istedim. Aslında tam olarak amacım c++ kodlarını biraz daha hatırlamaktı ama sizlere de paylaşmanın iyi olacağını düşündüm.Program dan yapmak isteğiniz seçeneği girmeniz yeterli olacaktır.Umarım işinize yarar. :) Kullanım şekli : siteadi.com Not : Site ismi girerken : www. http://www. vs kullanmayınız. Program + Kaynak Kodlar: https://app.box.com/s/13fwkx2jx25ilvlc47js
×
×
  • Create New...