blue_life

@bmozdemir Rica ederim. İstediğinle birlikte, örneğinde hatalı kısımları biraz düzelttim... [codebox] ;~ #include <GUIConstantsEx.au3> ;~ #include <ListViewConstants.au3> ;~ #include <WindowsConstants.au3> ;~ #include <ButtonConstants.au3> ;~ #include <StaticConstants.au3> ;~ #include <ComboConstants.au3> #include <array.au3> Global $ScriptDir = @ScriptDir If StringRight($ScriptDir, 1) <> "\" Then $ScriptDir &= "\" Global $INI_FILE = $ScriptDir & "InventoryData.ini" Global $BLUE_ARRAY Global $MainForm = GUICreate("Form1", 623, 442) Global $ListView1 = GUICtrlCreateListView("Product Code|Make|Model|Current Stock|Date Modified", 16, 8, 586, 390) GUICtrlSendMsg(-1, 4126, 0, 100) GUICtrlSendMsg(-1, 4126, 1, 150) GUICtrlSendMsg(-1, 4126, 2, 150) GUICtrlSendMsg(-1, 4126, 3, 85) GUICtrlSendMsg(-1, 4126, 4, 100) _Update_ListView() ;Update ListView Global $Button1 = GUICtrlCreateButton("Add A Product", 16, 408, 91, 25) Global $Button2 = GUICtrlCreateButton("Edit A Product", 120, 408, 91, 25) Global $Button3 = GUICtrlCreateButton("Delete A Product", 224, 408, 107, 25) GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case -3 Exit Case $Button1 _Add_Edit_AProduct() Case $Button2 _Add_Edit_AProduct("Edit") Case $Button3 _DeleteItem() EndSwitch WEnd Func _READ_INI() Local $RETURN_ARRAY[25][6] ;GCID,Product Code,Make,Model,Current Stock,Date Modified= $RAD_ISName = IniReadSectionNames($INI_FILE) If Not @error Then For $i = 1 To $RAD_ISName[0] If StringLeft($RAD_ISName[$i], <> "Product_" Then ContinueLoop $RETURN_ARRAY[0][0] += 1 If UBound($RETURN_ARRAY, 1) <= $RETURN_ARRAY[0][0] Then ReDim $RETURN_ARRAY[$RETURN_ARRAY[0][0] + 25][6] $RETURN_ARRAY[$RETURN_ARRAY[0][0]][1] = StringStripWS(IniRead($INI_FILE, $RAD_ISName[$i], "Product Code", ""), 3) $RETURN_ARRAY[$RETURN_ARRAY[0][0]][2] = IniRead($INI_FILE, $RAD_ISName[$i], "Make", "") $RETURN_ARRAY[$RETURN_ARRAY[0][0]][3] = IniRead($INI_FILE, $RAD_ISName[$i], "Model", "") $RETURN_ARRAY[$RETURN_ARRAY[0][0]][4] = IniRead($INI_FILE, $RAD_ISName[$i], "Current Stock", "") $RETURN_ARRAY[$RETURN_ARRAY[0][0]][5] = IniRead($INI_FILE, $RAD_ISName[$i], "Date Modified", "") Next EndIf If UBound($RETURN_ARRAY, 1) <> ($RETURN_ARRAY[0][0] + 1) Then ReDim $RETURN_ARRAY[$RETURN_ARRAY[0][0] + 1][6] Return $RETURN_ARRAY EndFunc ;==>_READ_INI Func _Update_ListView() If IsArray($BLUE_ARRAY) = 0 Then $BLUE_ARRAY = _READ_INI() ;Read_Ini_File EndIf _ArraySort($BLUE_ARRAY, 0, 1, 0, 1) For $i = 1 To $BLUE_ARRAY[0][0] If $BLUE_ARRAY[$i][0] = -1 Then ContinueLoop If $BLUE_ARRAY[$i][0] > 0 Then GUICtrlDelete($BLUE_ARRAY[$i][0]) $BLUE_ARRAY[$i][0] = GUICtrlCreateListViewItem($BLUE_ARRAY[$i][1] & "|" & $BLUE_ARRAY[$i][2] & "|" & $BLUE_ARRAY[$i][3] & _ "|" & $BLUE_ARRAY[$i][4] & "|" & $BLUE_ARRAY[$i][5], $ListView1) If Number($BLUE_ARRAY[$i][4]) < 100 Then GUICtrlSetBkColor($BLUE_ARRAY[$i][0], 0xfff333) EndIf If Number($BLUE_ARRAY[$i][4]) < 10 Then GUICtrlSetBkColor($BLUE_ARRAY[$i][0], 0xff0000) EndIf Next EndFunc ;==>_Update_ListView Func _Add_Edit_AProduct($AType = "Add") Local $GuiRead Local $productCode, $make, $model, $currentStock, $dataModified = @MON & "/" & @MDAY & "/" & @YEAR If $AType <> "Add" Then $GuiRead = GUICtrlRead($ListView1) If $GuiRead = 0 Then MsgBox(48, "Error!", "Not select item!", 0, $MainForm) SetError(1, 0, 0) EndIf If IsArray($BLUE_ARRAY) = 0 Or $GuiRead = 0 Then Return SetError(2, 0, 0) $BLUE_ARRAY[0][1] = 0 For $i = 1 To $BLUE_ARRAY[0][0] If $GuiRead = $BLUE_ARRAY[$i][0] Then $BLUE_ARRAY[0][1] = $i $productCode = $BLUE_ARRAY[$i][1] $make = $BLUE_ARRAY[$i][2] $model = $BLUE_ARRAY[$i][3] $currentStock = $BLUE_ARRAY[$i][4] $dataModified = $BLUE_ARRAY[$i][5] ExitLoop EndIf Next If $BLUE_ARRAY[0][1] = 0 Then Return SetError(3, 0, 0) EndIf GUISetState(@SW_DISABLE, $MainForm) Local $Form2 = GUICreate("Product Inventory", 336, 258, 302, 218) Local $aInput1 = GUICtrlCreateInput($productCode, 16, 24, 193, 21) Local $aInput2 = GUICtrlCreateInput($make, 16, 64, 193, 21) Local $aInput3 = GUICtrlCreateInput($model, 16, 104, 193, 21) Local $aInput4 = GUICtrlCreateInput($currentStock, 16, 144, 193, 21, 0x2000) Local $aInput5 = GUICtrlCreateInput($dataModified, 16, 184, 193, 21) GUICtrlCreateLabel("Product Code", 224, 24, 69, 17) GUICtrlCreateLabel("Make", 224, 64, 31, 17) GUICtrlCreateLabel("Model", 224, 104, 33, 17) GUICtrlCreateLabel("Current Stock", 224, 144, 69, 17) GUICtrlCreateLabel("Date Modified", 224, 184, 70, 17) Local $cButton3 = GUICtrlCreateButton("Add Product", 120, 216, 91, 25) If $AType <> "Add" Then GUICtrlSetData($cButton3, "Edit Product") GUISetState(@SW_SHOW, $Form2) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case -3 ExitLoop Case $cButton3 $productCode = StringStripWS(GUICtrlRead($aInput1), 3) If $productCode = "" Then MsgBox(48, "Error!", "Enter product Code", 0, $Form2) GUICtrlSetState($aInput1, 256) ContinueCase EndIf $make = StringStripWS(GUICtrlRead($aInput2), 3) If $make = "" Then MsgBox(48, "Error!", "Enter make", 0, $Form2) GUICtrlSetState($make, 256) ContinueCase EndIf $model = StringStripWS(GUICtrlRead($aInput3), 3) If $model = "" Then MsgBox(48, "Error!", "Enter model", 0, $Form2) GUICtrlSetState($model, 256) ContinueCase EndIf $currentStock = Number(GUICtrlRead($aInput4)) If $currentStock = 0 Then MsgBox(48, "Error!", "Enter current stock ", 0, $Form2) GUICtrlSetState($currentStock, 256) ContinueCase EndIf $dataModified = StringStripWS(GUICtrlRead($aInput5), 3) ; ------------------------------- If $AType = "Add" Then For $i = 1 To $BLUE_ARRAY[0][0] If $BLUE_ARRAY[$i][1] = $productCode Then GUICtrlSetState($aInput1, 256) MsgBox(0, "Error", "The product is already in the database") ContinueCase EndIf Next $BLUE_ARRAY[0][0] += 1 ReDim $BLUE_ARRAY[$BLUE_ARRAY[0][0] + 1][6] $BLUE_ARRAY[0][1] = $BLUE_ARRAY[0][0] EndIf $BLUE_ARRAY[$BLUE_ARRAY[0][1]][1] = $productCode $BLUE_ARRAY[$BLUE_ARRAY[0][1]][2] = $make $BLUE_ARRAY[$BLUE_ARRAY[0][1]][3] = $model $BLUE_ARRAY[$BLUE_ARRAY[0][1]][4] = $currentStock $BLUE_ARRAY[$BLUE_ARRAY[0][1]][5] = $dataModified IniWrite($INI_FILE, "Product_" & $productCode, "Product Code", $productCode) IniWrite($INI_FILE, "Product_" & $productCode, "Make", $make) IniWrite($INI_FILE, "Product_" & $productCode, "Model", $model) IniWrite($INI_FILE, "Product_" & $productCode, "Current Stock", $currentStock) IniWrite($INI_FILE, "Product_" & $productCode, "Date Modified", $dataModified) ExitLoop EndSwitch WEnd _Update_ListView() GUISwitch($MainForm) GUISetState(@SW_ENABLE, $MainForm) GUIDelete($Form2) EndFunc ;==>_Add_Edit_AProduct Func _DeleteItem() Local $GuiRead = GUICtrlRead($ListView1), $GuiRead2, $SINSTR If $GuiRead <> 0 Then For $i = 1 To $BLUE_ARRAY[0][0] If $GuiRead = $BLUE_ARRAY[$i][0] Then GUICtrlDelete($BLUE_ARRAY[$i][0]) IniDelete("InventoryData.ini", "Product_" & $BLUE_ARRAY[$i][1]) $BLUE_ARRAY[$i][0] = -1 ExitLoop EndIf Next EndIf EndFunc ;==>_DeleteItem[/codebox]

@collosus Hayır cmd ile işin yok. Dediğim gibi ilgili programı tekrar indir ve kaldırma tuşuna basarak kaldır. Manuel silmek istersen, boot sürücüsündeki boot.ini dosyasıyla GRUBMENU vs. gibi programın kopyaladığı dosyaları sil. Hepsi bu kadar!

@collosus Ilgili program windows boot menüsüne grub4dos ekler. Usb için olan program başka! Işletim sistemin nedir? Eğer XP ve benzerini kullanmıyorsan, önyükleme sürücündeki boot.ini dosyasıyle program kopyaladığı dosyaları silersen, sorunun çözülmüş olur. Ilgili programla kurulum y aptığında, arayüzdeki kaldır butonu aktif oluyordu. Onun ilede kaldırma işlemi yapabilirsin. Veyahut ordaki boot süresini 0 yaparsanda ekranda boot menüsü görünmez...

@collosus Hangi programla kurulum yaptın! Hangi programla kurulum yaptığını bilemeden, seni yönlendirmem malesef! Aşağıdaki programla mı kurulum yaptın? [img]http://i624.photobucket.com/albums/tt321/Blue_Life/WinBootMenu_2-1.jpg[/img]

@collosus Kullandığın paketi yazman gerekiyordu! Windows menüsüne grub4dos eklemek ile ilgili programdan bahsediyorsan, aynı programla kaldırma işlemini yapabilirsin...

Bu konu "Windows Xp" forumundan "Katılımsız Kurulum Destek" forumuna taşınmıştır.

@bmozdemir Kısaca; [codebox]#include <GUIConstantsEx.au3> #include <ListViewConstants.au3> #include <WindowsConstants.au3> #include <ButtonConstants.au3> #include <StaticConstants.au3> #include <array.au3> #include <ComboConstants.au3> Global $productCode, $make, $model, $currentStock, $dataModified, $productToEdit $Form1 = GUICreate("Form1", 623, 442, 192, 124) $ListView1 = GUICtrlCreateDummy() $Button1 = GUICtrlCreateButton("Add A Product", 16, 408, 91, 25) $Button2 = GUICtrlCreateButton("Edit A Product", 120, 408, 91, 25) $Button3 = GUICtrlCreateButton("Delete A Product", 224, 408, 107, 25) GUISetState(@SW_SHOW) _RefreshData() While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Button1 _AddAProduct() Case $Button2 _EditProduct() Case $Button3 _DeleteItem() EndSwitch WEnd Func _AddAProduct() $Form2 = GUICreate("Product Inventory", 336, 258, 302, 218) $aInput1 = GUICtrlCreateInput("", 16, 24, 193, 21) $aInput2 = GUICtrlCreateInput("", 16, 64, 193, 21) $aInput3 = GUICtrlCreateInput("", 16, 104, 193, 21) $aInput4 = GUICtrlCreateInput("", 16, 144, 193, 21) $aInput5 = GUICtrlCreateInput(@MON & "/" & @MDAY & "/" & @YEAR, 16, 184, 193, 21) $Label1 = GUICtrlCreateLabel("Product Code", 224, 24, 69, 17) $Label2 = GUICtrlCreateLabel("Make", 224, 64, 31, 17) $Label3 = GUICtrlCreateLabel("Model", 224, 104, 33, 17) $Label4 = GUICtrlCreateLabel("Current Stock", 224, 144, 69, 17) $Label5 = GUICtrlCreateLabel("Date Modified", 224, 184, 70, 17) $cButton3 = GUICtrlCreateButton("Add Product", 120, 216, 91, 25) GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE GUIDelete($Form2) ExitLoop Case $cButton3 $productCode = GUICtrlRead($aInput1) $make = GUICtrlRead($aInput2) $model = GUICtrlRead($aInput3) $currentStock = GUICtrlRead($aInput4) $dataModified = GUICtrlRead($aInput5) $errorCheck = IniRead("InventoryData.ini", $productCode, "Product Code", "NotInDatabase") If $errorCheck = "NotInDatabase" Then IniWrite("InventoryData.ini", $productCode, "Product Code", $productCode) IniWrite("InventoryData.ini", $productCode, "Make", $make) IniWrite("InventoryData.ini", $productCode, "Model", $model) IniWrite("InventoryData.ini", $productCode, "Current Stock", $currentStock) IniWrite("InventoryData.ini", $productCode, "Date Modified", $dataModified) Else MsgBox(0, "Error", "The product is already in the database") EndIf GUIDelete($Form2) _RefreshData() ExitLoop EndSwitch WEnd EndFunc ;==>_AddAProduct Func _RefreshData() GUISwitch($Form1) GUICtrlDelete($ListView1) $ListView1 = GUICtrlCreateListView("Product Code|Make|Model|Current Stock|Date Modified", 16, 8, 586, 390) GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 0, 100) GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 1, 150) GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 2, 150) GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 3, 85) GUICtrlSendMsg(-1, $LVM_SETCOLUMNWIDTH, 4, 100) $sectionNames = IniReadSectionNames("InventoryData.ini") If @error Then Dim $sectionNames[2] $sectionNames[0] = 1 $sectionNames[1] = "NotFound" EndIf _ArraySort($sectionNames, 0, 1) For $i = 1 To $sectionNames[0] Step 1 $productCode = IniRead("InventoryData.ini", $sectionNames[$i], "Product Code", "") $make = IniRead("InventoryData.ini", $sectionNames[$i], "Make", "") $model = IniRead("InventoryData.ini", $sectionNames[$i], "Model", "") $currentStock = IniRead("InventoryData.ini", $sectionNames[$i], "Current Stock", "") $dataModified = IniRead("InventoryData.ini", $sectionNames[$i], "Date Modified", "") GUICtrlCreateListViewItem($productCode & "|" & $make & "|" & $model & "|" & $currentStock & "|" & $dataModified, $ListView1) If Number($currentStock) < 100 Then GUICtrlSetBkColor(-1, 0xfff333) EndIf If Number($currentStock) < 10 Then GUICtrlSetBkColor(-1, 0xff0000) EndIf Next EndFunc ;==>_RefreshData Func _DeleteItem() Local $GuiRead = GUICtrlRead($ListView1), $GuiRead2, $SINSTR If $GuiRead <> 0 Then $GuiRead2 = GUICtrlRead($GuiRead) $SINSTR = StringInStr($GuiRead2, "|") If $SINSTR <> 0 Then $GuiRead2 = StringLeft($GuiRead2, $SINSTR - 1) GUICtrlDelete($GuiRead) IniDelete("InventoryData.ini", $GuiRead2) EndIf EndFunc ;==>_DeleteItem Func _EditProduct() $sectionNames = IniReadSectionNames("InventoryData.ini") If @error Then Dim $sectionNames[2] $sectionNames[0] = 1 $sectionNames[1] = "NotFound" EndIf _ArraySort($sectionNames, 0, 1) $Form4 = GUICreate("Edit a product", 303, 169, 302, 218) $delCombo = GUICtrlCreateCombo("", 24, 40, 241, 25, BitOR($CBS_DROPDOWNLIST, $CBS_AUTOHSCROLL)) $delLabel1 = GUICtrlCreateLabel("Select an item to edit", 24, 16, 115, 17) $delButton1 = GUICtrlCreateButton("Edit Item", 168, 112, 91, 25) GUISetState(@SW_SHOW) For $i = 1 To $sectionNames[0] Step 1 GUICtrlSetData($delCombo, $sectionNames[$i]) Next While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE GUIDelete($Form4) ExitLoop Case $delButton1 $productToEdit = GUICtrlRead($delCombo) If $productToEdit = "" Then GUIDelete($Form4) ExitLoop Else GUIDelete($Form4) _EditProductForm() ExitLoop EndIf EndSwitch WEnd EndFunc ;==>_EditProduct Func _EditProductForm() $make = IniRead("InventoryData.ini", $productToEdit, "Make", "") $model = IniRead("InventoryData.ini", $productToEdit, "Model", "") $currentStock = IniRead("InventoryData.ini", $productToEdit, "Current Stock", "") $dataModified = IniRead("InventoryData.ini", $productToEdit, "Date Modified", "") $Form5 = GUICreate("Form1", 336, 258, 302, 218) $cInput1 = GUICtrlCreateInput($productToEdit, 16, 24, 193, 21) $cInput2 = GUICtrlCreateInput($make, 16, 64, 193, 21) $cInput3 = GUICtrlCreateInput($model, 16, 104, 193, 21) $cInput4 = GUICtrlCreateInput($currentStock, 16, 144, 193, 21) $cInput5 = GUICtrlCreateInput(@MON & "/" & @MDAY & "/" & @YEAR, 16, 184, 193, 21) $Label1 = GUICtrlCreateLabel("Product Code", 224, 24, 69, 17) $Label2 = GUICtrlCreateLabel("Make", 224, 64, 31, 17) $Label3 = GUICtrlCreateLabel("Model", 224, 104, 33, 17) $Label4 = GUICtrlCreateLabel("Current Stock", 224, 144, 69, 17) $Label5 = GUICtrlCreateLabel("Date Modified", 224, 184, 70, 17) $Button3 = GUICtrlCreateButton("Edit Product", 120, 216, 91, 25) GUISetState(@SW_SHOW) #endregion ### END Koda GUI section ### While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE GUIDelete($Form5) ExitLoop Case $Button3 $productCode = GUICtrlRead($cInput1) $make = GUICtrlRead($cInput2) $model = GUICtrlRead($cInput3) $currentStock = GUICtrlRead($cInput4) $dataModified = GUICtrlRead($cInput5) IniWrite("InventoryData.ini", $productCode, "Product Code", $productCode) IniWrite("InventoryData.ini", $productCode, "Make", $make) IniWrite("InventoryData.ini", $productCode, "Model", $model) IniWrite("InventoryData.ini", $productCode, "Current Stock", $currentStock) IniWrite("InventoryData.ini", $productCode, "Date Modified", $dataModified) GUIDelete($Form5) _RefreshData() ExitLoop EndSwitch WEnd EndFunc ;==>_EditProductForm[/codebox]

@El-Arabi O zaman çok fazla program çalışmış olacak. Yani ams altında coretemp.exe ve autoit ile oluşturduğun exe çalışmış olacak. Bu kadar fazla işlemin çalıştırmanın gereksiz olduğunu düşünüyorum. Ams ile o log dosaysının işlenmesinin fazla zor olacağını düşünmüyorum, ams kodlamasını bilmesemde! Biraz kurcala!

@Fox [codebox]#include <Misc.au3> Local $hDLL = DllOpen("user32.dll") Global $Paused = False Local $Pixel_X = 200 Local $Pixel_Y = 40 Local $Pixel_Color = "0x331100" Local $Pixel_X2 = 91 Local $Pixel_Y2 = 56 Local $Pixel_Color2 = "0x331100" Local $PGet_Color While 1 If _IsPressed("51", $hDLL) Then ;Q harfi While _IsPressed("51", $hDLL) Sleep(250) WEnd $Paused = Not $Paused EndIf If $Paused = True Then Sleep(50) ContinueLoop EndIf $PGet_Color = PixelGetColor($Pixel_X, $Pixel_Y) ;x-y If $PGet_Color = $Pixel_Color Then Send("1") EndIf $PGet_Color = PixelGetColor($Pixel_X2, $Pixel_Y2) ;x-y If $PGet_Color = $Pixel_Color2 Then Send("3") EndIf Sleep(50) ; Cpu Save WEnd DllClose($hDLL)[/codebox]

@Fox İlgili oyun q harifini rezerve ediyor olabilir. q yerine farklı bir hotkey atayıp dene. Eğer olmuyorsa, _IsPressed fonkisyonunu deneyebilirsin...

[code]If FileExists(@ScriptDir & "\Ayar.ini") = 0 Then ;Scriptin bulunduğu dizinde ayar.ini yoksa MsgBox(48,"Uyarı","Lütfen Ayar.ini dosyasını ekleyiniz! vs vs.") Exit ;Istersen kapatırsın. EndIf[/code]

@El-Arabi Benim verdiğim dosyalarda, ilgili dll dosyasıyla verilere ulaşmak için, ilgili dll dosyasının gereksinim duyduğu programın arkaplanda çalışıyor olması gerekiyor. Amsde bu yüzden veri alamamış olabilirsin. Anlık veri takibi mi yapmak istiyorsun? Bir gui hazırlayıp kodlarını verirsen, düzeltirim... Edit: Anladığım kadarıyla sen ams için böyle bir şey istiyorsun. O zaman CoreTemp.exe programını çalıştır ve Tools -> Log On seçeneğini seç. Bu sayede program çalıştığı sürece log tutuyor. Ams ile bu logları okutup kullanabilirsin. CoreTemp ekranı için ise, programı gizli çalıştırman kafi...

@Fox Aşağıdaki işini görüyor mu? [codebox]Local $Pixel_X = 100 Local $Pixel_Y = 100 Local $Pixel_Color = Binary("0x331100") ;Renk değerimiz Beyaz olsun Local $Pixel_X2 = 200 Local $Pixel_Y2 = 200 Local $Pixel_Color2 = Binary("0x990000") ;Renk değerimiz Beyaz olsun Local $PGet_Color While 1 $PGet_Color = PixelGetColor($Pixel_X, $Pixel_Y) ;x-y If $PGet_Color = $Pixel_Color Then Send("2") EndIf $PGet_Color = PixelGetColor($Pixel_X2, $Pixel_Y2) ;x-y If $Pixel_Color2 = $Pixel_Color Then Send("5") EndIf Sleep(50) ; Cpu Save WEnd[/codebox] Edit: Sonradan aklıma geldi. Hex yerine Binary yazılacaktı Düzeltiyorum...

@MeHMeTBeN Tabiki ekleyebiliriz. Kısaca, objeyi biraz aşağıya alıp, üst kısıma input eklersin. Bu kadar basit. Mesela; [codebox]Opt("GUIResizeMode", 768) Global $MY_OIE = ObjCreate("Shell.Explorer.2") Global $MY_GUI = GUICreate("MİNİ EXPLORER", 640, 480, -1, -1, 0x00040000 + 0x00020000 + 0x00010000) Global $IE_GOOGLE = GUICtrlCreateInput("", 510, 4, 125, 24, -1) GUICtrlSetFont(-1, 10, 800, 0) GUICtrlSetResizing(-1, 4 + 32 + 512) Global $IE_OBJECT = GUICtrlCreateObj($MY_OIE, 0, 32, 640, 424) GUICtrlSetResizing(-1, 102) GUISetState(@SW_SHOW) $MY_OIE.navigate("www.google.com") DllCall("psapi.dll", "int", "EmptyWorkingSet", "long", -1) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case -3 Exit Case $IE_GOOGLE _IE_GOOGLE_SEARCH(StringStripWS(GUICtrlRead($IE_GOOGLE), 3)) EndSwitch WEnd Func _IE_GOOGLE_SEARCH($S_Text) Local $Goodle_Adress = "http://www.google.com.tr/" If $S_Text <> "" Then $Goodle_Adress &= "#hl=tr&q=" & $S_Text $MY_OIE.navigate($Goodle_Adress) EndFunc ;==>_IE_GOOGLE_SEARCH[/codebox] @Fox Kısacası bir döngü içinde PixelGetColor kullanarak, belirlediğin konumlardaki renk değerini alıp, daha önceki belirlediğin renk değeriyle karşılaştırırsın. Renkler uyuşuyorsa, istediğini yaptırırsın. Yardım dosyasında gerekli örnekler vardı. Ayrıca forumda da bu konuda bir çok örnek vardı. Neyse basit bir şey verebilirmisin dersen; [codebox]Local $Pixel_X = 100 Local $Pixel_Y = 100 Local $Pixel_Color = "0xFFFFFF" ;Renk değerimiz Beyaz olsun Local $PGet_Color While 1 $PGet_Color = PixelGetColor($Pixel_X, $Pixel_Y) ;x-y If $PGet_Color = $Pixel_Color Then MsgBox(64,"BlueLife","Ne yaptırmak istiyorsan, bu mesajı silip eklersin") EndIf Sleep(50) ; Cpu Save WEnd[/codebox] Renkleri kodlarını almak için ben, Xinec ColorConverter 3.02 programını kullanıyorum. Programı açıp, ikinci kutuya farenle tıklatıp bırakmadan fareni istediğin yere sürükleyip renk kodunu bulabiiyorsun. [color="#0000FF"][u]http://bluelife.zxq.net/Files/Autoit/Tools/Pixel/xcc.rar[/u][/color]

@sekemek Genelde usbden xp kurduğumuz için, usb üzerinde fazla durduk. Tabiki burdaki yöntemle normal diskindeki bir bölüm üzerinden xp kurulumu yapabilirsin. Lakin burda dikkat etmen gereken nokda, xp kurulumu için gereken dosyaların bulunduğu bölüme format atmaman olacak. Neyse kısaca anlatırsam; [img]http://i624.photobucket.com/albums/tt321/Blue_Life/Nt5SetupFromIso_2.png[/img] İlgili konudaki programı çalıştırıp, setting butonuna bas. ilk kutuya WINBOOT\NT5\SETUP.ISO yazıp, ok tuşuna bas. Sonra xp kuru çalıştırmak istediğin sürücüyü, sürücü kutusundan seçip ilgili konumda boot.gz dosyasını oluşmasını bekle. Misal D:\ sürücüsünü seçtiysen, D:\WINBOOT\NT5\BOOT.GZ dosyası oluşmalı. Bu işlemleri yaptıktan sonra aşağıdaki konunun üçüncü mesajındaki programla, aynı sürücüyü seçerek windows boot menüsüne grub4dos ekle. Misal yukarıda D:\ sürücüsünü örnek vermiştik. [color="#0000FF"][u]http://www.tnctr.com/topic/100852-[/u][/color] [img]http://i624.photobucket.com/albums/tt321/Blue_Life/WinBootMenu_2-1.jpg[/img] Ilgili işlemleri yaptıktan sonra, bilgisayarı yeniden başlatıp, windows boot menüsünden grub4dosu başlatabileceğin seçeneği seçip, windows kurulum menüsü altındaki Windows XP kurulumunu başlatabilirsin...

@El-Arabi Açıkçası herangi bir fikrim yok. Ayrıca SpeedFan.dll dosyasının başka dosyalara vs. ihtiyacı olabileceğini düşünüyorum. Neyse farklı bir dosya ile yapılmış bir örnek buldum ve biraz düzenledim. Umarım işini görür, kolay gelsin... [color="#0000FF"][u]http://bluelife.zxq.net/Files/Autoit/Cpu/Temperature/CoreTemp.zip[/u][/color]

@nadas21 Farklı Win7 kurulumları birleştirilebiliyor. Aşağıdaki anlatım X86-x64 için ama sen farklı isimler kullanarak, farklı modifiye çalışmalarınıda birleştirebilirsin. [code]http://www.tnctr.com/topic/102135-windows-7-x86-x64-nasyl-birlethtirilir/[/code] Ayrıca burdaki yöntem gibi, iso dosyasından Wista-Win7 vs. gibi Nt6 kurulumlarını yapabiliyoruz. Aşağıdaki konuyu incelemelisin. Lakin ilgili program bazı win7lerde sorun çıkarttı. Sorun yaşarsan, xp üzerinde programı kullanmanı tavsiye edeceğim [code]http://www.tnctr.com/topic/159142-iso-dosyasyndan-windows-vista-windows7-kurulumu/[/code]

Bu konu "AutoPlay Media Studio" forumundan "Sistem / Donanım Tavsiyeleri" forumuna taşınmıştır.

@ysyhan Konun ilk sayfasındaki linkteki tamamlanmamış yardım dosyasında yazıyor. Onu indirip, usb kısmına bak.

@oktay x Ubuntu ve slax işletim sistemini kendi bilgisayarımda denemiştim ve herangi bir sıkıntı çıkmamıştı. Senin sorun yaşaman, belki ilgili işletim sistemlerinin, büyük ihtimal senin usb dosnanımını düzgün yükleyememesi olabilir. Bunun için yapacak bir şey yok gibi. Bu sorunu sistemi geliştiriciler çözebilir. Ayrıca bazı bilgisayarlar usbde seçebiliyor. Misal dün bir dizüstü bilgisayarı usbden başlatıp xp kuracaktık. Lakin grub4dos ile hazırladığımız usb flash diski önyüklemeyi başaramadık. Sonra diğer flash diski takıp denediğimizde sistem ilgili flash diski algılayıp direkt başlattı. Kısaca farklı donanımlarda bu tip sorunlar malesef her zaman çıkabilir... Tabi senin yaşadığın sorun, kesin yukarıdaki yazdıklarım nedeniyle olmuştur diyemem. Bu yazdıklarım sadece düşüncelerimdir. Umarım ilgili sorunları çözebilirsin, kolay gelsin...

@ByChilavert Usb belleğe grub4dosu kurduktan sonra, win7 iso içindeki dosyaları çıkartırsan, win7 kur sorunsuz çalışacaktır. Windows XPlere gelirsek, ben iso dan kurulum yöntemini kullanıyorum. Ilgili anlatım aşağıdaki konuda mevcut. http://www.tnctr.com/topic/173188-iso-dosyasyndan-xp2003-kurulum-projesi/ Ayriyeten şuan biraz boş vaktim var, pm atıyorum...

@ByChilavert Malesef videolu anlatım vs. için zaman ayıramam. Lakin ilgili konulardaki bilgileri incelersen fazla zorlanacağını düşünmüyorum. Zorlanırsan, takıldığın kısımı yazdığın taktirde zaten bilgili arkdaşlar ile birlikte yardımcı oluyoruz. Sen usb için mi, yoksa cd/dvd için mi multiboot oluşturmak istiyorsun?

@ByChilaver Sardu projesine çok uzun zaman önce kısaca bakmıştım. İlgili çalışma da autoit ile hazırlanmış ve içerikte alternatif olarak grbu4dos mevcuttu. Heralde önyükleme için isolinux kullanıyordu. Dediğim gibi usb flash diske vs. kurup detaylı incelemedim. Hatırladığım kadarıyla menüye müdehale etmek için *.cfg dosyalarını kurcalaman gerekli. Bunu notepad gibi bir editör ile yapabilirsin...

@aRiSe Sorunu anlamadım malesef. XP kurulumunda standart olarak zaten mavi kurulum ekranı mevcut! Konuyu biraz daha açarsan yardımcı olmaya çalışabilirim.

@aRiSe Ilgili dosyaları Usb paketindeki, USB_ROOT klasörüne ekleyip, istediğin zaman MB_USB.exe ile flash veyahut harici diskine kopyalatma yaparak kullanabilirsin. Ben zaten öyle kullanıyorum. Yani kendime göre USB_ROOT klasörü oluşturdum. Içinde 4-5 tane xp win7 vs. vs. var. Bunu istediğim zaman herangi bir flash diske MB_USB.exe ile kopyalatıp kullanabiliyorum...