delphi4arab منتديات دلفي للعرب
كود الشرط في CheckBox - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كود الشرط في CheckBox (/showthread.php?tid=3149)



كود الشرط في CheckBox - المحجوب - 05-06-2011

ارغب في اضافة CheckBox الى الفريم واستعمالة مع المكون WindowsMediaPlayer1

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

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

وفك الميوت false


ارغب بكود شرطي عند اضافة علامة الصح وابعادها


كود الشرط في CheckBox - Agmcz - 05-06-2011

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



كود الشرط في CheckBox - محمد عبد العزيز - 05-06-2011


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

أو مباشرة دون استخدام if
كود :
WindowsMediaPlayer1.settings.mute := CheckBox1.checked;



كود الشرط في CheckBox - المحجوب - 06-06-2011

الله يعطيكم العافيه جميعاً

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

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


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