Yo creo que la única posibilidad es la que apunta DarKraZY.
Este proceminiento debe estar definido como método del formulario, ed decir igual que está definido el:
TForm1.ButonXXXOnClick(Sender: TObject);
Código Delphi
[-]
procedure Check1_OnClick(Sender: TObject);
begin
Date1.Enabled:= not (Sender As TCheckbox).Checked;
end;
Algo así:
Código Delphi
[-]
procedure TForm1.Check1_OnClick(Sender: TObject);
begin
Date1.Enabled:= not (Sender As TCheckbox).Checked;
end;
Y con su correspondiente definición en la parte de Interface.
Si luego te hace falta una variable privada (en este caso Date1) la defines en la parte privada del form.