Clomosy | Forum : Buton animasyonu https://forum.clomosy.com.tr/ Copyright (c) 2006-2013 Web Wiz Forums - All Rights Reserved. Fri, 01 May 2026 19:22:51 +0000 Thu, 04 Dec 2025 13:55:21 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.07 360 https://forum.clomosy.com.tr/RSS_post_feed.asp?TID=1238 <![CDATA[Clomosy | Forum]]> https://forum.clomosy.com.tr/forum_images/logo.png https://forum.clomosy.com.tr/ <![CDATA[Buton animasyonu : Merhaba Hüseyin,Öncelikle şunu...]]> https://forum.clomosy.com.tr/forum_posts.asp?TID=1238&PID=2738#2738 Yazar: Emr.Erkmn
Konu: 1238
Gönderim Zamanı: 04 Aralık 2025 Saat 13:55

Merhaba Hüseyin, 
Öncelikle şunu belirtmek istiyorum bileşen özelliklerini tanımlarken  SetupComponent yapısını kullanmamanı istiyorum. 
Aşağıda bir örnek bırakıyorum incelemen için;

var
  MyForm: TclForm;
  btnAnimasyon: TclProButton;

void ButonTikla
{
  // Buton boyutunu büyüt
  btnAnimasyon.Width = btnAnimasyon.Width + 20;
  btnAnimasyon.Height = btnAnimasyon.Height + 10;
  
  // Renk değiştir
  btnAnimasyon.clProSettings.BackgroundColor = clAlphaColor.clHexToColor('#FF5722');
  btnAnimasyon.SetclProSettings(btnAnimasyon.clProSettings);
}

{
  MyForm = TclForm.Create(Self);
  MyForm.SetFormColor('#f5f5f5', '', clGNone);
  
  // Animasyonlu buton
  btnAnimasyon = MyForm.AddNewProButton(MyForm, 'btnAnimasyon', 'Tıkla');
  btnAnimasyon.Align = alCenter;
  btnAnimasyon.Width = 150;
  btnAnimasyon.Height = 50;
  btnAnimasyon.clProSettings.BackgroundColor = clAlphaColor.clHexToColor('#2196F3');
  btnAnimasyon.clProSettings.FontColor = clAlphaColor.clHexToColor('#ffffff');
  btnAnimasyon.clProSettings.FontSize = 16;
  btnAnimasyon.clProSettings.IsRound = True;
  btnAnimasyon.clProSettings.RoundHeight = 25;
  btnAnimasyon.clProSettings.RoundWidth = 25;
  btnAnimasyon.SetclProSettings(btnAnimasyon.clProSettings);
  MyForm.AddNewEvent(btnAnimasyon, tbeOnClick, 'ButonTikla');
  
  MyForm.Run;
}
https://static.cloudflareinsights.com/beacon.min.js/vcd15cbe7772f49c399c6a5babf22c1241717689176015" integrity="sha512-ZpsOmlRQV6y907TI0dKBHq9Md29nnaEIPlkf84rnaERnq6zvWvPUqr2ft8M1aS28oN72PdrCzSjY4U6VaAw1EQ==" data-cf-beacon="{"version":"2024.11.0","token":"439455f3e46c40b98dbd42a2f1a954d8","r":1,"server_timing":{"name":{"cfCacheStatus":true,"cfEdge":true,"cfExtPri":true,"cfL4":true,"cfOrigin":true,"cfSpeedBrain":true},"location_startswith":null}}" crossorigin="anonymous">]]> Thu, 04 Dec 2025 13:55:21 +0000 https://forum.clomosy.com.tr/forum_posts.asp?TID=1238&PID=2738#2738 <![CDATA[Buton animasyonu : void MouseMove;{}GirisButton =...]]> https://forum.clomosy.com.tr/forum_posts.asp?TID=1238&PID=2737#2737 Yazar: Hüseyin_Sadik
Konu: 1238
Gönderim Zamanı: 04 Aralık 2025 Saat 12:17

void MouseMove;
{
 
}

 GirisButton = Myform.AddNewProButton(MyForm, 'GirisButton', 'GİRİŞ');
  clComponent.SetupComponent(GirisButton,'{ "caption": "Giriş", "MarginBottom": 1, "Width": 250, 
  "Height": 60}');
  GirisButton.clProSettings.RoundHeight = 15;
  GirisButton.clProSettings.RoundWidth = 15;
  GirisButton.clProSettings.BorderWidth = 3;
  GirisButton.ClProSettings.BackgroundColor = clAlphaColor.clYellow;
  GirisButton.SetClProSettings(GirisButton.ClProSettings);
  MyForm.AddNewEvent(GirisButton, tbeOnClick,'ButtonClick');
  Myform.AddNewEvent(GirisButton, tbeOnMouseMove, 'MouseMove')

fonksiyona ne girersek fare butonun üzerine gelince buton büyür animasyon şeklinde

https://static.cloudflareinsights.com/beacon.min.js/vcd15cbe7772f49c399c6a5babf22c1241717689176015" integrity="sha512-ZpsOmlRQV6y907TI0dKBHq9Md29nnaEIPlkf84rnaERnq6zvWvPUqr2ft8M1aS28oN72PdrCzSjY4U6VaAw1EQ==" data-cf-beacon="{"version":"2024.11.0","token":"439455f3e46c40b98dbd42a2f1a954d8","r":1,"server_timing":{"name":{"cfCacheStatus":true,"cfEdge":true,"cfExtPri":true,"cfL4":true,"cfOrigin":true,"cfSpeedBrain":true},"location_startswith":null}}" crossorigin="anonymous">]]> Thu, 04 Dec 2025 12:17:01 +0000 https://forum.clomosy.com.tr/forum_posts.asp?TID=1238&PID=2737#2737