Sayfayı Yazdır | Pencereyi Kapat

Buton animasyonu

Nereden Yazdırıldığı: Clomosy | Forum
Kategori: Form Oluşturma
Forum Adı: TclForm Oluşturma
Forum Tanımlaması: Standart bir form oluşturma
URL: https://forum.clomosy.com.tr/forum_posts.asp?TID=1238
Tarih: 23 Ocak 2026 Saat 15:19
Program Versiyonu: Web Wiz Forums 12.07 - https://www.webwizforums.com


Konu: Buton animasyonu
Mesajı Yazan: Hüseyin_Sadik
Konu: Buton animasyonu
Mesaj Tarihi: 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" rel="nofollow - 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">



Cevaplar:
Mesajı Yazan: Emr.Erkmn
Mesaj Tarihi: 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" rel="nofollow - 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">



Sayfayı Yazdır | Pencereyi Kapat

Forum Software by Web Wiz Forums® version 12.07 - https://www.webwizforums.com
Copyright ©2001-2024 Web Wiz Ltd. - https://www.webwiz.net