Clomosy | Forum : Sesin sürekli çalması https://forum.clomosy.com.tr/ Copyright (c) 2006-2013 Web Wiz Forums - All Rights Reserved. Mon, 04 May 2026 17:34:05 +0000 Mon, 04 May 2026 16:40:06 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.07 30 https://forum.clomosy.com.tr/RSS_post_feed.asp?TID=1464 <![CDATA[Clomosy | Forum]]> https://forum.clomosy.com.tr/forum_images/logo.png https://forum.clomosy.com.tr/ <![CDATA[Sesin sürekli çalması : İstediğin işlemi aşağıdaki koda...]]> https://forum.clomosy.com.tr/forum_posts.asp?TID=1464&PID=3340#3340 Yazar: kaanl0
Konu: 1464
Gönderim Zamanı: 04 Mayıs 2026 Saat 16:40

İstediğin işlemi aşağıdaki koda bakarak yapabilirsin. Sesin çalması için öncelikle telefona kaydedilmesi gerekir addassetfromurl kısmına ses dosyasının linkini yapıştır. Github google drive gibi yerlere yükleyebilirsin. Linkin public olmasına dikkat et. Ayrıca FileName kısmındaki ve url'nin sonundaki ismin aynı olmasına dikkat et.

var
  Form: TCLForm;
  Music: TCLMediaPlayer;
  MusicTimer: TCLTimer;

void MusicControl;
{

  if ((Music.State == 0) || (Music.State == 2))
  {
    Music.CurrentTime = 0;
    Music.Play;
  }
}

{
  Form = TCLForm.Create(Self);
  // Sesi internetten çekip projeye dahil ediyoruz
  Form.AddAssetFromUrl('Buraya Kendi ses dosyanın linkini yapıştır');

  Music = TCLMediaPlayer.Create(Form);
  Music.FileName = clPathCombine('timer.mp3', Clomosy.AppFilesPath);
  Music.CurrentTime = 0;
  Music.Play;

  MusicTimer = Form.AddNewTimer(Form, 'MusicTimer', 1000); 
  MusicTimer.Enabled = True; // DİKKAT: Zamanlayıcının çalışması için bu şart!
  Form.AddNewEvent(MusicTimer, tbeOnTimer, 'MusicControl');

  Form.Run; 
}
https://static.cloudflareinsights.com/beacon.min.js/v8c78df7c7c0f484497ecbca7046644da1771523124516" integrity="sha512-8DS7rgIrAmghBFwoOTujcf6D9rXvH8xm8JQ1Ja01h9QX8EzXldiszufYa4IFfKdLUKTTrnSFXLDkUEOTrZQ8Qg==" 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">]]> Mon, 04 May 2026 16:40:06 +0000 https://forum.clomosy.com.tr/forum_posts.asp?TID=1464&PID=3340#3340 <![CDATA[Sesin sürekli çalması : varForm : tclformMusic : tclmediaplayerMusicTimer...]]> https://forum.clomosy.com.tr/forum_posts.asp?TID=1464&PID=3334#3334 Yazar: BabaPiro4247
Konu: 1464
Gönderim Zamanı: 04 Mayıs 2026 Saat 14:12

var
Form : tclform
Music : tclmediaplayer
MusicTimer : TCLTimer
void MusicControl;
{
  if((Music.state == 0) || (Music.state == 2))
  {
    Music.CurrentTime = 0;
    Music.play;
  }
}
{

  form = tclform.create(Self);
  form.Run;
  
  Music = tclmediaplayer.create(Form);
  Music.FileName = clPathCombine('music',Clomosy.AppFilesPath);
  Music.CurrentTime = 0;
  Music.Play;
  
  MusicTimer= Form.AddNewTimer(Form,'musicitimer',1000); 
  Form.AddNewEvent(MusicTimer,tbeOnTimer,'MusicControl');
  
} 


kodum da sesin sürekli çalmasını istiyorum ama nasıl yapabilirim yardımcı olur musunuz?
]]> Mon, 04 May 2026 14:12:12 +0000 https://forum.clomosy.com.tr/forum_posts.asp?TID=1464&PID=3334#3334