[v1s2222]

Код:

procedure TForm1.CheckBox1Click(Sender: TObject);
begin
  Edit1.Enabled := CheckBox1.Checked;
end;

ЗЫ может лучше почитаешь пару книжек по программированию, поверь, быстрее материал усвоишь...