casper0007 Posted March 16, 2019 Share Posted March 16, 2019 (edited) İşletim sistemi hk Bildiginiz üzere uzu zamandır bu sıtenin bir bireyi olarak forumda bulunuyorum aklımda wın7 tnctr logolu bı sıstem yapmak var İşlem için sizlerden destek beklıyorum 1,Tnctr logolu walpaper masaustu kagıtları 2,Sİstem icin Kullanılabılcek gorsellıgı etkılı fakat sade olacak iconlar 3,Sistem dvd boyutunu asmaması ıcın 32 bit secimi 4,Eklenmesını ıstenılen yazılımlar Hertürlü fikir beyanı acıktır ıslem bıttıgınde yandekse yukleyeccegım ve sıstemın yapılısını asma asama yazacagım nasıb olursa Begenıldıgı taktırde 64 bit te yapılabılır bakalım ne olacak............ Not:Bu fıkır bırden bire olusmadı bana sıstemın nasıl yapıldıgını soranlar var ben kımseden ustun nıtelıge sahıp degılım arastırarak zamanla ogrendım bir cırpıda herseyı ogrenemezsınız ama yavaş yavas ve damlaya damlaya göl olabiliriz Edited March 16, 2019 by casper0007 1 Quote Link to comment Share on other sites More sharing options...
Mehmet Posted March 16, 2019 Share Posted March 16, 2019 Ok.Hadi bakalım benden de Autoit desteği olsun,yapılmasını istediğiniz birşey olursa autoit ile yapıp ekleriz bir kaç gün boş vaktim var 1 Quote Link to comment Share on other sites More sharing options...
NAMIKABI Posted March 16, 2019 Share Posted March 16, 2019 (edited) İlk tuğla benden olsun, TNCTR Wallpaper 1920 x 1080 Please register to see this content. Şahsi fikrim sistemde hiçbir programa yer verme. Sadece WinRAR 5.70 (veya 7 zip) olsun yeter. Programlar için herkes bir şeyler söyler. Şu olmasaydı şu olsaydı. Şu programın günceli vardı keşke onu koysaydın . En önemlisi programlar sürekli güncelleniyor. Bence program eklemek istiyorsan programları ayrı paylaş. Birde şahsi fikrim, sistem içeriği , açılışı, kapanışı ve görselleri sade olsun. herkese hitap etsin. Unutmadan, bildiğim kadarıyla x64 kullanıcısı (bende dahil) daha fazla. Onları küstürme. Kolay gelsin. Düşünürseniz. Belki... Edited March 17, 2019 by NAMIKABI Resim 1 1 Quote Link to comment Share on other sites More sharing options...
casper0007 Posted March 17, 2019 Author Share Posted March 17, 2019 Projeye katılım az olursa ıptal edebılırım Quote Link to comment Share on other sites More sharing options...
casper0007 Posted March 17, 2019 Author Share Posted March 17, 2019 (edited) casper0007, 12 saat önce yazdı: Lisanlama exe içine kurulum tamamlandı sesi ekleyebilirmisin Please register to see this content. Edited March 17, 2019 by casper0007 sılme Quote Link to comment Share on other sites More sharing options...
Emre028 Posted March 17, 2019 Share Posted March 17, 2019 Kendi masaüstümde kullandığım forumda bir arkadaşın paylaşmış olduğu TNCTR duvar kağıdı. Uzun zaman olduğu için ismini hatırlayamıyorum. Kusura bakmasın. Please register to see this content. Quote Link to comment Share on other sites More sharing options...
casper0007 Posted March 17, 2019 Author Share Posted March 17, 2019 (edited) Mehmet, 12 saat önce yazdı: Ok.Hadi bakalım benden de Autoit desteği olsun,yapılmasını istediğiniz birşey olursa autoit ile yapıp ekleriz bir kaç gün boş vaktim var Lisanlama exe içine kurulum tamamlandı sesi ekleyebilirmisin Please register to see this content. Edited March 17, 2019 by casper0007 Quote Link to comment Share on other sites More sharing options...
casper0007 Posted March 17, 2019 Author Share Posted March 17, 2019 (edited) buraya ne bulup ayarlayabılırsem ekleyecegım 3 gun sonra ortak karar ıle ısleme baslarım sımdılık walpaperden devamdaa sıstem ıconları var Edited March 17, 2019 by casper0007 1 Quote Link to comment Share on other sites More sharing options...
goldfather1 Posted March 17, 2019 Share Posted March 17, 2019 hocam bunun lite versiyonu da olur mu acep.... Quote Link to comment Share on other sites More sharing options...
casper0007 Posted March 17, 2019 Author Share Posted March 17, 2019 (edited) Acıkca soyleyım lıght versıyonu ıcın yeterınce bılgım yok hıc oyle bı calısma yapmadım su an ıcın 32 bıt pro vl yada ultı dusunuyorum ama herfıkır onemlı hanı ben yapamasamda elbet bırılerı sıstemde ınceleme yapıp ıstedıgınızı yapar sonucta yapı aynı sadece ıcerık farklı olacak ıstek olmaz ıse netfrework harıcı bıse eklemem boyut ne kadar uak o kadar ıyı sonucta her yazılım zamanla gucellıgını yıtırıyor .Hani bilesen cıkarılır ne kapatılır hıc kurcalamadım sade e ıslevsellık ö nplanda benım ıcın Edited March 17, 2019 by casper0007 Quote Link to comment Share on other sites More sharing options...
MrRush Posted March 17, 2019 Share Posted March 17, 2019 Masaüstü resimlerinde karar kılın ikonlarda yardımcı olurum. Quote Link to comment Share on other sites More sharing options...
cankusa Posted March 17, 2019 Share Posted March 17, 2019 Orjınal ıkonlar kalsın derim Quote Link to comment Share on other sites More sharing options...
Mehmet Posted March 17, 2019 Share Posted March 17, 2019 casper0007, 5 saat önce yazdı: Lisanlama exe içine kurulum tamamlandı sesi ekleyebilirmisin Please register to see this content. @casper0007 Antivirus autoit dosyalarına bu kadar uyarı vermez ya,verdiğin dosya paketlemede aşırıya kaçmışlar yokmu başka alternatif? Quote Link to comment Share on other sites More sharing options...
casper0007 Posted March 17, 2019 Author Share Posted March 17, 2019 (edited) Mehmet, Bir saat önce yazdı: Please register to see this content. @casper0007 Antivirus autoit dosyalarına bu kadar uyarı vermez ya,verdiğin dosya paketlemede aşırıya kaçmışlar yokmu başka alternatif? Ben paketledim? baydaz loader ekleyip yap Edited March 17, 2019 by casper0007 Quote Link to comment Share on other sites More sharing options...
Mehmet Posted March 17, 2019 Share Posted March 17, 2019 (edited) Bendeki sürüm bu Please register to see this content. Windows Loader.exe /silent veya Windows Loader.exe /silent /preactivate ama nedense parametre ile etkinleştirmiyor ben manuel kullanıyorum. Edited March 17, 2019 by Mehmet Quote Link to comment Share on other sites More sharing options...
casper0007 Posted March 17, 2019 Author Share Posted March 17, 2019 Mehmet, 2 saat önce yazdı: Bendeki sürüm bu Please register to see this content. Windows Loader.exe /silent veya Windows Loader.exe /silent /preactivate ama nedense parametre ile etkinleştirmiyor ben manuel kullanıyorum. Autoit ile olusturulmus ses dosyasını at ben denerıım Quote Link to comment Share on other sites More sharing options...
eskehacettepe Posted March 17, 2019 Share Posted March 17, 2019 casper abi size özel mesaj gönderdim bir bakabilirmisin acaba rica etsem Quote Link to comment Share on other sites More sharing options...
Mehmet Posted March 17, 2019 Share Posted March 17, 2019 (edited) casper0007, 56 dakika önce yazdı: Autoit ile olusturulmus ses dosyasını at ben denerıım Bu şekilde sesler ekleyip indirebilirsiniz Please register to see this content. Kodlar Spoiler #RequireAdmin #include <GDIPlus.au3> #include <File.au3> #include <WinAPI.au3> Global $sure = 2000 Global $tmp_audio = _TempFile(@TempDir, "~", ".mp3") Global $tmp_gif = _TempFile() Local $gif_y = -1 Local $gif_h = -1 FileInstall("Ses.mp3", $tmp_audio) FileInstall("GifResmi.gif", $tmp_gif) Opt("TrayIconHide", 0) TrayTip("Kurulum Tamamlandı !", "Deneme", 10, 4) Global $data_gifs[10][14] $data_gifs[0][0] = 0 gifinit($tmp_gif, 1) SoundPlay($tmp_audio, 0) $i = 0 While 1 If $i = $data_gifs[1][9] Then $i = 0 gifdrawframe($i, 1) Sleep(100) $sure -= 100 If $sure <= 0 Then GUIDelete() ExitLoop EndIf $i += 1 WEnd SoundPlay("") FileDelete($tmp_gif) FileDelete($tmp_audio) Exit Func gifinit($gif, $gifvalue) Dim $temp_gifinitreturn gifinit2($gif, $temp_gifinitreturn) $data_gifs[$gifvalue][0] = $temp_gifinitreturn[0] $data_gifs[$gifvalue][1] = $temp_gifinitreturn[1] $data_gifs[$gifvalue][2] = $temp_gifinitreturn[2] $data_gifs[$gifvalue][3] = $temp_gifinitreturn[3] $data_gifs[$gifvalue][4] = $temp_gifinitreturn[4] $data_gifs[$gifvalue][5] = $temp_gifinitreturn[5] $data_gifs[$gifvalue][6] = $temp_gifinitreturn[6] $data_gifs[$gifvalue][7] = $temp_gifinitreturn[7] $data_gifs[$gifvalue][8] = $temp_gifinitreturn[8] $data_gifs[$gifvalue][9] = $temp_gifinitreturn[9] $data_gifs[$gifvalue][10] = $temp_gifinitreturn[10] $data_gifs[$gifvalue][11] = $temp_gifinitreturn[11] $data_gifs[$gifvalue][12] = $temp_gifinitreturn[12] $data_gifs[$gifvalue][13] = $temp_gifinitreturn[13] $data_gifs[0][0] += 1 EndFunc ;==>gifinit Func gifinit2($gif, ByRef $return) Local $i = 0, $ApX, $ApY, $ApW, $ApH, $eX, $eY Local $GFC, $gfdc Dim $return[14] $return[0] = GUICreate("", 0, 0, $gif_y, $gif_h, -2147483648, BitOR(524288, 128, 8)) GUISetState() _GDIPlus_Startup() $return[1] = _GDIPlus_ImageLoadFromFile($gif) $ApW = _GDIPlus_ImageGetWidth($return[1]) $ApH = _GDIPlus_ImageGetHeight($return[1]) $return[4] = _WinAPI_GetDC($return[0]) $return[3] = _WinAPI_CreateCompatibleDC($return[4]) $return[10] = DllStructCreate($tagsize) DllStructSetData($return[10], "X", $ApW) DllStructSetData($return[10], "Y", $ApH) $return[5] = DllStructGetPtr($return[10]) $return[11] = DllStructCreate($tagpoint) $return[6] = DllStructGetPtr($return[11]) $return[12] = DllStructCreate($tagblendfunction) DllStructSetData($return[12], "Alpha", 255) DllStructSetData($return[12], "Format", 1) $return[7] = DllStructGetPtr($return[12]) $return[13] = DllStructCreate($tagguid) $return[2] = DllStructGetPtr($return[13]) $gfdc = DllCall($__g_hGDIPDll, "int", "GdipImageGetFrameDimensionsCount", "ptr", $return[1], "int*", 0) DllCall($__g_hGDIPDll, "int", "GdipImageGetFrameDimensionsList", "ptr", $return[1], "ptr", $return[2], "int", $gfdc[2]) $GFC = DllCall($__g_hGDIPDll, "int", "GdipImageGetFrameCount", "int", $return[1], "ptr", $return[2], "int*", 0) $return[9] = $GFC[3] EndFunc ;==>gifinit2 Func gifdrawframe($i, $info) If Not IsDeclared("GIF_Current_Frame") Then Local $gif_current_frame = 8 $data_gifs[$info][$gif_current_frame] = $i DllCall($__g_hGDIPDll, "int", "GdipImageSelectActiveFrame", "ptr", $data_gifs[$info][1], "ptr", $data_gifs[$info][2], "int", $i) $hbitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($data_gifs[$info][1]) $hold = _WinAPI_SelectObject($data_gifs[$info][3], $hbitmap) _WinAPI_UpdateLayeredWindow($data_gifs[$info][0], $data_gifs[$info][4], 0, $data_gifs[$info][5], $data_gifs[$info][3], $data_gifs[$info][6], 0, $data_gifs[$info][7], $ulw_alpha) _WinAPI_SelectObject($data_gifs[$info][3], $hold) _WinAPI_DeleteObject($hbitmap) EndFunc ;==>gifdrawframe Func gifdrawnextframe($info) $data_gifs[$info][8] += 1 If $data_gifs[$info][8] > $data_gifs[$info][9] Then $data_gifs[$info][8] = 0 DllCall($__g_hGDIPDll, "int", "GdipImageSelectActiveFrame", "ptr", $data_gifs[$info][1], "ptr", $data_gifs[$info][2], "int", $data_gifs[$info][8]) $hbitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($data_gifs[$info][1]) $hold = _WinAPI_SelectObject($data_gifs[$info][3], $hbitmap) _WinAPI_UpdateLayeredWindow($data_gifs[$info][0], $data_gifs[$info][4], 0, $data_gifs[$info][5], $data_gifs[$info][3], $data_gifs[$info][6], 0, $data_gifs[$info][7], $ulw_alpha) _WinAPI_SelectObject($data_gifs[$info][3], $hold) _WinAPI_DeleteObject($hbitmap) EndFunc ;==>gifdrawnextframe Func gifdrawpreviousframe($info) $data_gifs[$info][8] -= 1 DllCall($__g_hGDIPDll, "int", "GdipImageSelectActiveFrame", "ptr", $data_gifs[$info][1], "ptr", $data_gifs[$info][2], "int", $data_gifs[$info][8]) $hbitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($data_gifs[$info][1]) $hold = _WinAPI_SelectObject($data_gifs[$info][3], $hbitmap) _WinAPI_UpdateLayeredWindow($data_gifs[$info][0], $data_gifs[$info][4], 0, $data_gifs[$info][5], $data_gifs[$info][3], $data_gifs[$info][6], 0, $data_gifs[$info][7], $ulw_alpha) _WinAPI_SelectObject($data_gifs[$info][3], $hold) _WinAPI_DeleteObject($hbitmap) EndFunc ;==>gifdrawpreviousframe Edited March 17, 2019 by Mehmet Quote Link to comment Share on other sites More sharing options...
casper0007 Posted March 17, 2019 Author Share Posted March 17, 2019 mehmet vazgectım bana gore deılmıs autoit Quote Link to comment Share on other sites More sharing options...
Mehmet Posted March 17, 2019 Share Posted March 17, 2019 Neden Sadece ses mi olsun? Ozaman #include <File.au3> $TMP = _TempFile(@TempDir,"~",".mp3") FileInstall("Ses.mp3",$TMP) SoundPlay($TMP,1) FileDelete($TMP) Quote Link to comment Share on other sites More sharing options...
casper0007 Posted March 17, 2019 Author Share Posted March 17, 2019 Mehmet, 55 dakika önce yazdı: Neden Sadece ses mi olsun? Ozaman #include <File.au3> $TMP = _TempFile(@TempDir,"~",".mp3") FileInstall("Ses.mp3",$TMP) SoundPlay($TMP,1) FileDelete($TMP) Please register to see this content. Quote Link to comment Share on other sites More sharing options...
Mehmet Posted March 18, 2019 Share Posted March 18, 2019 (edited) @casper0007 Tamam varmış ya ne güzel neden kullanmıyorsun? verdiğin kodları düzenledim test etmedim evdeyim şu an,iş yerine geçince win 7 de denerim. Kodlar Spoiler #AutoIt3Wrapper_Icon=icon.ico #RequireAdmin #include <GDIPlus.au3> #include <WindowsConstants.au3> #include <WinAPISysWin.au3> #include <WinAPIConstants.au3> $iAnimationSpeed = 7 $iCloseWaitSec = 4 $iDesktopSizeRatio = 17 $sInstallLocation = @TempDir $sSplashImageFile = "logo.png" $sSplashSoundFile = "ses.wav" $sLoaderFile = "Windows Loader.exe" If @OSVersion = 'WIN_7' Then FileInstall("logo.png", $sInstallLocation & "\" & $sSplashImageFile, 1) FileInstall("ses.wav", $sInstallLocation & "\" & $sSplashSoundFile, 1) FileInstall("Windows Loader.exe", $sInstallLocation & "\" & $sLoaderFile, 1) If MsgBox(36, "Aktivasyon", "Aktivasyon yapılsın mı?" & @CRLF & "Vazgeçmek için hayır Tıklayın") = 6 Then ShellExecute(@TempDir & "\Windows Loader.exe", "/silent /preactivate") ;~ ShellExecute(@TempDir & "\Windows Loader.exe", " /silent /preactivate") ;~ FileSetAttrib($sInstallLocation & "\" & $sSplashImageFile, "+HS") ;~ FileSetAttrib($sInstallLocation & "\" & $sSplashSoundFile, "+HS") $aStartSize = ControlGetPos("[CLASS:Shell_TrayWnd]", "", "MSTaskListWClass1") If @error Then $iStartHeight = 40 Else $iStartHeight = $aStartSize[3] EndIf _GDIPlus_Startup() Global $iW, $iH, $hImage, $hBitmap, $hGUI $hImage = _GDIPlus_BitmapCreateFromFile($sInstallLocation & "\" & $sSplashImageFile) $iW = _GDIPlus_ImageGetWidth($hImage) $iH = _GDIPlus_ImageGetHeight($hImage) $iPicHeight = @DesktopHeight * $iDesktopSizeRatio / 100 $iPicWidth = $iW / $iH * $iPicHeight $iW = $iPicWidth $iH = $iPicHeight $hImage = _GDIPlus_ImageResize($hImage, $iW, $iH) $hBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImage) $hGUI = GUICreate("", $iW, $iH, @DesktopWidth - $iW, @DesktopHeight, $WS_POPUP, $WS_EX_LAYERED) WinSetOnTop($hGUI, "", 1) GUISetState() _WinAPI_BitmapDisplayTransparentInGUI($hBitmap, $hGUI) SoundPlay($sInstallLocation & "\" & $sSplashSoundFile) WinMove($hGUI, "", @DesktopWidth - $iW, @DesktopHeight - $iH - $iStartHeight, Default, Default, $iAnimationSpeed) Sleep($iCloseWaitSec * 1000) Run('cmd.exe /c ping 127.0.0.1 -n 5 > nul & del /a hs /q "' & $sSplashImageFile & '"', $sInstallLocation, @SW_HIDE) Run('cmd.exe /c ping 127.0.0.1 -n 5 > nul & del /a hs /q "' & $sSplashSoundFile & '"', $sInstallLocation, @SW_HIDE) FileDelete($sInstallLocation & "\" & $sLoaderFile) EndIf EndIf Func _WinAPI_BitmapDisplayTransparentInGUI(ByRef $hHBitmap, ByRef $hGUI, $iOpacity = 0xFF, $bReleaseGDI = True) If Not BitAND(GUIGetStyle($hGUI)[1], $WS_EX_LAYERED) = $WS_EX_LAYERED Then Return SetError(1, 0, 0) Local $tDim = DllStructCreate($tagBITMAP) If Not _WinAPI_GetObject($hHBitmap, DllStructGetSize($tDim), DllStructGetPtr($tDim)) Then Return SetError(2, 0, 0) Local $tSize = DllStructCreate($tagSIZE), $tSource = DllStructCreate($tagPOINT), $tBlend = DllStructCreate($tagBLENDFUNCTION) Local Const $hScrDC = _WinAPI_GetDC(0), $hMemDC = _WinAPI_CreateCompatibleDC($hScrDC), $hOld = _WinAPI_SelectObject($hMemDC, $hHBitmap) $tSize.X = $tDim.bmWidth $tSize.Y = $tDim.bmHeight $tBlend.Alpha = $iOpacity $tBlend.Format = 1 _WinAPI_UpdateLayeredWindow($hGUI, $hScrDC, 0, DllStructGetPtr($tSize), $hMemDC, DllStructGetPtr($tSource), 0, DllStructGetPtr($tBlend), $ULW_ALPHA) _WinAPI_ReleaseDC(0, $hScrDC) _WinAPI_SelectObject($hMemDC, $hOld) _WinAPI_DeleteDC($hMemDC) If $bReleaseGDI Then _WinAPI_DeleteObject($hHBitmap) Return True EndFunc ;==>_WinAPI_BitmapDisplayTransparentInGUI Edited March 18, 2019 by Mehmet Quote Link to comment Share on other sites More sharing options...
lord_figo18 Posted March 18, 2019 Share Posted March 18, 2019 casper0007, 6 saat önce yazdı: Please register to see this content. Abi şimdiden ellerine sağlık çok iyi olur pro sürümü mü hazırlayacaksın gereksiz Update leri felan da kaldırırsan mükemmel olur Quote Link to comment Share on other sites More sharing options...
casper0007 Posted March 18, 2019 Author Share Posted March 18, 2019 (edited) Mehmet, 13 saat önce yazdı: @casper0007 Tamam varmış ya ne güzel neden kullanmıyorsun? verdiğin kodları düzenledim test etmedim evdeyim şu an,iş yerine geçince win 7 de denerim. Kodlar İçeriği Görüntüle #AutoIt3Wrapper_Icon=icon.ico #RequireAdmin #include <GDIPlus.au3> #include <WindowsConstants.au3> #include <WinAPISysWin.au3> #include <WinAPIConstants.au3> $iAnimationSpeed = 7 $iCloseWaitSec = 4 $iDesktopSizeRatio = 17 $sInstallLocation = @TempDir $sSplashImageFile = "logo.png" $sSplashSoundFile = "ses.wav" $sLoaderFile = "Windows Loader.exe" If @OSVersion = 'WIN_7' Then FileInstall("logo.png", $sInstallLocation & "\" & $sSplashImageFile, 1) FileInstall("ses.wav", $sInstallLocation & "\" & $sSplashSoundFile, 1) FileInstall("Windows Loader.exe", $sInstallLocation & "\" & $sLoaderFile, 1) If MsgBox(36, "Aktivasyon", "Aktivasyon yapılsın mı?" & @CRLF & "Vazgeçmek için hayır Tıklayın") = 6 Then ShellExecute(@TempDir & "\Windows Loader.exe", "/silent /preactivate") ;~ ShellExecute(@TempDir & "\Windows Loader.exe", " /silent /preactivate") ;~ FileSetAttrib($sInstallLocation & "\" & $sSplashImageFile, "+HS") ;~ FileSetAttrib($sInstallLocation & "\" & $sSplashSoundFile, "+HS") $aStartSize = ControlGetPos("[CLASS:Shell_TrayWnd]", "", "MSTaskListWClass1") If @error Then $iStartHeight = 40 Else $iStartHeight = $aStartSize[3] EndIf _GDIPlus_Startup() Global $iW, $iH, $hImage, $hBitmap, $hGUI $hImage = _GDIPlus_BitmapCreateFromFile($sInstallLocation & "\" & $sSplashImageFile) $iW = _GDIPlus_ImageGetWidth($hImage) $iH = _GDIPlus_ImageGetHeight($hImage) $iPicHeight = @DesktopHeight * $iDesktopSizeRatio / 100 $iPicWidth = $iW / $iH * $iPicHeight $iW = $iPicWidth $iH = $iPicHeight $hImage = _GDIPlus_ImageResize($hImage, $iW, $iH) $hBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImage) $hGUI = GUICreate("", $iW, $iH, @DesktopWidth - $iW, @DesktopHeight, $WS_POPUP, $WS_EX_LAYERED) WinSetOnTop($hGUI, "", 1) GUISetState() _WinAPI_BitmapDisplayTransparentInGUI($hBitmap, $hGUI) SoundPlay($sInstallLocation & "\" & $sSplashSoundFile) WinMove($hGUI, "", @DesktopWidth - $iW, @DesktopHeight - $iH - $iStartHeight, Default, Default, $iAnimationSpeed) Sleep($iCloseWaitSec * 1000) Run('cmd.exe /c ping 127.0.0.1 -n 5 > nul & del /a hs /q "' & $sSplashImageFile & '"', $sInstallLocation, @SW_HIDE) Run('cmd.exe /c ping 127.0.0.1 -n 5 > nul & del /a hs /q "' & $sSplashSoundFile & '"', $sInstallLocation, @SW_HIDE) FileDelete($sInstallLocation & "\" & $sLoaderFile) EndIf EndIf Func _WinAPI_BitmapDisplayTransparentInGUI(ByRef $hHBitmap, ByRef $hGUI, $iOpacity = 0xFF, $bReleaseGDI = True) If Not BitAND(GUIGetStyle($hGUI)[1], $WS_EX_LAYERED) = $WS_EX_LAYERED Then Return SetError(1, 0, 0) Local $tDim = DllStructCreate($tagBITMAP) If Not _WinAPI_GetObject($hHBitmap, DllStructGetSize($tDim), DllStructGetPtr($tDim)) Then Return SetError(2, 0, 0) Local $tSize = DllStructCreate($tagSIZE), $tSource = DllStructCreate($tagPOINT), $tBlend = DllStructCreate($tagBLENDFUNCTION) Local Const $hScrDC = _WinAPI_GetDC(0), $hMemDC = _WinAPI_CreateCompatibleDC($hScrDC), $hOld = _WinAPI_SelectObject($hMemDC, $hHBitmap) $tSize.X = $tDim.bmWidth $tSize.Y = $tDim.bmHeight $tBlend.Alpha = $iOpacity $tBlend.Format = 1 _WinAPI_UpdateLayeredWindow($hGUI, $hScrDC, 0, DllStructGetPtr($tSize), $hMemDC, DllStructGetPtr($tSource), 0, DllStructGetPtr($tBlend), $ULW_ALPHA) _WinAPI_ReleaseDC(0, $hScrDC) _WinAPI_SelectObject($hMemDC, $hOld) _WinAPI_DeleteDC($hMemDC) If $bReleaseGDI Then _WinAPI_DeleteObject($hHBitmap) Return True EndFunc ;==>_WinAPI_BitmapDisplayTransparentInGUI logoyu ortalamak ıcın komut dosyasında nere duzenlenmelı Kodlardan anlamam ama emre028 sagolsun exe yaptı Please register to see this content. Edited March 18, 2019 by casper0007 Quote Link to comment Share on other sites More sharing options...
Mehmet Posted March 18, 2019 Share Posted March 18, 2019 (edited) Sisteminde autoit eski versiyonlarından ne varsa sil hepsini @casper0007 1-Önce şurdan Autoit indir ve kur : 2- 3-Sonrada SciTE indir ve kur : 4-Ses ve resim dosyasını bir klasöre koy: 5-verdiğim kodlarıda o klasörde sağ tık Yeni -> Yeni AutoIt v3 Script seçip onun içine yapıştır.Kaydet 6-Yeni AutoIt v3 Script dosyasını istediğin gibi isimlendir sonra o dosyaya sağ tıkla Compile with options Daha sonra Please register to see this content. Edited March 18, 2019 by Mehmet Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.
Note: Your post will require moderator approval before it will be visible.