Objelere Görev Yaptırma

[korasoglu]

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

[KintaRo]

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.

[korasoglu]

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