Button sesi


   Var
  Form1: TCLForm;
  LayoutKutu: TclLayout;
  BtnBasla, BtnBilgi : TClProButton;
  ImgBilgi : TClProImage;

void BtnBaslaClick;
{
  Clomosy.RunUnit('Ugiris');
}

void BtnBilgiClick;
{
  ImgBilgi.Visible = True;
  ImgBilgi.BringToFront;
}

void ImgBilgiClick;
{
  ImgBilgi.Visible = False;
}

{
  Form1 = TCLForm.Create(Self);

  //  ARKA PLAN (SENİN GÖRSELİN)
  Form1.SetFormBGImage('https://resmim.net/cdn/2026/01/21/wigtJn.png');

  //  BUTON ALANI (ALTTA)
  LayoutKutu = Form1.AddNewLayout(Form1, 'LayoutKutu');
  LayoutKutu.Align = alBottom;
  LayoutKutu.Height = 140;
  LayoutKutu.Width = 320;
  LayoutKutu.Margins.Bottom = 40;


  // OYNA (SOL)
  BtnBasla = Form1.AddNewProButton(LayoutKutu, 'BtnBasla', '');
  BtnBasla.Align = alLeft;
  BtnBasla.Width = 150;
  BtnBasla.Height = 100;

  // GÖRÜNMEZ BUTON AYARLARI
  BtnBasla.clProSettings.BackgroundColor = clAlphaColor.clNull;
  BtnBasla.clProSettings.BorderColor = clAlphaColor.clNull;
  BtnBasla.clProSettings.FontColor = clAlphaColor.clNull;
  BtnBasla.SetclProSettings(BtnBasla.clProSettings);

  Form1.AddNewEvent(BtnBasla, tbeOnClick, 'BtnBaslaClick');

  //  NASIL OYNANIR? (SAĞ – DEVAM YERİ)
  BtnBilgi = Form1.AddNewProButton(LayoutKutu, 'BtnBilgi', '');
  BtnBilgi.Align = alRight;
  BtnBilgi.Width = 150;
  BtnBilgi.Height = 100;

  //  GÖRÜNMEZ BUTON AYARLARI
  BtnBilgi.clProSettings.BackgroundColor = clAlphaColor.clNull;
  BtnBilgi.clProSettings.BorderColor = clAlphaColor.clNull;
  BtnBilgi.clProSettings.FontColor = clAlphaColor.clNull;
  BtnBilgi.SetclProSettings(BtnBilgi.clProSettings);

  Form1.AddNewEvent(BtnBilgi, tbeOnClick, 'BtnBilgiClick');

  // BİLGİ GÖRSELİ (POP-UP)
  ImgBilgi = Form1.AddNewProImage(Form1, 'ImgBilgi');
  ImgBilgi.Align = alClient;
  ImgBilgi.Visible = False;
  ImgBilgi.clProSettings.PictureSource =
  'https://raw.githubusercontent.com/kayra12oztruk-byte/oyun-/main/button.png';
  ImgBilgi.clProSettings.IsFill = True;
  ImgBilgi.SetclProSettings(ImgBilgi.clProSettings);

  Form1.AddNewEvent(ImgBilgi, tbeOnClick, 'ImgBilgiClick');

  Form1.Run;
}

 Yaptığım giriş ekranına buttona basıldığında ses vermesini istiyorum yardımcı olurmuşsunuz
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">

Yazar	Mesaj Konu Arama Topic Seçenekleri Yanıt Yaz Yeni Konu Oluştur Konuyu Yazdır Çeviri Konu
kayra12 Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Yeni Üye Kayıt Tarihi: 23 Aralık 2024 Durum: Aktif Değil Puanlar: 38	Mesaj Seçenekleri Yanıt Yaz Alıntı kayra12 Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Konu: Button sesi Gönderim Zamanı: 3 Saat 2 Dakika Önce Saat 07:26
	Var Form1: TCLForm; LayoutKutu: TclLayout; BtnBasla, BtnBilgi : TClProButton; ImgBilgi : TClProImage; void BtnBaslaClick; { Clomosy.RunUnit('Ugiris'); } void BtnBilgiClick; { ImgBilgi.Visible = True; ImgBilgi.BringToFront; } void ImgBilgiClick; { ImgBilgi.Visible = False; } { Form1 = TCLForm.Create(Self); // ARKA PLAN (SENİN GÖRSELİN) Form1.SetFormBGImage('https://resmim.net/cdn/2026/01/21/wigtJn.png'); // BUTON ALANI (ALTTA) LayoutKutu = Form1.AddNewLayout(Form1, 'LayoutKutu'); LayoutKutu.Align = alBottom; LayoutKutu.Height = 140; LayoutKutu.Width = 320; LayoutKutu.Margins.Bottom = 40; // OYNA (SOL) BtnBasla = Form1.AddNewProButton(LayoutKutu, 'BtnBasla', ''); BtnBasla.Align = alLeft; BtnBasla.Width = 150; BtnBasla.Height = 100; // GÖRÜNMEZ BUTON AYARLARI BtnBasla.clProSettings.BackgroundColor = clAlphaColor.clNull; BtnBasla.clProSettings.BorderColor = clAlphaColor.clNull; BtnBasla.clProSettings.FontColor = clAlphaColor.clNull; BtnBasla.SetclProSettings(BtnBasla.clProSettings); Form1.AddNewEvent(BtnBasla, tbeOnClick, 'BtnBaslaClick'); // NASIL OYNANIR? (SAĞ – DEVAM YERİ) BtnBilgi = Form1.AddNewProButton(LayoutKutu, 'BtnBilgi', ''); BtnBilgi.Align = alRight; BtnBilgi.Width = 150; BtnBilgi.Height = 100; // GÖRÜNMEZ BUTON AYARLARI BtnBilgi.clProSettings.BackgroundColor = clAlphaColor.clNull; BtnBilgi.clProSettings.BorderColor = clAlphaColor.clNull; BtnBilgi.clProSettings.FontColor = clAlphaColor.clNull; BtnBilgi.SetclProSettings(BtnBilgi.clProSettings); Form1.AddNewEvent(BtnBilgi, tbeOnClick, 'BtnBilgiClick'); // BİLGİ GÖRSELİ (POP-UP) ImgBilgi = Form1.AddNewProImage(Form1, 'ImgBilgi'); ImgBilgi.Align = alClient; ImgBilgi.Visible = False; ImgBilgi.clProSettings.PictureSource = 'https://raw.githubusercontent.com/kayra12oztruk-byte/oyun-/main/button.png'; ImgBilgi.clProSettings.IsFill = True; ImgBilgi.SetclProSettings(ImgBilgi.clProSettings); Form1.AddNewEvent(ImgBilgi, tbeOnClick, 'ImgBilgiClick'); Form1.Run; } Yaptığım giriş ekranına buttona basıldığında ses vermesini istiyorum yardımcı olurmuşsunuz 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">

Emr.Erkmn Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Moderatör Kayıt Tarihi: 28 Şubat 2025 Durum: Aktif Değil Puanlar: 672	Mesaj Seçenekleri Yanıt Yaz Alıntı Emr.Erkmn Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Gönderim Zamanı: 2 Saat 26 Dakika Önce Saat 08:02
	Merhaba Kayra, Projende ses kullanmak için https://www.docs.clomosy.com/index.php?title=TclMediaPlayer kullanmalısın. Kullanmak istediğin sesi Drive hesabına yükleyip oradan çağırabilirsin 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">