korasoglu Posted October 19, 2011 Share Posted October 19, 2011 (edited) Arkadaşlar sayfada objelere kendisine kod yazmadan sayfa ayarlarından veya Globalden nasıl yaptırabiliriz. Mesela Butona : On Clike = [codebox]Button.SetVisible("A3", false); Button.SetVisible("B3", true); Paragraph.SetVisible("Secim", true); Seçilen = Seçilen+1 aa = INIFile.GetValue("AutoPlay\\Sayfalar\\Sayfa1\\Kayitlar\\Programlar.ini", "Programlar", "3", "3"); if aa ~= "" then Paragraph.SetText("Bilgi", aa..": Seçildi ".."- Toplam: "..Seçilen); asd = INIFile.SetValue("AutoPlay\\Sayfalar\\Sayfa1\\Kayitlar\\Kur.ini", "Kur", "3", isa); INIFile.SetValue("AutoPlay\\Sayfalar\\Sayfa1\\Kayitlar\\Kur2.ini", "Kur2", "3", "Sayfa1\\exe3.exe"); else end [/codebox] --------- On Right-Clik = [codebox]if(e_Type == Button.SetState("Black", LEFT_BUTTON_DOWN))then tblMenu = {}; tblMenu[1] ={}; tblMenu[1].Text = "Kayıt Düzenleme"; tblMenu[1].ID = 01; tblMenu[1].Checked = false; tblMenu[1].Enabled = true; tblMenu[1].IconID = 1; tblMenu[2] ={}; tblMenu[2].Text = "Kayıt Silme"; tblMenu[2].ID = 02; tblMenu[2].Checked = false; tblMenu[2].Enabled = true; tblMenu[2].IconID = 2; nRes = Application.ShowPopupMenu(305, 287, tblMenu, TPM_LEFTALIGN, TPM_BOTTOMALIGN, true, true); if(nRes == 01)then asd = INIFile.SetValue("AutoPlay\\Sayfalar\\Sayfa1\\Kayitlar\\Duzenle.ini", "Duzenle", "3", "3"); Page.Jump("Duzenle1"); end if(nRes == 02)then asf = INIFile.GetValue("AutoPlay\\Sayfalar\\Sayfa1\\Kayitlar\\Programlar.ini", "Programlar", "3", "3"); mesaj = Dialog.Message("KORASOGLU", asf.." - Kalıcı Olarak Silinecek Onaylıyormusunuz", MB_YESNO, MB_ICONSTOP, MB_DEFBUTTON1); if mesaj == 6 then INIFile.DeleteValue("AutoPlay\\Sayfalar\\Sayfa1\\Kayitlar\\Programlar.ini", "Programlar", "3", "3"); INIFile.DeleteValue("AutoPlay\\Sayfalar\\Sayfa1\\Kayitlar\\Aciklama.ini", "Aciklama", "3", "3"); INIFile.DeleteValue("AutoPlay\\Sayfalar\\Sayfa1\\Kayitlar\\Yuklenen.ini", "Yuklenen", "3", "3"); INIFile.DeleteValue("AutoPlay\\Sayfalar\\Sayfa1\\Simge\\Simge.ini", "Simge", "3", "3"); File.Delete("AutoPlay\\Sayfalar\\Sayfa1\\exe3.exe", false, false, false, nil); File.Delete("AutoPlay\\Sayfalar\\Sayfa1\\Simge\\3.png", false, false, false, nil); Image.SetVisible("K3", false); Button.SetText("A3", ""); Page.Jump("Page1"); elseif mesaj == 7 then Page.Jump("Page1"); end end end[/codebox] On Enter = [codebox]asd = INIFile.GetValue("AutoPlay\\Sayfalar\\Sayfa1\\Kayitlar\\Aciklama.ini", "Aciklama", "3", "3"); asd2 = INIFile.GetValue("AutoPlay\\Sayfalar\\Sayfa1\\Kayitlar\\System.ini", "System", "3", "3"); asd3 = INIFile.GetValue("AutoPlay\\Sayfalar\\Sayfa1\\Kayitlar\\Bit.ini", "Bit", "3", "3"); if isa ~= "" then Paragraph.SetText("Bilgi",asd.." - "..asd2.." "..asd3.." 'Bit De Çalışır."); else Paragraph.SetText("Bilgi", ""); end[/codebox] ---------- On Leave [code]Paragraph.SetText("Bilgi", "");[/code] Bunları Buttona Yazmadan Button1 tıladığım zaman On Clike görevini yerine getirsin ve bu şekilde dev am etsin Edited October 19, 2011 by KintaRo uzun kodları codebox tagı içerisine alın Quote Link to comment Share on other sites More sharing options...
KintaRo Posted October 19, 2011 Share Posted October 19, 2011 hepsini bir fonksiyonda tanımlayip yaptirirsin. mesela on click kodu için: [codebox]function onclick() Button.SetVisible("A3", false); Button.SetVisible("B3", true); Paragraph.SetVisible("Secim", true); Seçilen = Seçilen+1 aa = INIFile.GetValue("AutoPlay\\Sayfalar\\Sayfa1\\Kayitlar\\Programlar.ini", "Programlar", "3", "3"); if aa ~= "" then Paragraph.SetText("Bilgi", aa..": Seçildi ".."- Toplam: "..Seçilen); asd = INIFile.SetValue("AutoPlay\\Sayfalar\\Sayfa1\\Kayitlar\\Kur.ini", "Kur", "3", isa); INIFile.SetValue("AutoPlay\\Sayfalar\\Sayfa1\\Kayitlar\\Kur2.ini", "Kur2", "3", "Sayfa1\\exe3.exe"); end end[/codebox] şeklinde globalde fonksiyonu tanımlayıp daha sonra button on click'e sadece: onclick() yazarak ordaki kodları çalıştırabilirsin. Quote Link to comment Share on other sites More sharing options...
korasoglu Posted October 19, 2011 Author Share Posted October 19, 2011 (edited) evet ben eksik anlatmışım olay şu globalde bir döngü kuracağım bu döngü sonucunda herhangi bir butona tıkladığım zaman görev yaptırmak istiyorum. yani obje tanımlanması gerekiyor harhalde bunun için Hocam müsaitseniz bu aralar bana dönerseniz sevinirim... Şunu ve digerlerini uyguladım ama başaramadım.. Page.GetObjectScript("xButton1", "On Click"); Edited October 19, 2011 by korasoglu 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.