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

نسخة كاملة : التعامل مع checkbox
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم 
اود مساعدة بخصوص كود سورس لإضهار محتوى كلمة السر في edit و ذلك عند الضغط على مكون checkbox
السلام عليكم في الـ VCL يمكنك ذلك عن طريق
PHP كود :
edtPass.PasswordChar := #0; 
هناك خاصية في edit للفايرمونكي password  اجعلها true لاخفاء الباسوورد او false لاظهاره
كود :
FMX.Edit.TEdit.Password inherits from FMX.Edit.TCustomEdit.Password. All content below this line refers to FMX.Edit.TCustomEdit.Password. Specifies whether this edit control shows its characters or not. Set the Password property to True to make this edit control hide its characters for password-like input. Set Password to False to make this edit control show all its characters.
(15-08-2019, 07:06 PM)invocker كتب : [ -> ]هناك خاصية في edit للفايرمونكي password  اجعلها true لاخفاء الباسوورد او false لاظهاره

FMX.Edit.TEdit.Password inherits from FMX.Edit.TCustomEdit.Password. All content below this line refers to FMX.Edit.TCustomEdit.Password.

Specifies whether this edit control shows its characters or not.

Set the Password property to True to make this edit control hide its characters for password-like input. Set Password to False to make this edit control show all its charact
ممكن كود سور اكثر توضيح في فارمنكي
الامر لا يحتاج سورس الكود بسيط للغاية  ضع checkbox و edit1  وفي حدث CheckBox1Change  ضع الكود الاتي

كود :
edit1.Password:=CheckBox1.IsChecked ; هكذا procedure TForm1.CheckBox1Change(Sender: TObject); begin edit1.Password:=CheckBox1.IsChecked ; end;
(16-08-2019, 05:30 PM)invocker كتب : [ -> ]الامر لا يحتاج سورس الكود بسيط للغاية  ضع checkbox و edit1  وفي حدث CheckBox1Change  ضع الكود الاتي

كود :
edit1.Password:=CheckBox1.IsChecked ; هكذا procedure TForm1.CheckBox1Change(Sender: TObject); begin edit1.Password:=CheckBox1.IsChecked ;
[size=small]مشكور حبيبي [/size]