Jump to content

bmozdemir

Üye
  • Posts

    27
  • Joined

  • Last visited

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

bmozdemir's Achievements

Newbie

Newbie (1/14)

0

Reputation

  1. evet aslında mantık aynı ama bana lazım olan o bölgeyi yasaklamak olduğu için bu kod gerekiyordu neyseki buşdum ilginize teşekkür ederim.
  2. ilginize teşekkür ederim gerçekten güzel ve anlaşılır olmuş benim için lakin amacım bu tarz ayrı ayrı kod gruplarının nasıl bağlanabildiği idi bana bu tarz bilgilerini edinebileceğim bir döküman veya bir kaynak bulamadığımdan bu tarz bir soru sorma gereğinde bulundum ilginize teşekkür ederim. Birde show gui 1 butonuna tıklayınca diğer butonlara tıklayamıyorum pasif hale geliyorlar. ilginize tekrar teşekkür ederim.
  3. Arkadaşlar elimde 4, 5 adet kod var ve bunları 1 exe içerisinde çalıştırmayı istiyorum fakat ne yaptıysam beceremedim eğer yardım ederseniz sevinirim. Birde Örnek 1'de [color=#282828][size=2][background=rgb(248, 248, 248)]Case $hButton1 kısmında \index.html [/background][/size][/color]kısmında sayfayı bulamayınca hata veriyor. bunu nasıl önleyebilirim. 1. Örnek Kod [CODE] #include <GUIConstantsEx.au3> #include <IEE.au3> Global $hGUI2 = 9999, $hGUI3 = 9999, $hGUI4 = 9999, $h1Button1 = 9999, $h2Button1 = 9999, $h3Button1 = 9999 ; Predeclare the variables with dummy values to prevent firing the Case statements gui1() Func gui1() $hGUI1 = GUICreate("Gui 1", 600, 600, 4, 4) $hButton1 = GUICtrlCreateButton("Web Page 1", 20, 10, 80, 30) $hButton2 = GUICtrlCreateButton("Web Page 2", 100, 10, 80, 30) $hButton3 = GUICtrlCreateButton("Web Page 3", 180, 10, 80, 30) $hButton4 = GUICtrlCreateButton("Web Page 4", 260, 10, 80, 30) $hButton5 = GUICtrlCreateButton("Web Page 5", 340, 10, 80, 30) $hButton6 = GUICtrlCreateButton("Web Page 6", 420, 10, 80, 30) $hButton7 = GUICtrlCreateButton("Web Page 7", 500, 10, 80, 30) $hButton8 = GUICtrlCreateButton("Show Gui 1", 20, 560, 80, 30) $hButton9 = GUICtrlCreateButton("Show Gui 2", 100, 560, 80, 30) $hButton10 = GUICtrlCreateButton("Show Gui 3", 180, 560, 80, 30) $hButton11 = GUICtrlCreateButton("Show Gui 4", 260, 560, 80, 30) $hButton12 = GUICtrlCreateButton("Show Gui 5", 340, 560, 80, 30) $hButton13 = GUICtrlCreateButton("Show Gui 6", 420, 560, 80, 30) $hButton14 = GUICtrlCreateButton("Show Gui 7", 500, 560, 80, 30) $MonthCal1 = GUICtrlCreateMonthCal("", 184, 184, 236, 164) GUISetState() While 1 $aMsg = GUIGetMsg(1) ; Use advanced parameter to get array Switch $aMsg[1] ; check which GUI sent the message Case $hGUI1 Switch $aMsg[0] ; Now check for the messages for $hGUI1 Case $GUI_EVENT_CLOSE ; If we get the CLOSE message from this GUI - we exit <<<<<<<<<<<<<<< ExitLoop Case $hButton1 Local $oIE = _IE_Example("basic") _IEPropertySet($oIE, "addressbar", False) _IENavigate($oIE, "\index.html") Case $hButton8 MsgBox("", "MsgBox 1", "Test from Gui 1") Case $hButton9 GUICtrlSetState($hButton9, $GUI_DISABLE) gui2() Case $hButton10 GUICtrlSetState($hButton10, $GUI_DISABLE) gui3() Case $hButton11 GUICtrlSetState($hButton11, $GUI_DISABLE) gui4() EndSwitch Case $hGUI2 Switch $aMsg[0] ; Now check for the messages for $hGUI2 Case $GUI_EVENT_CLOSE ; If we get the CLOSE message from this GUI - we just delete the GUI <<<<<<<<<<<<<<< GUIDelete($hGUI2) GUICtrlSetState($hButton9, $GUI_ENABLE) Case $h1Button1 MsgBox("", "MsgBox", "Test from Gui 2") EndSwitch Case $hGUI3 Switch $aMsg[0] ; Now check for the messages for $hGUI2 Case $GUI_EVENT_CLOSE ; If we get the CLOSE message from this GUI - we just delete the GUI <<<<<<<<<<<<<<< GUIDelete($hGUI3) GUICtrlSetState($hButton10, $GUI_ENABLE) Case $h2Button1 MsgBox("", "MsgBox", "Test from Gui 3") EndSwitch Case $hGUI4 Switch $aMsg[0] ; Now check for the messages for $hGUI2 Case $GUI_EVENT_CLOSE ; If we get the CLOSE message from this GUI - we just delete the GUI <<<<<<<<<<<<<<< GUIDelete($hGUI4) GUICtrlSetState($hButton11, $GUI_ENABLE) Case $h3Button1 MsgBox("", "MsgBox", "Test from Gui 3") EndSwitch EndSwitch WEnd EndFunc ;==>gui1 Func gui2() $hGUI2 = GUICreate("Gui 2", 600, 600, 50, 50) $h1Button1 = GUICtrlCreateButton("MsgBox 2", 10, 10, 80, 30) $h1Button2 = GUICtrlCreateButton("MsgBox 3", 10, 40, 80, 30) GUISetState() EndFunc ;==>gui2 Func gui3() $hGUI3 = GUICreate("Gui 3", 600, 600, 100, 100) $h2Button1 = GUICtrlCreateButton("MsgBox 2", 10, 10, 80, 30) $h2Button2 = GUICtrlCreateButton("MsgBox 3", 10, 40, 80, 30) GUISetState() EndFunc ;==>gui3 Func gui4() $hGUI4 = GUICreate("Gui 4", 600, 600, 150, 150) $h3Button1 = GUICtrlCreateButton("MsgBox 2", 10, 10, 80, 30) $h3Button2 = GUICtrlCreateButton("MsgBox 3", 10, 40, 80, 30) GUISetState() EndFunc ;==>gui4 [/CODE] 2. Örnek Kod [CODE] #include "MouseOnEvent.au3" HotKeySet("{ESC}", "_Quit") Global $iLimit_Coord_Left = 0 Global $iLimit_Coord_Top = 20 Global $iLimit_Coord_Width = 1500 Global $iLimit_Coord_Height = 25 ;This will disable primary down event, double clicks included (see next) _MouseSetOnEvent($MOUSE_PRIMARYDOWN_EVENT, "_MousePrimaryDown_Event", 0, -1) ;Enable Double click, comment next line if double clicks should be disabled _MouseSetOnEvent($MOUSE_PRIMARYDBLCLK_EVENT, "_MousePrimaryDown_Event", 0, -1) While 1 Sleep(100) WEnd Func _MousePrimaryDown_Event() Local $aMPos = MouseGetPos() If ($aMPos[0] >= $iLimit_Coord_Left And $aMPos[0] <= $iLimit_Coord_Left + $iLimit_Coord_Width) And _ ($aMPos[1] >= $iLimit_Coord_Top And $aMPos[1] <= $iLimit_Coord_Top + $iLimit_Coord_Height) Then Return 1 ;Block mouse click Return 0 EndFunc Func _Quit() Exit EndFunc [/CODE] Bu @blue_life Arkadaşın verdiği bir örnek 3.Örnek Kod [CODE] Local $var = IniRead("C:\1.ini", "SectionName", "key", "Hata") Global $BlueLife_Info[5] _BlueLife_Info($var, 1336, 30) While 1 For $i = 1390 To -1400 Step -1 GUICtrlSetPos($BlueLife_Info[1], $i) Sleep(5) Next WEnd GUICtrlSetData($BlueLife_Info[1], "Kurulum tamamlandı.") _BlueLife_Info(1, 0, 0) Exit ;çıkış Func _BlueLife_Info($BL_MSG, $BL_X = 200, $BL_Y = 50) Local $Tray_Heihgt = WinGetHandle("[CLASS:Shell_TrayWnd]") If $Tray_Heihgt = "" Then $Tray_Heihgt = 0 Else $Tray_Heihgt = WinGetPos($Tray_Heihgt) $Tray_Heihgt = $Tray_Heihgt[3] EndIf If IsHWnd($BlueLife_Info[0]) = 0 Then $BlueLife_Info[0] = GUICreate("", $BL_X, $BL_Y, @DesktopWidth - ($BL_X + 2), (@DesktopHeight - $Tray_Heihgt) - $BL_Y, 0x80000000) $BlueLife_Info[1] = 0 $BlueLife_Info[2] = $BL_X $BlueLife_Info[3] = $BL_Y $BlueLife_Info[4] = 100 GUISetBkColor(0x3300CC) Local $BK_GUI_GDI = DllCall("gdi32.dll", "long", "CreateRoundRectRgn", "long", 1, "long", 1, "long", $BlueLife_Info[2], "long", $BlueLife_Info[3], "long", 5, "long", 5) If $BK_GUI_GDI[0] Then DllCall("user32.dll", "long", "SetWindowRgn", "hwnd", $BlueLife_Info[0], "long", $BK_GUI_GDI[0], "int", 1) EndIf $BlueLife_Info[1] = GUICtrlCreateLabel($BL_MSG, 6, 6, $BlueLife_Info[2] - 10, $BlueLife_Info[3] - 10) ;, 1 GUICtrlSetFont(-1, 11, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0xFFFFFF) GUICtrlSetResizing(-1, 64 + 32) GUISetState(@SW_SHOWNOACTIVATE) WinSetTrans($BlueLife_Info[0], "", $BlueLife_Info[4]) Else If StringIsDigit($BL_MSG) = 1 And $BL_X + $BL_Y = 0 Then Sleep($BL_MSG) Do $BlueLife_Info[4] -= 5 WinSetTrans($BlueLife_Info[0], "", $BlueLife_Info[4]) Sleep(25) Until $BlueLife_Info[4] < 1 GUIDelete($BlueLife_Info[0]) $BlueLife_Info = "" Return EndIf GUICtrlSetData($BlueLife_Info[1], $BL_MSG) If $BL_X <> $BlueLife_Info[2] Or $BL_Y <> $BlueLife_Info[3] Then $BlueLife_Info[2] = $BL_X $BlueLife_Info[3] = $BL_Y WinMove($BlueLife_Info[0], "", @DesktopWidth - ($BlueLife_Info[2] + 2), (@DesktopHeight - $Tray_Heihgt) - $BlueLife_Info[3], $BlueLife_Info[2], $BlueLife_Info[3], 1) Local $BK_GUI_GDI = DllCall("gdi32.dll", "long", "CreateRoundRectRgn", "long", 1, "long", 1, "long", $BlueLife_Info[2], "long", $BlueLife_Info[3], "long", 5, "long", 5) If $BK_GUI_GDI[0] Then DllCall("user32.dll", "long", "SetWindowRgn", "hwnd", $BlueLife_Info[0], "long", $BK_GUI_GDI[0], "int", 1) EndIf EndIf EndIf EndFunc [/CODE] İşin aslı örnek olarak bunlar ama atıyorum ben bişi daha eklemek istesem programa nasıl ekleyeceğim gerçek derdim bu bunlar birbirleri ile çakışıyorlar. Eğer yardım ederseniz çok sevinirim. İyi günler.
  4. @blue_life Öncelikle mükemmel bir örnek olmuş. Benim sorum biz buna bilgisayarı kapat yada oturumu kapat komutunu nasıl ekleriz acaba. Birde elimde 3 ayrı kod var ve bunları tek script haline nasıl getirebilirim. İsterseniz kodları yollayabilirim.
  5. İlginize çok teşekkür ederim aradığım kodu buldum. Belki işine yarayan olur diye buraya ekliyorum. İyi günler. [quote] [CODE] #include "MouseOnEvent.au3" HotKeySet("{ESC}", "_Quit") Global $iLimit_Coord_Left = 0 Global $iLimit_Coord_Top = 20 Global $iLimit_Coord_Width = 1500 Global $iLimit_Coord_Height = 25 ;This will disable primary down event, double clicks included (see next) _MouseSetOnEvent($MOUSE_PRIMARYDOWN_EVENT, "_MousePrimaryDown_Event", 0, -1) ;Enable Double click, comment next line if double clicks should be disabled _MouseSetOnEvent($MOUSE_PRIMARYDBLCLK_EVENT, "_MousePrimaryDown_Event", 0, -1) While 1 Sleep(100) WEnd Func _MousePrimaryDown_Event() Local $aMPos = MouseGetPos() If ($aMPos[0] >= $iLimit_Coord_Left And $aMPos[0] <= $iLimit_Coord_Left + $iLimit_Coord_Width) And _ ($aMPos[1] >= $iLimit_Coord_Top And $aMPos[1] <= $iLimit_Coord_Top + $iLimit_Coord_Height) Then Return 1 ;Block mouse click Return 0 EndFunc Func _Quit() Exit EndFunc [/CODE] [/quote]
  6. Herkese kolay gelsin. Mesela belli bir koordinatlar içerisinde fare'ye tıklandığında ESC tuşuna basılmasını nasıl ayarlayabilirim. Örnek resimdeki dikdörtgenin içinde herhangi bir yere tıklandığında esc tuşuna basılması istiyorum fakat bu ben programı kapatana katar hep ektif olmasınıda sağlamam gerekiyor. Yardımlarınız için şimdiden teşekkürler. [img]http://e1210.hizliresim.com/12/6/dq16k.jpg[/img]
  7. @blue_life evet elinize sağlık güzel olmuş fakat ini dosyası aradan bir dosya silindiğinde atıyorum 19'u sildiğimde lisview'de düzgün görüntülüyor fakat ini dosyası 19'u siliyor ve o numarayı es geçerek devam ediyor. Buda ini dosyasında karmaşa yaratıp sonraki kayıtları kayıt altına almıyor. Aslinda silme işleminden sonra listview'deki gibi komple ini dosyasını tekrar silip baştan oluşturamıyor muyuz acaba? kodları göndermedim sizin son mesajınızda mevcut zaten bi değişiklik yapmadım işin aslı. İlginize ve alakanız için tekrar minnettarım.
  8. @blue_life ilgili kod üstte olduğundan dolayı tekrar yazmamıştım neyse kusura bakmayın kod aşşağıdaki birde InventoryData.ini dosyasınıda koyuyorum. [codebox] #include <array.au3> Global $ScriptDir = @ScriptDir If StringRight($ScriptDir, 1) <> "\" Then $ScriptDir &= "\" Global $INI_FILE = $ScriptDir & "InventoryData.ini" Global $BLUE_ARRAY Global $i=1 Global $MainForm = GUICreate("Form1", 623, 442) Global $ListView1 = GUICtrlCreateListView("Sıra|Product Code|Make|Model|Current Stock|Date Modified", 16, 8, 586, 390) GUICtrlSendMsg(-1, 4126, 0, 100) GUICtrlSendMsg(-1, 4126, 1, 100) GUICtrlSendMsg(-1, 4126, 2, 100) GUICtrlSendMsg(-1, 4126, 3, 82) GUICtrlSendMsg(-1, 4126, 4, 80) GUICtrlSendMsg(-1, 4126, 5, 120) _Update_ListView() ;ListView Güncelle 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][7] ;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], 0) <> "" 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][7] $RETURN_ARRAY[$RETURN_ARRAY[0][0]][1] = StringStripWS(IniRead($INI_FILE, $RAD_ISName[$i], "Sıra", $RAD_ISName[$i]), 3) $RETURN_ARRAY[$RETURN_ARRAY[0][0]][2] = IniRead($INI_FILE, $RAD_ISName[$i], "Product Code", "") $RETURN_ARRAY[$RETURN_ARRAY[0][0]][3] = IniRead($INI_FILE, $RAD_ISName[$i], "Make", "") $RETURN_ARRAY[$RETURN_ARRAY[0][0]][4] = IniRead($INI_FILE, $RAD_ISName[$i], "Model", "") $RETURN_ARRAY[$RETURN_ARRAY[0][0]][5] = IniRead($INI_FILE, $RAD_ISName[$i], "Current Stock", "") $RETURN_ARRAY[$RETURN_ARRAY[0][0]][6] = 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][7] Return $RETURN_ARRAY EndFunc ;==>_READ_INI Func _Update_ListView() If IsArray($BLUE_ARRAY) = 0 Then $BLUE_ARRAY = _READ_INI() ;Read_Ini_File EndIf 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] & "|" & $BLUE_ARRAY[$i][6], $ListView1) Next EndFunc ;==>_Update_ListView Func _Add_Edit_AProduct($AType = "Add") Local $GuiRead Local $i, $No, $productCode, $make, $Deneme, $model, $currentStock, $dataModified 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 $No = $BLUE_ARRAY[$i][1] $productCode = $BLUE_ARRAY[$i][2] $make = $BLUE_ARRAY[$i][3] $model = $BLUE_ARRAY[$i][4] $currentStock = $BLUE_ARRAY[$i][5] $dataModified = $BLUE_ARRAY[$i][6] 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) Local $aInput5 = GUICtrlCreateInput($dataModified, 16, 184, 193, 21) Local $aLabel1 = GUICtrlCreateLabel($i, 16, 1, 30, 16, 0x1000) 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 = StringStripWS(GUICtrlRead($aInput4), 3) If $currentStock = "" 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][7] $BLUE_ARRAY[0][1] = $BLUE_ARRAY[0][0] EndIf $BLUE_ARRAY[$BLUE_ARRAY[0][1]][1] = $i $BLUE_ARRAY[$BLUE_ARRAY[0][1]][2] = $productCode $BLUE_ARRAY[$BLUE_ARRAY[0][1]][3] = $make $BLUE_ARRAY[$BLUE_ARRAY[0][1]][4] = $model $BLUE_ARRAY[$BLUE_ARRAY[0][1]][5] = $currentStock $BLUE_ARRAY[$BLUE_ARRAY[0][1]][6] = $dataModified IniWrite($INI_FILE, "" & $i, "Product Code", $productCode) IniWrite($INI_FILE, "" & $i, "Make", $make) IniWrite($INI_FILE, "" & $i, "Model", $model) IniWrite($INI_FILE, "" & $i, "Current Stock", $currentStock) IniWrite($INI_FILE, "" & $i, "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", "" & $BLUE_ARRAY[$i][1]) $BLUE_ARRAY[$i][0] = -1 ExitLoop EndIf Next EndIf EndFunc ;==>_DeleteItem [/codebox] [b]InventoryData.ini[/b] [codebox] [1] Product Code=a Make=a Model=a Current Stock=a Date Modified=a [2] Product Code=b Make=b Model=b Current Stock=b Date Modified=b [3] Product Code=c Make=c Model=c Current Stock=c Date Modified=c [4] Product Code=d Make=d Model=d Current Stock=d Date Modified=d [5] Product Code=e Make=e Model=e Current Stock=e Date Modified=e [6] Product Code=f Make=f Model=f Current Stock=f Date Modified=f [7] Product Code=g Make=g Model=g Current Stock=g Date Modified=g [8] Product Code=h Make=h Model=h Current Stock=h Date Modified=h [9] Product Code=ı Make=ı Model=ı Current Stock=ı Date Modified=ı [10] Product Code=i Make=i Model=i Current Stock=i Date Modified=i [/codebox]
  9. arkadaşlar iki sorum daha olacak [b]1.[/b] add kısmına tıkladığımızda resimde kırmızı icerisine almış olduğum yere otomatik sıradaki numarayı nasıl yazdırabilirim.(Yani bir sonraki numarayı) [b]2.[/b] Arkadaşlar sorum şu rakamsal olarak sıralıyorum fakat atıyorum 6 numarayı silince 1 2 3 4 5 7 8 9 10 olarak sıralıyor örnektede 2 numaralı satır. Ben silme işlemini yaptıktan sonra tüm listedeki rakamları tekrar editlemesini ve 1 2 3 4 5 6 7 8 9 olarak yazmasını nasıl sağlarım. (aradaki 6 silinince liste otomatik 9 item dan oluşacak ve sıralamayı tekrar baştan kayıt edecek.) [img]http://g1203.hizliresim.com/v/x/3wy0p.png[/img]
  10. yok denemedim hemen deniyorum. evet düzeldi şimdi sorun array kısmıymış sağol.
  11. sağol gerçekten aradığım buydu. Çok işime yaradı.
  12. yaa o bi örnek login sayfaya önemli değil önemli olan adres bar filan olmadan açmak yani popup örneğiyle.
  13. evet sıra kolonu altında itemleri sıralamak evet biliyorum ama otomatik olarak numara vermek ve ilgili örneğe bir bakarsanızi 1 10 2 3 4 5 bu şekilde devam ediyor sıkıntı 10 numarayı 9 dan sonra değilde 1 den sonra alıyor olması.
  14. Şu alttaki kod güzel ama iexplorer olmasını istememdeki sebep iexplorer içerisine otomatik çalışan eklentiler mevcut o yüzden pop-up olması benim açımdan daha büyük bir avantaj aslında. [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) $IE_OBJECT = GUICtrlCreateObj($MY_OIE, 0, 0, 640, 456) 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 EndSwitch WEnd [/codebox]
  15. yok elimde html kod var ama onları buraya nasıl editleyebilirim bilmiyorum. [codebox] <HEAD> <script LANGUAGE="JavaScript"> function popUp(URL) { day = new Date(); id = day.getTime(); eval("page" + id + " = window.open(URL, '" + id + "', 'toolbar=0,scrollbars=1,location=0,statusbar=0,menubar=0,resizable=1,width=800,height=620,left = 0,top = 0');"); } </script> <meta http-equiv="Content-Type" content="text/html; charset=utf-8" /> <style type="text/css"> body { margin-left: 0px; margin-top: 0px; background-color: #EEF0EF; } </style> <a href="javascript:popUp('http://www.google.com')"><img src="Resimler/SGK.png" width="48" height="48" border="1" /></a> <body oncontextmenu="return false" onselectstart="return false" ondragstart="return false"> [/codebox]
×
×
  • Create New...