Bir Button'a İki Farklı Işlem Atamak İstek üzerine.

[guclusat]

Bir buttona ilk tıkladığınızda 1. işlemi, 2. tıkladığınızda 2. işlemi yaptirmak için;

Global Functions evresine;

nSayi = 0;

Button On Click evresine;

if nSayi == 0 then
 nSayi = 1;
 Dialog.Message("mesaj", "bu 1. tıklamanız") -- 1. işlem
 else
 nSayi = 0;
 Dialog.Message("mesaj", "bu 2. tıklamanız") -- 2. işlem
 end

yazmanız yeterli. Dialog.Message kodları yerine yaptirmak istediğiniz kodları yazın.

 

[guclusat]

Bildiğiniz üzere v8'de xButton nesnesi geldi. Normal button nesnesine çok benziyor ama buttona resim eklemek gibi bazı farklılıklar gösterebiliyor. Şöyleki;

Global Functions evresine;

nSayi = 0;

xButton On Click Evresine;

if nSayi == 0 then

nSayi = 1;

Dialog.Message("mesaj", "bu 1. tıklamanız") -- 1. işlem

xButton.SetImage("xButton1", "AutoPlay\\Images\\pause.png") -- resmi değiştir

xButton.SetText("xButton1", "Durdur") -- metni değiştir.

else

nSayi = 0;

Dialog.Message("mesaj", "bu 2. tıklamanız") -- 2. işlem

xButton.SetImage("xButton1", "AutoPlay\\Images\\play.png") -- resmi değiştir

xButton.SetText("xButton1", "Oynat") -- metni değiştir

end