delphi4arab منتديات دلفي للعرب

نسخة كاملة : كود الشرط في CheckBox
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
ارغب في اضافة CheckBox الى الفريم واستعمالة مع المكون WindowsMediaPlayer1

بحيث لو وضعت علامة الصح في CheckBox يعطي mute واذا رفعت علامة الصح يلغي mute

الكود المخصص للميوت هو
كود :
WindowsMediaPlayer1.settings.mute= True;

وفك الميوت false


ارغب بكود شرطي عند اضافة علامة الصح وابعادها
PHP كود :
begin
  
if CheckBox1.checked = False  then
    WindowsMediaPlayer1
.settings.mute= False;
  else
  if 
CheckBox1.checked = True then
    WindowsMediaPlayer1
.settings.mute= True;
end; 

السلام عليكم ورحمة الله

أو مباشرة دون استخدام if
كود :
WindowsMediaPlayer1.settings.mute := CheckBox1.checked;
الله يعطيكم العافيه جميعاً

تعديل للكود الاول لكي يعمل

كود :
if CheckBox1.checked = False then WindowsMediaPlayer1.settings.mute:= False; if CheckBox1.checked = True then WindowsMediaPlayer1.settings.mute:= True;


اما الكود الثاني فشغال 100%