korasoglu Posted May 23, 2012 Share Posted May 23, 2012 (edited) Evet böyle bir şey teşekkür ederim. Konuya biraz geç baktım fakat işleriniz yoğun galiba cevap gelmeyince bakmamıştım. Edit : Hocam bu resmin kenarları mavi ve o alan gözükmüyor. Resmi resim görüntüleme programıyla açtığımız zaman mavilik var ama bu uygulamada gözükmüyor. Hani ayrıyeten bir mask katmanlı resim göstermiyoruz, veya png-gif değil mavi olan alanlar boş olsa o da değil böyle olunca benim açımdan ilginç Edit 2 : Ben kendim photoshopta iki katman oluşturdum alt katman sade beyaz üst katman sizinkinin tersi 300x300 yuvarlak bmp Test.bmp ile değiştirdim aynen sedece oval kısım gözüktü. Edited May 23, 2012 by korasoglu Quote Link to comment Share on other sites More sharing options...
Byogulcan Posted May 23, 2012 Author Share Posted May 23, 2012 [quote name='korasoglu' date='23 May 2012 - 22:20 ' timestamp='1337804430' post='1204300'] Evet böyle bir şey teşekkür ederim. Konuya biraz geç baktım fakat işleriniz yoğun galiba cevap gelmeyince bakmamıştım. Edit : Hocam bu resmin kenarları mavi ve o alan gözükmüyor. Resmi resim görüntüleme programıyla açtığımız zaman mavilik var ama bu uygulamada gözükmüyor. Hani ayrıyeten bir mask katmanlı resim göstermiyoruz, veya png-gif değil mavi olan alanlar boş olsa o da değil böyle olunca benim açımdan ilginç Edit 2 : Ben kendim photoshopta iki katman oluşturdum alt katman sade beyaz üst katman sizinkinin tersi 300x300 yuvarlak bmp Test.bmp ile değiştirdim aynen sedece oval kısım gözüktü. [/quote] bi bak istersen [spoiler]http://ogulcanolcer.net/kullandigim-traytip-photshop-tasarimi/[/spoiler] Quote Link to comment Share on other sites More sharing options...
mesale0077 Posted May 24, 2012 Share Posted May 24, 2012 merhaba şeffaf bmp yapımı nasıl oluyor gimp programından şeffaf bmp yapamadım yada farklı bir yöntem varmı? [quote]@MAKINCI buradada belirtildiği gibi sanırım desteklemez png ama udflerle çalışırsan belki gerekli açıklamalar yapılmış galiba aynı özelliği ytaşıyor bende direk png kullanmak isterdim ama olmuyor mecburen gimp programından şeffaf bmp yapıyorum kendime bu gibi çalışmalarda Linkleri Kontrol Et http://www.tnctr.com/topic/199267- [/quote] Quote Link to comment Share on other sites More sharing options...
DivaneTR Posted May 24, 2012 Share Posted May 24, 2012 [b]Bitmap şeffaf olmaz. Sadece düz bir renkte arkaplan koyarsın. Program onları gözardı eder.[/b] Quote Link to comment Share on other sites More sharing options...
MAKINCI Posted June 15, 2012 Share Posted June 15, 2012 [quote name='blue_life' date='25 April 2012 - 11:09 ' timestamp='1335341343' post='1191978'] @MAKINCI Aşağıdaki gibi bir şey mi istiyorsun? [codebox]#NoTrayIcon #include <WindowsConstants.au3> #include <GuiConstantsEx.au3> #include <GDIPlus.au3> Opt("GUICloseOnESC", 0) ;Esc tuşuyla kapanmasını engellemek için Global $Resim = __TempFile(".png") Global $MP3 = __TempFile(".mp3") FileInstall("Resim.png", $Resim, 1) ;Resmi autoit içine alalım FileInstall("Muzik.mp3", $MP3, 1) ;MP3ü autoit içine alalım If FileExists($MP3) = 1 Then SoundPlay($MP3, 0) Global $ResW, $ResH _My_Gui(5000) FileDelete($Resim) FileDelete($MP3) Exit Func SetBitmap($hGUI, $hImage, $iOpacity) Local $hScrDC, $hMemDC, $hBitmap, $hOld, $pSize, $tSize, $pSource, $tSource, $pBlend, $tBlend $hScrDC = _WinAPI_GetDC(0) $hMemDC = _WinAPI_CreateCompatibleDC($hScrDC) $hBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImage) $hOld = _WinAPI_SelectObject($hMemDC, $hBitmap) $tSize = DllStructCreate($tagSIZE) $pSize = DllStructGetPtr($tSize) $ResW = _GDIPlus_ImageGetWidth($hImage) $ResH = _GDIPlus_ImageGetHeight($hImage) DllStructSetData($tSize, "X", $ResW) DllStructSetData($tSize, "Y", $ResH) $tSource = DllStructCreate($tagPOINT) $pSource = DllStructGetPtr($tSource) $tBlend = DllStructCreate($tagBLENDFUNCTION) $pBlend = DllStructGetPtr($tBlend) DllStructSetData($tBlend, "Alpha", $iOpacity) DllStructSetData($tBlend, "Format", 1) _WinAPI_UpdateLayeredWindow($hGUI, $hScrDC, 0, $pSize, $hMemDC, $pSource, 0, $pBlend, $ULW_ALPHA) _WinAPI_ReleaseDC(0, $hScrDC) _WinAPI_SelectObject($hMemDC, $hOld) _WinAPI_DeleteObject($hBitmap) _WinAPI_DeleteDC($hMemDC) EndFunc ;==>SetBitmap Func _My_Gui($Slep = 5000) Local $yGUI = GUICreate("", 1, 1, 0, 0, $WS_POPUP, BitOR($WS_EX_LAYERED, $WS_EX_TOOLWINDOW, $WS_EX_TOPMOST)) _GDIPlus_Startup() Local $yImage = _GDIPlus_ImageLoadFromFile($Resim) SetBitMap($yGUI, $yImage, 5) Local $Gui_X = @DesktopWidth - ($ResW + 5) Local $Gui_Y = @DesktopHeight - ($ResH + 5) Local $Shell_Pos = WinGetHandle("[CLASS:Shell_TrayWnd]") ;CLASS:Progman If $Shell_Pos <> "" Then $Shell_Pos = WinGetPos($Shell_Pos) If UBound($Shell_Pos) = 4 Then If $Shell_Pos[1] < 1 Then If $Shell_Pos[0] > 0 Then $Gui_X = @DesktopWidth - ($Shell_Pos[2] + ($ResW + 5)) Else If $Shell_Pos[0] < 1 Then $Gui_Y = @DesktopHeight - ($Shell_Pos[3] + ($ResH + 5)) EndIf EndIf EndIf WinMove($yGUI, "", $Gui_X, $Gui_Y, $ResW, $ResH) GUISetState(@SW_SHOW) For $I = 10 To 225 Step 5 SetBitMap($yGUI, $yImage, $I) Sleep(25) Next Sleep($Slep) ;Sleep For $I = 225 To 5 Step -5 SetBitMap($yGUI, $yImage, $I) Sleep(10) Next EndFunc ;==>_My_Gui Func __TempFile($s_FileExtension = ".tmp", $s_DirectoryName = @TempDir, $s_FilePrefix = "~", $i_RandomLength = 7) ; Check parameters If IsKeyword($s_FilePrefix) Then $s_FilePrefix = "~" If IsKeyword($s_FileExtension) Then $s_FileExtension = ".tmp" If IsKeyword($i_RandomLength) Then $i_RandomLength = 7 If Not FileExists($s_DirectoryName) Then $s_DirectoryName = @TempDir ; First reset to default temp dir If Not FileExists($s_DirectoryName) Then $s_DirectoryName = @ScriptDir ; Still wrong then set to Scriptdir ; add trailing \ for directory name If StringRight($s_DirectoryName, 1) <> "\" Then $s_DirectoryName = $s_DirectoryName & "\" ; Local $s_TempName Do $s_TempName = "" While StringLen($s_TempName) < $i_RandomLength $s_TempName = $s_TempName & Chr(Random(97, 122, 1)) WEnd $s_TempName = $s_DirectoryName & $s_FilePrefix & $s_TempName & $s_FileExtension Until Not FileExists($s_TempName) Return $s_TempName EndFunc ;==>__TempFile[/codebox] [/quote] [b]Hocam bu kodlara göre FileDelete($Resim) dememize rağmen resimi tempten silmiyor nedendir acaba?[/b] Quote Link to comment Share on other sites More sharing options...
zamaneberduşu Posted June 15, 2012 Share Posted June 15, 2012 [quote name='blue_life' date='25 April 2012 - 08:09 ' timestamp='1335341343' post='1191978'] @MAKINCI Aşağıdaki gibi bir şey mi istiyorsun? [codebox]#NoTrayIcon #include <WindowsConstants.au3> #include <GuiConstantsEx.au3> #include <GDIPlus.au3> Opt("GUICloseOnESC", 0) ;Esc tuşuyla kapanmasını engellemek için Global $Resim = __TempFile(".png") Global $MP3 = __TempFile(".mp3") FileInstall("Resim.png", $Resim, 1) ;Resmi autoit içine alalım FileInstall("Muzik.mp3", $MP3, 1) ;MP3ü autoit içine alalım If FileExists($MP3) = 1 Then SoundPlay($MP3, 0) Global $ResW, $ResH _My_Gui(5000) FileDelete($Resim) FileDelete($MP3) Exit Func SetBitmap($hGUI, $hImage, $iOpacity) Local $hScrDC, $hMemDC, $hBitmap, $hOld, $pSize, $tSize, $pSource, $tSource, $pBlend, $tBlend $hScrDC = _WinAPI_GetDC(0) $hMemDC = _WinAPI_CreateCompatibleDC($hScrDC) $hBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImage) $hOld = _WinAPI_SelectObject($hMemDC, $hBitmap) $tSize = DllStructCreate($tagSIZE) $pSize = DllStructGetPtr($tSize) $ResW = _GDIPlus_ImageGetWidth($hImage) $ResH = _GDIPlus_ImageGetHeight($hImage) DllStructSetData($tSize, "X", $ResW) DllStructSetData($tSize, "Y", $ResH) $tSource = DllStructCreate($tagPOINT) $pSource = DllStructGetPtr($tSource) $tBlend = DllStructCreate($tagBLENDFUNCTION) $pBlend = DllStructGetPtr($tBlend) DllStructSetData($tBlend, "Alpha", $iOpacity) DllStructSetData($tBlend, "Format", 1) _WinAPI_UpdateLayeredWindow($hGUI, $hScrDC, 0, $pSize, $hMemDC, $pSource, 0, $pBlend, $ULW_ALPHA) _WinAPI_ReleaseDC(0, $hScrDC) _WinAPI_SelectObject($hMemDC, $hOld) _WinAPI_DeleteObject($hBitmap) _WinAPI_DeleteDC($hMemDC) EndFunc ;==>SetBitmap Func _My_Gui($Slep = 5000) Local $yGUI = GUICreate("", 1, 1, 0, 0, $WS_POPUP, BitOR($WS_EX_LAYERED, $WS_EX_TOOLWINDOW, $WS_EX_TOPMOST)) _GDIPlus_Startup() Local $yImage = _GDIPlus_ImageLoadFromFile($Resim) SetBitMap($yGUI, $yImage, 5) Local $Gui_X = @DesktopWidth - ($ResW + 5) Local $Gui_Y = @DesktopHeight - ($ResH + 5) Local $Shell_Pos = WinGetHandle("[CLASS:Shell_TrayWnd]") ;CLASS:Progman If $Shell_Pos <> "" Then $Shell_Pos = WinGetPos($Shell_Pos) If UBound($Shell_Pos) = 4 Then If $Shell_Pos[1] < 1 Then If $Shell_Pos[0] > 0 Then $Gui_X = @DesktopWidth - ($Shell_Pos[2] + ($ResW + 5)) Else If $Shell_Pos[0] < 1 Then $Gui_Y = @DesktopHeight - ($Shell_Pos[3] + ($ResH + 5)) EndIf EndIf EndIf WinMove($yGUI, "", $Gui_X, $Gui_Y, $ResW, $ResH) GUISetState(@SW_SHOW) For $I = 10 To 225 Step 5 SetBitMap($yGUI, $yImage, $I) Sleep(25) Next Sleep($Slep) ;Sleep For $I = 225 To 5 Step -5 SetBitMap($yGUI, $yImage, $I) Sleep(10) Next EndFunc ;==>_My_Gui Func __TempFile($s_FileExtension = ".tmp", $s_DirectoryName = @TempDir, $s_FilePrefix = "~", $i_RandomLength = 7) ; Check parameters If IsKeyword($s_FilePrefix) Then $s_FilePrefix = "~" If IsKeyword($s_FileExtension) Then $s_FileExtension = ".tmp" If IsKeyword($i_RandomLength) Then $i_RandomLength = 7 If Not FileExists($s_DirectoryName) Then $s_DirectoryName = @TempDir ; First reset to default temp dir If Not FileExists($s_DirectoryName) Then $s_DirectoryName = @ScriptDir ; Still wrong then set to Scriptdir ; add trailing \ for directory name If StringRight($s_DirectoryName, 1) <> "\" Then $s_DirectoryName = $s_DirectoryName & "\" ; Local $s_TempName Do $s_TempName = "" While StringLen($s_TempName) < $i_RandomLength $s_TempName = $s_TempName & Chr(Random(97, 122, 1)) WEnd $s_TempName = $s_DirectoryName & $s_FilePrefix & $s_TempName & $s_FileExtension Until Not FileExists($s_TempName) Return $s_TempName EndFunc ;==>__TempFile[/codebox] [/quote] budur işte Quote Link to comment Share on other sites More sharing options...
mesale0077 Posted June 16, 2012 Share Posted June 16, 2012 @MAKINCI arkadaşım bu şekil dene bence sorun çözülecektir. [code]#include <WindowsConstants.au3> #include <GuiConstantsEx.au3> #include <GDIPlus.au3> Opt("GUICloseOnESC", 0) ;Esc tuşuyla kapanmasını engellemek için Global $Resim = __TempFile(".png") Global $MP3 = __TempFile(".mp3") FileInstall("Resim.png", $Resim, 1) ;Resmi autoit içine alalım FileInstall("Muzik.mp3", $MP3, 1) ;MP3ü autoit içine alalım If FileExists($MP3) = 1 Then SoundPlay($MP3, 0) Global $ResW, $ResH _My_Gui(5000) FileDelete($Resim) FileDelete($MP3) Exit Func SetBitmap($hGUI, $hImage, $iOpacity) Local $hScrDC, $hMemDC, $hBitmap, $hOld, $pSize, $tSize, $pSource, $tSource, $pBlend, $tBlend $hScrDC = _WinAPI_GetDC(0) $hMemDC = _WinAPI_CreateCompatibleDC($hScrDC) $hBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImage) $hOld = _WinAPI_SelectObject($hMemDC, $hBitmap) $tSize = DllStructCreate($tagSIZE) $pSize = DllStructGetPtr($tSize) $ResW = _GDIPlus_ImageGetWidth($hImage) $ResH = _GDIPlus_ImageGetHeight($hImage) DllStructSetData($tSize, "X", $ResW) DllStructSetData($tSize, "Y", $ResH) $tSource = DllStructCreate($tagPOINT) $pSource = DllStructGetPtr($tSource) $tBlend = DllStructCreate($tagBLENDFUNCTION) $pBlend = DllStructGetPtr($tBlend) DllStructSetData($tBlend, "Alpha", $iOpacity) DllStructSetData($tBlend, "Format", 1) _WinAPI_UpdateLayeredWindow($hGUI, $hScrDC, 0, $pSize, $hMemDC, $pSource, 0, $pBlend, $ULW_ALPHA) _WinAPI_ReleaseDC(0, $hScrDC) _WinAPI_SelectObject($hMemDC, $hOld) _WinAPI_DeleteObject($hBitmap) _WinAPI_DeleteDC($hMemDC) EndFunc ;==>SetBitmap Func _My_Gui($Slep = 5000) Local $yGUI = GUICreate("", 1, 1, 0, 0, $WS_POPUP, BitOR($WS_EX_LAYERED, $WS_EX_TOOLWINDOW, $WS_EX_TOPMOST)) _GDIPlus_Startup() Local $yImage = _GDIPlus_ImageLoadFromFile($Resim) SetBitMap($yGUI, $yImage, 5) Local $Gui_X = @DesktopWidth - ($ResW + 5) Local $Gui_Y = @DesktopHeight - ($ResH + 5) Local $Shell_Pos = WinGetHandle("[CLASS:Shell_TrayWnd]") ;CLASS:Progman If $Shell_Pos <> "" Then $Shell_Pos = WinGetPos($Shell_Pos) If UBound($Shell_Pos) = 4 Then If $Shell_Pos[1] < 1 Then If $Shell_Pos[0] > 0 Then $Gui_X = @DesktopWidth - ($Shell_Pos[2] + ($ResW + 5)) Else If $Shell_Pos[0] < 1 Then $Gui_Y = @DesktopHeight - ($Shell_Pos[3] + ($ResH + 5)) EndIf EndIf EndIf WinMove($yGUI, "", $Gui_X, $Gui_Y, $ResW, $ResH) GUISetState(@SW_SHOW) For $I = 10 To 225 Step 5 SetBitMap($yGUI, $yImage, $I) Sleep(25) Next Sleep($Slep) ;Sleep For $I = 225 To 5 Step -5 SetBitMap($yGUI, $yImage, $I) Sleep(10) Next _GDIPlus_ImageDispose($yImage) _GDIPlus_Shutdown() EndFunc ;==>_My_Gui Func __TempFile($s_FileExtension = ".tmp", $s_DirectoryName = @TempDir, $s_FilePrefix = "~", $i_RandomLength = 7) ; Check parameters If IsKeyword($s_FilePrefix) Then $s_FilePrefix = "~" If IsKeyword($s_FileExtension) Then $s_FileExtension = ".tmp" If IsKeyword($i_RandomLength) Then $i_RandomLength = 7 If Not FileExists($s_DirectoryName) Then $s_DirectoryName = @TempDir ; First reset to default temp dir If Not FileExists($s_DirectoryName) Then $s_DirectoryName = @ScriptDir ; Still wrong then set to Scriptdir ; add trailing \ for directory name If StringRight($s_DirectoryName, 1) <> "\" Then $s_DirectoryName = $s_DirectoryName & "\" ; Local $s_TempName Do $s_TempName = "" While StringLen($s_TempName) < $i_RandomLength $s_TempName = $s_TempName & Chr(Random(97, 122, 1)) WEnd $s_TempName = $s_DirectoryName & $s_FilePrefix & $s_TempName & $s_FileExtension Until Not FileExists($s_TempName) Return $s_TempName EndFunc ;==>__TempFile [/code] Quote Link to comment Share on other sites More sharing options...
korasoglu Posted August 2, 2012 Share Posted August 2, 2012 Sevgili BlueLife çalışmadaki logo.png iniden nasıl çalıştırabiliriz. Yani Dosya ismini iiden alacak Quote Link to comment Share on other sites More sharing options...
blue_life Posted August 2, 2012 Share Posted August 2, 2012 @korasoglu O zaman resim,müzik ve ini dosyası, oluşturduğun autoit exesinin yanında olacak. Isimleri ini dosyasından belirleyebilirsin. [codebox]#NoTrayIcon #include <WindowsConstants.au3> #include <GuiConstantsEx.au3> #include <GDIPlus.au3> Opt("GUICloseOnESC", 0) ;Esc tuşuyla kapanmasını engellemek için Global $ScriptDir = @ScriptDir If StringRight($ScriptDir, 1) <> "\" Then $ScriptDir &= "\" Global $ConfigFile = StringTrimRight(@ScriptFullPath,3) & ".ini" Global $Resim = _Ini_Read_Write($ConfigFile,"Options","Resim","Resim.png") Global $MP3 = _Ini_Read_Write($ConfigFile,"Options","MP3","Muzik.mp3") If FileExists($ScriptDir & $Resim) = 1 Then $Resim = $ScriptDir & $Resim If FileExists($ScriptDir & $MP3) = 1 Then $MP3 = $ScriptDir & $MP3 If FileExists($MP3) = 1 Then SoundPlay($MP3, 0) Global $ResW, $ResH _My_Gui(5000) ;~ FileDelete($Resim) ;~ FileDelete($MP3) Exit Func _Ini_Read_Write($IniFile,$Sec,$Key,$Val = "") Local $Ini_Read = IniRead($IniFile,$Sec,$Key,@LF) If $Ini_Read = @LF Then $Ini_Read = $Val IniWrite($IniFile,$Sec,$Key,$Val) EndIf Return $Ini_Read EndFunc Func SetBitmap($hGUI, $hImage, $iOpacity) Local $hScrDC, $hMemDC, $hBitmap, $hOld, $pSize, $tSize, $pSource, $tSource, $pBlend, $tBlend $hScrDC = _WinAPI_GetDC(0) $hMemDC = _WinAPI_CreateCompatibleDC($hScrDC) $hBitmap = _GDIPlus_BitmapCreateHBITMAPFromBitmap($hImage) $hOld = _WinAPI_SelectObject($hMemDC, $hBitmap) $tSize = DllStructCreate($tagSIZE) $pSize = DllStructGetPtr($tSize) $ResW = _GDIPlus_ImageGetWidth($hImage) $ResH = _GDIPlus_ImageGetHeight($hImage) DllStructSetData($tSize, "X", $ResW) DllStructSetData($tSize, "Y", $ResH) $tSource = DllStructCreate($tagPOINT) $pSource = DllStructGetPtr($tSource) $tBlend = DllStructCreate($tagBLENDFUNCTION) $pBlend = DllStructGetPtr($tBlend) DllStructSetData($tBlend, "Alpha", $iOpacity) DllStructSetData($tBlend, "Format", 1) _WinAPI_UpdateLayeredWindow($hGUI, $hScrDC, 0, $pSize, $hMemDC, $pSource, 0, $pBlend, $ULW_ALPHA) _WinAPI_ReleaseDC(0, $hScrDC) _WinAPI_SelectObject($hMemDC, $hOld) _WinAPI_DeleteObject($hBitmap) _WinAPI_DeleteDC($hMemDC) EndFunc ;==>SetBitmap Func _My_Gui($Slep = 5000) Local $yGUI = GUICreate("", 1, 1, 0, 0, $WS_POPUP, BitOR($WS_EX_LAYERED, $WS_EX_TOOLWINDOW, $WS_EX_TOPMOST)) _GDIPlus_Startup() Local $yImage = _GDIPlus_ImageLoadFromFile($Resim) SetBitMap($yGUI, $yImage, 5) Local $Gui_X = @DesktopWidth - ($ResW + 5) Local $Gui_Y = @DesktopHeight - ($ResH + 5) Local $Shell_Pos = WinGetHandle("[CLASS:Shell_TrayWnd]") ;CLASS:Progman If $Shell_Pos <> "" Then $Shell_Pos = WinGetPos($Shell_Pos) If UBound($Shell_Pos) = 4 Then If $Shell_Pos[1] < 1 Then If $Shell_Pos[0] > 0 Then $Gui_X = @DesktopWidth - ($Shell_Pos[2] + ($ResW + 5)) Else If $Shell_Pos[0] < 1 Then $Gui_Y = @DesktopHeight - ($Shell_Pos[3] + ($ResH + 5)) EndIf EndIf EndIf WinMove($yGUI, "", $Gui_X, $Gui_Y, $ResW, $ResH) GUISetState(@SW_SHOW) For $I = 10 To 225 Step 5 SetBitMap($yGUI, $yImage, $I) Sleep(25) Next Sleep($Slep) ;Sleep For $I = 225 To 5 Step -5 SetBitMap($yGUI, $yImage, $I) Sleep(10) Next EndFunc ;==>_My_Gui Func __TempFile($s_FileExtension = ".tmp", $s_DirectoryName = @TempDir, $s_FilePrefix = "~", $i_RandomLength = 7) ; Check parameters If IsKeyword($s_FilePrefix) Then $s_FilePrefix = "~" If IsKeyword($s_FileExtension) Then $s_FileExtension = ".tmp" If IsKeyword($i_RandomLength) Then $i_RandomLength = 7 If Not FileExists($s_DirectoryName) Then $s_DirectoryName = @TempDir ; First reset to default temp dir If Not FileExists($s_DirectoryName) Then $s_DirectoryName = @ScriptDir ; Still wrong then set to Scriptdir ; add trailing \ for directory name If StringRight($s_DirectoryName, 1) <> "\" Then $s_DirectoryName = $s_DirectoryName & "\" ; Local $s_TempName Do $s_TempName = "" While StringLen($s_TempName) < $i_RandomLength $s_TempName = $s_TempName & Chr(Random(97, 122, 1)) WEnd $s_TempName = $s_DirectoryName & $s_FilePrefix & $s_TempName & $s_FileExtension Until Not FileExists($s_TempName) Return $s_TempName EndFunc ;==>__TempFile[/codebox] Quote Link to comment Share on other sites More sharing options...
korasoglu Posted August 3, 2012 Share Posted August 3, 2012 Teşekkür ederim Hocam yine sorunu çözdünüz Quote Link to comment Share on other sites More sharing options...
casper0007 Posted September 2, 2012 Share Posted September 2, 2012 sa bu resmı ıso kalıbına attıktan sonra format sonrasında 15-20 sanıya kadar nasıl gösteririm [color=#282828][font=helvetica, arial, sans-serif]http://i.imgur.com/oTRTQ.png"][url]http://i.imgur.com/oTRTQ.png[/font][/color] 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.