Butona Fade In Efekti Ile Girme

[PColik]

arkadaşlar ben ams'de bir butonun üstüne gelince yavaşça soluk bir efektle gelmesini istiyorum.
Örnek;

mesela win7'de başlat butonunun üzerine gelince pencereler bir anda yanmıyor. yavaş yavaş geliyor.
bunu ams'de nasıl yapabilirim.

[DivaneTR]

[b]Button ile istediğin şey yapılamaz diye düşünüyorum. Ama image ile yapılabilir. Image.SetOpacity Özelliğinden Faydalanarak yapabilirsin.[/b]

[Byogulcan]

Bu image versyonu sen bunu butona uyarlıyıver
On Enter Kısmınıa Şunu;

Image.SetOpacity(this, 55)
Application.Sleep(10)
Image.SetOpacity(this, 60)
Application.Sleep(10)
Image.SetOpacity(this, 65)
Application.Sleep(10)
Image.SetOpacity(this, 70)
Application.Sleep(10)
Image.SetOpacity(this, 75)
Application.Sleep(10)
Image.SetOpacity(this, 80)
Application.Sleep(10)
Image.SetOpacity(this, 85)
Application.Sleep(10)
Image.SetOpacity(this, 90)
Application.Sleep(10)
Image.SetOpacity(this, 95)
Application.Sleep(10)
Image.SetOpacity(this, 100)
Application.Sleep(10)

On Leave Kısmına İse Şunu Yaz;

Image.SetOpacity(this, 100)
Application.Sleep(10)
Image.SetOpacity(this, 95)
Application.Sleep(10)
Image.SetOpacity(this, 90)
Application.Sleep(10)
Image.SetOpacity(this, 85)
Application.Sleep(10)
Image.SetOpacity(this, 80)
Application.Sleep(10)
Image.SetOpacity(this, 75)
Application.Sleep(10)
Image.SetOpacity(this, 70)
Application.Sleep(10)
Image.SetOpacity(this, 65)
Application.Sleep(10)
Image.SetOpacity(this, 60)
Application.Sleep(10)
Image.SetOpacity(this, 55)

[DivaneTR]

[b]Buttonlarla Opacity Kullanılamıyor Adamım. Ayrıca Sleep Değeri Az Olmamış mı ? 50 olsa daha hoş olmaz mı ?[/b]

[blackman12]

Ayrıca bunu bi for döngüsüyle yapsan da 20 satır koda gerek duymasan

[Byogulcan]

Uzun kodla ugrasmak projeyi daha profesyonel kılmazmı? Tabi bu benim fikrim

[xarax]

az kodla çok iş yaptırmak daha profesyonelcedir.
şöyle düşün 3 kişinin 1 saatte yapacağı işi 20 kişi 1 saatte yapsın ve aynı sürede bitirsin.(3 satır kodla yapılacak işi 20 satır kodla yapmak gibi)
Ücreti 3 kişiye ödemek mi, 20 kişiye ödemek mi? (işlemin 300ms mi sürsün, 2000ms mi?)

[KintaRo]

Şimdi hangisi daha profosyonelce bakalım

bumu:

[quote name='Byogulcan' date='15 September 2011 - 00:52 ' timestamp='1316037125' post='1079659']
Bu image versyonu sen bunu butona uyarlıyıver
On Enter Kısmınıa Şunu;

Image.SetOpacity(this, 55)
Application.Sleep(10)
Image.SetOpacity(this, 60)
Application.Sleep(10)
Image.SetOpacity(this, 65)
Application.Sleep(10)
Image.SetOpacity(this, 70)
Application.Sleep(10)
Image.SetOpacity(this, 75)
Application.Sleep(10)
Image.SetOpacity(this, 80)
Application.Sleep(10)
Image.SetOpacity(this, 85)
Application.Sleep(10)
Image.SetOpacity(this, 90)
Application.Sleep(10)
Image.SetOpacity(this, 95)
Application.Sleep(10)
Image.SetOpacity(this, 100)
Application.Sleep(10)

On Leave Kısmına İse Şunu Yaz;

Image.SetOpacity(this, 100)
Application.Sleep(10)
Image.SetOpacity(this, 95)
Application.Sleep(10)
Image.SetOpacity(this, 90)
Application.Sleep(10)
Image.SetOpacity(this, 85)
Application.Sleep(10)
Image.SetOpacity(this, 80)
Application.Sleep(10)
Image.SetOpacity(this, 75)
Application.Sleep(10)
Image.SetOpacity(this, 70)
Application.Sleep(10)
Image.SetOpacity(this, 65)
Application.Sleep(10)
Image.SetOpacity(this, 60)
Application.Sleep(10)
Image.SetOpacity(this, 55)
[/quote]

yoksa aynı işi yapan şu mu:

[quote]On Enter:

for i=1,100,5 do
Image.SetOpacity(this, i)
Application.Sleep(10)
end

On Leave:

for i=1,100,5 do
Image.SetOpacity(this, 100-i)
Application.Sleep(10)
end[/quote]