Clomosy | Forum : if olasılığının karşılanmaması https://forum.clomosy.com.tr/ Copyright (c) 2006-2013 Web Wiz Forums - All Rights Reserved. Mon, 04 May 2026 14:38:59 +0000 Wed, 08 May 2024 18:20:43 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.07 360 https://forum.clomosy.com.tr/RSS_post_feed.asp?TID=588 <![CDATA[Clomosy | Forum]]> https://forum.clomosy.com.tr/forum_images/logo.png https://forum.clomosy.com.tr/ <![CDATA[if olasılığının karşılanmaması : teşekkür ederim ben sola doğru...]]> https://forum.clomosy.com.tr/forum_posts.asp?TID=588&PID=795#795 Yazar: umutbilici
Konu: 588
Gönderim Zamanı: 08 Mayıs 2024 Saat 18:20

teşekkür ederim ben sola doğru hareket ettiği için clAnimateFloat(resim1,'Position.X',resim1.Position.X - aradegeren / 2,2,1,0);koduyla alakalı bi sıkıntı olduğunu düşünmüştüm ona hiç dikkat etmemiştim ]]> Wed, 08 May 2024 18:20:43 +0000 https://forum.clomosy.com.tr/forum_posts.asp?TID=588&PID=795#795 <![CDATA[if olasılığının karşılanmaması : Merhaba Umut,Kodu inceledim. Resmin...]]> https://forum.clomosy.com.tr/forum_posts.asp?TID=588&PID=792#792 Yazar: BilalCndn
Konu: 588
Gönderim Zamanı: 08 Mayıs 2024 Saat 11:56

Merhaba Umut,

Kodu inceledim. Resmin boyutu 180(200-deger)e ulaşasıya kadar butona her tıkladığında 'else' kod bloğu çalışıyor. 180nin üzerine çıktığında ise en üstteki 'if' kısmı çalışıyor. Burada görselin yüksekliği 200 oluyor fakat görselin genişliği son değerinde sabit kalıyor. Bu sebeple butona her tıkladığında tekrar tekrar bu 'if' çalışıyor ve görselin boyutu değişmeden sadece konumu değişiyor. Yapman gereken değişiklik aşağıdaki gibidir.

if(((deger>200-resim1.Height) && (200-resim1.Height>0)) || ((deger>200-resim1.Width) && (200-resim1.Width>0)) ) 
  {
   aradegerboy=200-resim1.Height;
   aradegeren=200-resim1.Width;
   clAnimateFloat(resim1,'Height',200,2,1,0);
   clAnimateFloat(resim1,'Width',200,2,1,0); //Eklediğim satır
   ShowMessage('Genişlik: ' + FloatToStr(resim1.Width) + ' Yükseklik: ' + FloatToStr(resim1.Height)); //Kontrol 
   clAnimateFloat(resim1,'Position.X',resim1.Position.X - aradegeren / 2,2,1,0);
   clAnimateFloat(resim1,'Position.Y',resim1.Position.y - aradegerboy / 2,2,1,0);
    //resim1.Height=200
    //resim1.Width=200
    //resim1.Position.X=resim1.Position.X - aradegeren / 2
    //resim1.Position.Y=resim1.Position.Y - aradegerboy / 2
    //ShowMessage(resim1.Height);
    
  }

Sorununun çözüme ulaşıp ulaşmadığı ile ilgili geri dönüşünü bekliyorum.
İyi çalışmalar diliyorum.
]]> Wed, 08 May 2024 11:56:40 +0000 https://forum.clomosy.com.tr/forum_posts.asp?TID=588&PID=792#792 <![CDATA[if olasılığının karşılanmaması : butona basılıncaa resmin animasyonlu...]]> https://forum.clomosy.com.tr/forum_posts.asp?TID=588&PID=790#790 Yazar: umutbilici
Konu: 588
Gönderim Zamanı: 07 Mayıs 2024 Saat 21:26

butona basılıncaa resmin animasyonlu şekilde büyümesini ve resmi aynı zamanda ortalamasını istediğim kod, resmin büyüklüğü en fazla 200 olması lazım ama 200 olduktan sonra sola gitmeye(sanırsam else altında olan clAnimateFloat(resim1,'Position.X',resim1.Position.X - deger / 2,2,1,0); kodu çalışıyor) devam ediyor yardımcı olur musunuz? (deger: 20)

void buyultme
var
sagdanposx,alttanposy,aradeger,aradegeren:Integer
{
sagdanposx=resim1.Position.X+resim1.Width
alttanposy=resim1.Position.Y+resim1.Height
  if(((deger>200-resim1.Height) && (200-resim1.Height>0)) || ((deger>200-resim1.Width) && (200-resim1.Width>0)) ) 
  {
   aradegerboy=200-resim1.Height
   aradegeren=200-resim1.Width
   clAnimateFloat(resim1,'Height',200,2,1,0);
   clAnimateFloat(resim1,'Position.X',resim1.Position.X - aradegeren / 2,2,1,0);
   clAnimateFloat(resim1,'Position.Y',resim1.Position.y - aradegerboy / 2,2,1,0);
    //resim1.Height=200
    //resim1.Width=200
    //resim1.Position.X=resim1.Position.X - aradegeren / 2
    //resim1.Position.Y=resim1.Position.Y - aradegerboy / 2
    //ShowMessage(resim1.Height);
    
  }
  else if((resim1.Height+deger>200) || (resim1.Width+deger>200))
  {
    ShowMessage('Büyütme Sınırına Ulaştınız!');
    //ShowMessage(resim1.Height); //KONTROL
  }
  else if((resim1.Position.X<deger) || (sagdanposx+20>resimpanel.Width))
  {
    ShowMessage('Sınırları Aşamazsınız!');
  }
  else if((resim1.Position.Y<deger) || (alttanposy+20>resimpanel.Height))
  {
    ShowMessage('Sınırları Aşamazsınız!');
  }
  else
  {
    clAnimateFloat(resim1,'Height',resim1.Height+deger,2,1,0);
    //resim1.Height=resim1.Height+deger
    clAnimateFloat(resim1,'Width',resim1.Width+deger,2,1,0);
    //resim1.Width=resim1.Width+deger
    clAnimateFloat(resim1,'Position.X',resim1.Position.X - deger / 2,2,1,0);
    //resim1.Position.X=resim1.Position.X - deger / 2
    clAnimateFloat(resim1,'Position.Y',resim1.Position.Y - deger / 2,2,1,0);
    //resim1.Position.Y=resim1.Position.Y - deger / 2
    //ShowMessage(resim1.Height); //KONTROL
  }
}
]]> Tue, 07 May 2024 21:26:34 +0000 https://forum.clomosy.com.tr/forum_posts.asp?TID=588&PID=790#790