+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : إظهار الباسورد وإخفاءة (/showthread.php?tid=2976)
إظهار الباسورد وإخفاءة - x7x2011 - 06-04-2011
بسم الله الرحمن الرحيم
السلام عليكم ورحمة الله وبركاته
انا عندي برنامج ووضعت له باسورد قبل الدخول عليه
لكن فيه شيء ناقص فيه وهو CheckBox انا وضعته لكي يضهر الباسورد الذي في ال edit1
يعني إذا ضغط المستخدم على CheckBox ووضع عليه علامة صح يضهر الباسورد في edit1 وإذا مسح علامة الصح تضهر الدوائر .
والسؤال هو :
كيف يتم إظهار الباسورد في edit1 من خلال ال CheckBox وكذلك اخفاءة على شكل دوائر؟؟؟؟
إظهار الباسورد وإخفاءة - TF6M - 06-04-2011
و عليكم السلام و رحمة الله و بركاته
أخي x7x2011 , إستخدم خاصية البحث , سبق و طرح مواضيع ذات صلة :
كيف اجعل كلمة السر تظهر على شكل نجوم
تغير طبيعة الرموز المدخلة في الـ Edit
بالتوفيق,,
إظهار الباسورد وإخفاءة - roniothman - 06-04-2011
تفضل ياغالي اتمنى ان يكون هدا هو المطلوب
PHP كود :
procedure TForm1.CheckBox1Click(Sender: TObject);
begin
if CheckBox1.Checked then
edit1.PasswordChar:= '*'
else
edit1.PasswordChar:=#0;
end;
إظهار الباسورد وإخفاءة - x7x2011 - 06-04-2011
roniothman جزاك الله الف خير هذا الذي كنت ابحث عنه
إظهار الباسورد وإخفاءة - AnoirsoftDeveloper - 06-04-2011
السلام عليكم
أخي ،
مرادك في الأسفل
هذا لعرضه على شكل دوائر
استعمل نوع الخط Tahoma في Edit1
كود :
//===================================
if CheckBox1.Checked then
begin
Edit1.PasswordChar:=#0;
end else
begin
Edit1.PasswordChar:=#149;
end;
//===================================وتذكر دائما، استعمل البحث قبل الطرح