التعامل مع checkbox

[invocker]

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

كود :

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