التعامل مع checkbox

[SOFIANE09]

السلام عليكم 
اود مساعدة بخصوص كود سورس لإضهار محتوى كلمة السر في edit و ذلك عند الضغط على مكون checkbox

[S.FATEH]

السلام عليكم في الـ VCL يمكنك ذلك عن طريق

PHP كود :

edtPass.PasswordChar := #0; 


[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 characters.

[SOFIANE09]

هناك خاصية في 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

ممكن كود سور اكثر توضيح في فارمنكي

[invocker]

الامر لا يحتاج سورس الكود بسيط للغاية  ضع checkbox و edit1  وفي حدث CheckBox1Change  ضع الكود الاتي

كود :

edit1.Password:=CheckBox1.IsChecked ; هكذا procedure TForm1.CheckBox1Change(Sender: TObject); begin edit1.Password:=CheckBox1.IsChecked ; end;

[SOFIANE09]

الامر لا يحتاج سورس الكود بسيط للغاية  ضع checkbox و edit1  وفي حدث CheckBox1Change  ضع الكود الاتي

كود :

edit1.Password:=CheckBox1.IsChecked ; هكذا procedure TForm1.CheckBox1Change(Sender: TObject); begin edit1.Password:=CheckBox1.IsChecked ;

[size=small]مشكور حبيبي [/size]