CheckListBox ın onclikc olayındaki kod bu şekilde.bu kodu butona nasıl atarız butona bastığımızda bu kod çalışsın.Genel olarak eventleri button ile nasıl çalıştırırız
CheckListBox1Click() özünde bir prosedür. Bir Event'a bağlandığı için event gerçekleştiğinde otomatik olarak çalışır. Ancak parametrelerini vererek herhangi bir zamanda istediğiniz kadar çalıştırmanız mümkün. Aşağıdaki şekilde deneyebilirsiniz:
herhangi bir item seçilmediği için oluyor. kodun başına bir koşul yazarsan çözüm sağlanmış olur
if CheckListBox1.ItemIndex>-1 then
begin
edit4.text:=CheckListBox1.Items[CheckListBox1.ItemIndex];
Edit7.Text := Copy(CheckListBox1.Items[CheckListBox1.ItemIndex], 1, 3);
end;